Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 9612|回复: 36

我的菜单我做主-【聚宝瓶】Excel工具diy版

[复制链接]
发表于 2012-10-19 16:05 | 显示全部楼层 |阅读模式
本帖最后由 hhzjxss 于 2012-11-18 16:40 编辑

      很早就有编写这个程序的想法,一直没有时间动手,今年双节期间,又不想外出到高速公路上去排队,就宅在家里草写了这个东东,运行都是基本对象代码,没有完善和优化,提取速度较慢(好在不用经常提取),还有许多需要完善和优化的地方,现上传到论坛来,并公开源代码,但愿能起个抛砖引玉的作用吧,大家可以修改完善;由于本人水平和精力有限,错误和疏漏这处在所难免,敬请大家多提宝贵意见。

一、功能
       本程序的功能是为喜爱Excel VBA工具提供了随心所欲创建自定义菜单的模块,主要功能是:
提取本程序加载宏文件夹中所有子文件夹和加载宏文件,生成Excel自定义菜单。

二、安装
      下载后解压,双击“【XSS 聚宝瓶】Excel工具diy.exe”,然后在弹出的安装界面中,点“安装”即可。


二、用法
1、运行菜单:
     打开Excel,就会启动程序:
Excel后,你会发现,菜单栏的最后一个,就是新生成的聚宝瓶菜单。
点出“【XSS 聚宝瓶】Excel工具diy版”菜单,会展开类似如下的菜单:


以上菜单和工具是系统中预设好了的,点出可直接运用,与其他自定义菜单一样。
2、动态调整菜单:
        当你只需要系统中的部分功能时,可删除系统文件夹中的除系统文件外的任意文件夹及其中的加载宏。同样,你也可以在这个文件夹里添加你自己收藏的加载宏。

最好一个加载宏只包含一个工具,代码要写在模块里,方便程序提取。
修改完系统中文件夹后,你就可以运行菜单中的“系统设置”,就会打开以下对话框。


对话框中你分别可以提取菜单,然后再重新生成菜单,也可调整菜单顺序或设置图标及分隔线(后面两个功能还未完成)。
好了,这说这么多了,具体操作看动画吧!

a、调整菜单顺序、图标和分隔线:

b、提取菜单:




c、更新菜单:



d、设置图标:


三、说明
        本程序由Excel精英培训网hhzjxss(雨中漫步)2012年中秋、国庆双节期间制作;程序代码为原创(菜单部分的代码主要参照了自著名的PUP V6工具,其他代码是自己编写的),工具代码部分为原创,部分来自网络共享资源,在此表示感谢。因收集了国内外优秀插件中对自己工作有用的部分工具,是谓之“聚宝瓶”也。

       本程序的亮点不在提供工具代码,而在提供根据用户的需要,自己在文件夹中添加和删除文件夹和加载宏,程序上会根据这些文件夹和加载宏,提取生成新的菜单,使菜单适合自己的需要,去鸡肋还留精华。




本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点评

动作很快!  发表于 2012-10-19 16:41

评分

参与人数 3 +22 金币 +10 学分 +2 收起 理由
hzg303 + 2 我和小伙伴都惊呆了
xiaoni + 12 谢谢分享
JLxiangwei + 10 + 10 很给力!

查看全部评分

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2012-10-19 16:45 | 显示全部楼层
回复

使用道具 举报

发表于 2012-10-19 17:22 | 显示全部楼层
老师我安装后不能打开excel文化了,怎么办?
回复

使用道具 举报

发表于 2012-10-19 17:35 | 显示全部楼层
紧急求助,老师我安了你的聚宝瓶后,我做的所有的excel文件都打不开了怎么办?急死了
回复

使用道具 举报

发表于 2012-10-19 17:36 | 显示全部楼层
老师我安装后不能打开excel文化了,怎么办?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

发表于 2012-10-19 17:57 | 显示全部楼层
老师求助呀?我的excel文件打不开不能工作怎么办?重新卸载程序,还怕以前的文件被丢失
回复

使用道具 举报

 楼主| 发表于 2012-10-19 19:04 | 显示全部楼层
xiaoni 发表于 2012-10-19 17:57
老师求助呀?我的excel文件打不开不能工作怎么办?重新卸载程序,还怕以前的文件被丢失

不是吧,这个只是加载的时候隐藏了Excel界面,加载完后会显示。

小截图吧,我手机上网,运行不了Excel。
回复

使用道具 举报

发表于 2012-10-19 20:40 | 显示全部楼层
xiaoni 发表于 2012-10-19 17:57
老师求助呀?我的excel文件打不开不能工作怎么办?重新卸载程序,还怕以前的文件被丢失

打开我的电脑”------点菜单上的工具”------“文件夹选项”------“查看”------选中显示所有文件和文件夹”------“确定”-------打开“C”-------“Documents and Settings”--------打开你这台电脑的用户名------“Application Data”-------“Microsoft”--------“EXCEL”,这时就删掉“EXCEL11XLB”,返回桌面。然后重新打开EXCEL软件,你发现菜单又回来了!
回复

使用道具 举报

发表于 2012-10-19 21:39 | 显示全部楼层
EXCEL11.XLB”
后缀名是.xlb的文件是什么文化呀
回复

使用道具 举报

 楼主| 发表于 2012-10-19 23:00 | 显示全部楼层
xiaoni 发表于 2012-10-19 21:39
后缀名是.xlb的文件是什么文化呀

这个是菜单文件,记录了包含自定义菜单信息,如果这个文件坏了,Excel会崩溃,删除可以恢复菜单到初始状态!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-26 04:45 , Processed in 0.912337 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表