查看: 31884|回复: 182
分享一款超给力的Excel工具箱(宏收纳箱,大量实用的宏和函数可供学习)
阅读权限30
在线时间 小时
本帖已被收录到知识树中，索引项：
本帖最后由 方方格子 于
11:00 编辑
分享一款超给力的Excel工具箱：方方格子(VB6开发)。
支持Exccel2003(不推荐,功能受限)、、2013。
软件安装后提供四项功能：常用的文本处理、宏收纳箱、视图查看工具、鼠标记忆。
其中宏收纳箱：支持撤销，并收录了大量实用的宏和函数。
同时用户也可继续加入自己常用以及网络上收集到的宏及函数，打造属于自己的移动“武器库”!
软件完全免费，最新版V1.9.2。 欢迎大家下载使用。
【百度网盘】：
安装后Excel界面：
安装后的软件界面.png (116.95 KB, 下载次数: 212)
10:51 上传
工具箱主界面：
宏收纳箱主界面.png (58.84 KB, 下载次数: 160)
10:51 上传
每个函数都可以设置帮助动画：
一个帮助动画示例：
最新功能演示：
<font color="#.聚光灯功能& &：当表格较大时，防止看错行、列。
2.指针工具&&： 直指关键数据，制作简明报表，让领导一眼看出关键。
<font color="#.查看其它单元格： 当表格较大时，让你清晰的知道当前单元格的行/列标题。
<font color="#.鼠标记忆： 开启后，记忆您操作过的单元格。
补充内容 ( 18:15):
最新版本V2.0.0 ，采用VSTO开发。
支持32位和64位Office，支持Excel各版本。但不支持Excel2003。
新增了：关注相同值、文本拆分、快速录入、自动填表、 批量文件、便签提醒等实用工具。
补充内容 ( 18:17):
最新版本V2.0.0 ，采用VSTO开发。
支持32位和64位Office，支持Excel各版本。但不支持Excel2003。
新增了：关注相同值、文本拆分、快速录入、自动填表、 批量文件、便签提醒等实用工具。
补充内容 ( 18:18):
由于VSTO环境比较复杂。如果安装不成功，需先安装环境包：
补充内容 ( 10:33):
最新版本V2.0.3 ，支持窗体的收录了！
支持32位和64位Office，支持Excel各版本。但不支持Excel2003。
补充内容 ( 18:12):
最新版 2.0.8 出炉了，新增更多实用功能！ 欢迎大家下载使用。
补充内容 ( 16:19):
最新版 2.1.0 正式发布了
(431.48 KB, 下载次数: 174)
10:52 上传
感谢分享，希望以后有更好的作品
阅读权限50
在线时间 小时
支持一下。
阅读权限10
在线时间 小时
非常好&&支持
阅读权限20
在线时间 小时
wps表格不可以用吗？
阅读权限20
在线时间 小时
那个鼠标聚光有意思的
阅读权限70
在线时间 小时
本帖最后由 百度不到去谷歌 于
22:13 编辑
指针功能不错 聚光灯我关心他能不能撤销 能撤销多少步 想问一下撤销功能是怎么实现的楼主如果方便的话 开源吧 现在vb6做插件基本上也到头了
64位的貌似vb6无能为力
另外宏代码的话 还是用我的vba代码助手收藏和管理比较方便
VBA代码助手2.0/VBE中随时随地收藏及插入代码/免费开源/2.0更新加入工具条菜单
阅读权限30
在线时间 小时
百度不到去谷歌 发表于
指针功能不错 聚光灯我关心他能不能撤销 能撤销多少步 想问一下撤销功能是怎么实现的楼主如果方便的话 开源 ...
大神！ 我看过你的作品，很给力！
以下几点是我的看法：
1.聚光灯貌似和撤销没有关系吧。
2.宏收纳箱支持撤销，目前暂时只能撤销前一步的vba操作。
3.VB6确定不容易对付64位Office。 但是目前还有很大一部分人用Excel2003.
4.你的VBA代码助手 和我 收纳箱 相差还是挺大的。定位不同。 你做的更加专业一些，而我的目标是更傻瓜化一些，让普通用户都会用。
如果有啥建议和看法，很乐意和你一起切磋讨论！ QQ：
阅读权限20
在线时间 小时
感谢分享，谢谢！
阅读权限70
在线时间 小时
方方格子 发表于
大神！ 我看过你的作品，很给力！
以下几点是我的看法：
1.聚光灯貌似和撤销没有关系吧。
我的定位是更加方便的收纳和管理&&每个人其实都有自己的代码库&&因为方向不一样
2003实在不要再去支持了&&微软都放弃了xp 我觉得我们不要再惯着用2003的人
逼他们升级对大家都有好处
我正在学习vsto打算把我工具升级一下&&再过5年 我估计电脑上64位系统和office也应该普及了
还是应该更往前看一点
阅读权限30
在线时间 小时
& & & & & & & &
hanll111 发表于
wps表格不可以用吗？
WPS不支持。 做表格还是Excel更加给力、更加专业。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师查看: 539|回复: 18
自己想做一个报表样式的宏，却不知如何下手，求大神赐教
阅读权限20
在线时间 小时
如图，就是上下边线是粗框线，第一行底边是细线，中间竖线是细线，两边不封口，再就是标题是宋体加粗14号字，第一行是宋体加粗12号字，第一列是宋体加粗12号字，这样的宏如何录制？
(17.93 KB, 下载次数: 40)
15:12 上传
阅读权限20
在线时间 小时
比如说选定了一片单元格，一运行宏就可以自动刷成报表样式！
阅读权限20
在线时间 小时
自己顶，不要沉，求大神赐教！
阅读权限20
在线时间 小时
顶起来，顶起来，有木有大神帮帮新人？
阅读权限70
在线时间 小时
自己重新开始设计表格（操作之前要先开始录制宏），做好后关闭录制宏。宏代码就出来了。
阅读权限20
在线时间 小时
& & & & & & & &
自己重新开始设计表格（操作之前要先开始录制宏），做好后关闭录制宏。宏代码就出来了。
我之前就是这样弄得，但是执行的时候，必须把新做的表（左上角单元格）放在之前的那个录入宏选择的单元格上。
阅读权限10
在线时间 小时
我之前就是这样弄得，但是执行的时候，必须把新做的表（左上角单元格）放在之前的那个录入宏选择的单元格 ...
录制的宏需要简单修改一下才行 不如把你录的宏代码贴出来
阅读权限50
在线时间 小时
比如说选定了一片单元格，一运行宏就可以自动刷成报表样式！
Sub test()
& & Dim rng As Range
& & Set rng = Selection
& & With rng.Rows(1).Font
& && &&&.Name = &宋体&
& && &&&.FontStyle = &加粗&
& && &&&.Size = 14
& & End With
& & With rng(2, 1).Resize(1, rng.Columns.Count)
& && &&&.Font.Name = &宋体&
& && &&&.Font.FontStyle = &加粗&
& && &&&.Font.Size = 12
& && &&&With .Borders(xlEdgeTop)
& && && && &.LineStyle = xlContinuous
& && && && &.Weight = xlMedium
& && &&&End With
& && &&&With .Borders(xlEdgeBottom)
& && && && &.LineStyle = xlContinuous
& && && && &.Weight = xlThin
& && &&&End With
& & End With
& & With rng(2, 1).Resize(rng.Rows.Count - 1, 1).Font
& && &&&.Name = &宋体&
& && &&&.FontStyle = &加粗&
& && &&&.Size = 12
& & End With
& & With rng(2, 1).Resize(rng.Rows.Count - 1, rng.Columns.Count)
& && &&&With .Borders(xlInsideVertical)
& && && && &.LineStyle = xlContinuous
& && && && &.Weight = xlThin
& && && && &.ColorIndex = xlAutomatic
& && &&&End With
& && &&&With .Borders(xlEdgeBottom)
& && && && &.LineStyle = xlContinuous
& && && && &.Weight = xlMedium
& && && && &.ColorIndex = xlAutomatic
& && &&&End With
& & End With
阅读权限20
在线时间 小时
Sub test()
& & Dim rng As Range
& & Set rng = Selection
我把图贴出来，大神再看一下
阅读权限20
在线时间 小时
大神看过来
(80.1 KB, 下载次数: 38)
16:00 上传
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师求EXCEL的宏命令。
求EXCEL的宏命令。
09-04-29 &
这个不需要用宏也行。理论上应该是你一张总表，现在想在分表不出现这个人的完整身份证号码，只出现他的出生年月日。 如果顺序是对应的，可以用下面公式 =--TEXT(MID(sheet1!D1,7,6+(LEN(sheet1!D1)=18)*2),&0-00-00&) sheet1为你的总表，D1为你总表中第一个身份证所在单元格。 如果你的姓名一列，总表和分表顺序变乱，在上面公式基础上，可以再嵌套上vlookup函数。一样的。 只需要编写一个公式，拖曳即可。
请登录后再发表评论!
Excel中的宏通俗点说就是用VBA语言来编制一段程序,能将很麻烦的事情通过编程能很快很好地解决.宏可以创建也可以录制.如编一个乘法口决表,创建宏abc,执行一下宏abc就能得出结果,宏abc代码为: Sub abc() For i = 1 To 9 For j = 1 To i Cells(i, j) = j & &*& & i & &=& & i * j Next j Next i End Sub
请登录后再发表评论!
请登录后再发表评论!
我是一个软件工作者,但是,我对软件编码的工作方面的兴趣远远比不上对Excel和Word的兴趣. &#160; &#160; 我觉得能够用最简单,最常规的就是最好的. &#160; &#160; 下面就看一下如何使用Excel录制宏命令,从而实现编程的效果. &#160; &#160; 1.在“窗体”工具栏上，单击“选项按钮”，然后在工作表上绘制按钮的外边框。 &#160; &#160; 2.选择任何一个单元格. &#160; &#160; 3.将该按钮画制在该单元格内. &#160; &#160; 4. 在用于 Microsoft Windows 的 Excel 版本中，右键单击选项按钮，然后单击“指定宏”。在用于 Macintosh 的 Excel 版本中，根据您的操作系统版本，在单击的同时按 Command，或在单击的同时按 Ctrl。然后单击“指定宏”。 &#160; &#160; 5.在“指定宏”对话框中，单击要为选项按钮指定的宏的名称，然后单击“确定”。
&#160; &#160; 然后,保存该Excel,当下次运行这个Excel的时候,则会运行该宏命令.
请登录后再发表评论!求Excel一条宏或者公式求Excel一条宏或者公式求教高人！因需要做某常数的的一定范-知识宝库
你可能对下面的信息感兴趣