Excel完美工具箱(更新到9.7.1版,兼容07,10,13,16)多功能插件

佛山小老鼠

Excel完美工具箱2012年8月25日中午11:40分更新到9.0.3版
更新的内容：1.在单元格工具里增加了按颜色求和功能；2.修改了批量隔行插入行功能，可以隔任意行插入几行，满足部分用户的需求；3修改了提取两列相同项与不同项；4.修改了批量显示和隐藏工作表功能；5.修改了批量删除工作表功能；6修改了批量复制工作表的功能；7修正了从汉字中提取数字且求和功能的Bug;

wyqzm

不知道为什么回出现这种情况，已知的情况是我装了Excel必备工具箱，我卸载了还是有问题

佛山小老鼠

wyqzm 发表于 2012-8-25 11:51
不知道为什么回出现这种情况，已知的情况是我装了Excel必备工具箱，我卸载了还是有问题

你这个可能要重新装一下EXCEL

hawaxin

谢谢分享学习

xiaojun0301

  锁住鼠标这个功能加密时候显示的是*号，而解锁时却显示的是内容，这点不好啊

kuangben8

更新到昨天啊！这是最新的了。

win2009

佛山小老鼠 发表于 2012-8-22 11:37
确是这样的，这个我也知道，暂时我改进不了，一， 现在只能关闭着色，然后再选区域，谢谢你的建议

鼠标定住功能已经实现，请看这里
http://club.excelhome.net/thread-910496-1-1.html

Public Sub 开始()
    ActiveSheet.ScrollArea = Selection.Address
    StartTimer
End Sub
Public Sub 结束()
    ActiveSheet.ScrollArea = ""
    StopTimer
End Sub

win2009

佛山小老鼠 发表于 2012-8-25 12:04
你这个可能要重新装一下EXCEL

备份的代码 2010版的

1. Sub 备份工具栏()
   
2.     Set x = CreateObject("scripting.filesystemobject")
   
3.     Dim s
   
4.     Dim t
   
5.     t = "C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel"
   
6.     s = "D:\excel工具栏备份文件"
   
7.     x.Copyfolder t, s
   
8. End Sub
   

复制代码

佛山小老鼠

win2009 发表于 2012-8-26 22:01
鼠标定住功能已经实现，请看这里
http://club.excelhome.net/thread-910496-1-1.html

谢谢你的帮助，我试了一下哈版的代码，很闪的，期待你和哈版改良，等你们的好消息

win2009

佛山小老鼠 发表于 2012-8-26 23:47
谢谢你的帮助，我试了一下哈版的代码，很闪的，期待你和哈版改良，等你们的好消息

只要用这个替换就行，其他不要改
Public Sub 开始()
    ActiveSheet.ScrollArea = Selection.Address
    StartTimer
End Sub
Public Sub 结束()
    ActiveSheet.ScrollArea = ""
    StopTimer
End Sub