《Ecel 如果用VBA写一段自动加入菜单功能》由会员分享，可在线阅读，更多相关《Ecel 如果用VBA写一段自动加入菜单功能（6页珍藏版）》请在金锄头文库上搜索。
1、Excel如果用VBA写一段自动加入菜单功能-ExcelVBA程序开发-Excel Home论坛Excel 教程下载中心，Microsoft技术社区联盟成员，全球领先的Excel2003/2007/2010门户，培 训学习 Office 的最佳社区免费培训 博客 下载中心 技术文章 原创图书 视频教程 首页免费注册 回家 标签Excel Home 风采Show快乐答题抢红包帮助繁體Excel Home论坛» ExcelVBA程序开发»如果用VBA写一段自动加入 菜单功能Excel Home 官方博客开通啦！免费网页版 Excel - 魔方网表下载 Excel 服务 器2
2、010软件和教程下载你以前不知道的 Word 实战绝技免费共享:EH资源电子杂志首刊2011年Excel免费培训班3-6月开课计划 新 人必读：ExcelHome最佳学习方法入门必看循序渐进学Excel视频精粹:成为Excel高手的捷径免费下载39集新Excel精粹视频教程免费学习 Excel 数据透视表视频教程免费下载Excel行业应用视频教程新人扫盲:论坛学习及使用完全攻略免费学习Excel 2007精粹视频教程秘技: 10分钟赚足培训课券！大家来报料:最牛的 Excel 用法！‹‹ 上一主题 | 下一主题 ›› 发新话题 发布投票 发布商品
3、 发 布悬赏 发布活动 发布辩论 发布视频打印求助如果用VBA写一段自动加入菜单功能hits : 1220lemonbmcExcel Home 初级积分74财富179 分享0技术0注册时间2008-9-24总积分排名3000+发 短消息 加为好友 1 楼 大 中 小 发表于2008-11-26 15:04 只看该作者NetExcel 软件！会 Excel 就可以编程，快速实现报表系统、进销存、生产管理、工资 绩效等系统！如果用VBA写一段自动加入菜单功能 想编制一段VBA程序，再加载XLA的时候，能自动在EXCEL中加载一个菜单，菜单下 有此段程序的调用。 多谢高手指教。UID612795 帖
4、子20 精华0 经验71 威望0 阅读权限20 性别男 在线时间6 小时 查看详细资料 TOPmineshineExcel Home 专家级积分3792财富9948 分享0技术0注册时间2008-11-18总积分排名179 发短消息 加为好友 2 楼 大 中 小 发表于2008-11-26 21:03 只看该作者Net Excel软件！会Excel就可以编程，快速实现报表系统、进销存、生产管理、工资 绩效等系统！Private Sub Workbook_Open()Workbook_AddinInstallAdd New CommandBarEnd SubPrivate Sub Workboo
5、k_AddinInstall()Dim CB As CommandBarControlDim I As IntegerI = 1For Each CB In Application.CommandBars(1).ControlsIf CB.Caption = Statis(&S) Then菜单已加入，则刪除Application.CommandBars(Worksheet MenuBar).Controls(Statis(&S).Visible = True Application.CommandBars(Worksheet MenuBar).Controls(Statis(&S).Delet
6、eEnd IfNextDim objCmdBrPp As CommandBarPopupDim objCmdBtn As CommandBarButtonSet objCmdBrPp = Application.CommandBars.ActiveMenuBar.Controls.Add(Type:=msoControlPopup, Temporary:=False)On Error Resume Next objCmdBrPp.Caption = Statis(&S)加入菜单名称objCmdBrPp.OnAction = TestA指定菜单对應的程序 subSet objCmdBrPp =
7、NothingEnd SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean) 文件关闭，就刪除菜单 Dim CB As CommandBarControlOn Error Resume NextFor Each CB In Application.CommandBars(1).ControlsIf CB.Caption = Statis(&S) Then Application.CommandBars(Worksheet MenuBar).Controls(Statis(&S).Visible = False Application.Com
8、mandBars(Worksheet MenuBar).Controls(Statis(&S).DeleteEnd IfNextEnd SubUID658023 帖子3067 精华0 经验3067 威望 0 阅读权限90 在线时间1449 小时 查看详细资料 TOPlemonbmcExcel Home 初级积分74财富179 分享0技术0注册时间2008-9-24总积分排名3000+发 短消息 加为好友 3 楼 大 中 小 发表于2008-11-26 22:49 只看该作者EH梦之队实战技巧精粹系列图书火热发售，配套视频教程免费下载中多谢多谢！UID612795 帖子20 精华0 经验 71
9、威望 0 阅读权限2 0 性别男 在线时间 6 小时 查看详细资料 TOPljl008Excel Home 高级积分1297 财富4557 分享0 技术0 来自广西 注册时间2007-5-29 总积分排 名 628 发短消息 加为好友 4 楼 大 中 小发表于 2008-11-26 22:57 只看该作者EH梦之队实战技巧精粹系列图书火热发售，配套视频教程免费下载中向2楼学习，虽然看不明白，但我还是要学UID274785 帖子811 精华 0 经验 945 威望 0 阅读权限50 性别男 在线时间 704 小时 查看详细资料 TOPzyq12688Excel Home 新人积分16 财富 35
10、 分享0 技术0 注册时间 2008-11-12 总积分排名 3000+ 发 短消息 加为好友 5 楼 大 中 小 发表于2008-12-29 15:36 只看该作者EH梦之队实战技巧精粹系列图书火热发售，配套视频教程免费下载中非常具有指导意义，学习中UID653268 帖子9 精华 0 经验 9 威望0 阅读权限10 在线时间 13 小时 查看详 细资料 TOPlilonghitExcel Home 初级积分52财富103 分享0技术0注册时间2008-8-14总积分排名3000+发 短消息 加为好友 6 楼 大 中 小 发表于2008-12-31 09:47 只看该作者Excel服务器20
11、10软件和教程下载值得学习，谢谢UID574729 帖子1 精华 0 经验 51 威望 0 阅读权限20 性别男 在线时间 1 小时 查看详细资料 TOPcorvine99Excel Home 中级积分 509 财富 1408 分享 0 技术 0 注册时间 2008-12-30 总积分排名 1875 发短消息 加为好友 7 楼 大 中 小 发表于2008- 12-31 09:57 只看该作者你以前不知道的Word：Word实战技巧精粹视频教程学习了。UID691964 帖子460 精华 0 经验 460 威望 0 阅读权限30 在线时间 97 小时 查 看详细资料 TOPgflavourlon
12、Excel Home 初级积分 121 财富 253 分享 0 技术 0 注册时间 2007-11-16 总积分排名 3000+ 发短消息 加为好友 8 楼 大 中 小 发表于2009- 3-7 11:13 只看该作者Net Excel软件！会Excel就可以编程，快速实现报表系统、进销存、生产管理、工资 绩效等系统！看得不是很明白UID366586 帖子48 精华0 经验108 威望0 阅读权限2 0 性别男 在线时间26 小 时 查看详细资料 TOP随心所欲Excel Home 中级积分796 财富 1676 分享 0 技术1 来自上海 注册时间 2006-7-23 总积分排 名 1074
13、 发短消息 加为好友 9 楼 大 中 小发表于 2009-8-10 23:03 只看该作者好帖推荐、申请精华或加分、违规帖举报，欢迎“报告”报告有奖！ 努力学习，天天向上怀着对未来生活的希望和憧憬,过好今天迎接明天,懂得珍惜,懂得 感恩,学会理解,学会包容,以微笑面对挫折,以坚强征服困难.UID163348 帖子468 精华0 经验668 威望0 阅读权限30 性别女 在线时间155 小时 查看详细资料 TOP‹‹ 上一主题 | 下一主题 ››Excel Home 活动专版Excel 免费培训班专区Office 2010 征文大赛EH 财富换购竞
14、拍区Excel 进阶研讨区 快乐答题俱乐部 往期活动 奥运主题作品赛（结束）Excel 趣味作品 2009 大赛区（ 结束）Excel Home 原创图书教程研读交流，示例与视频培训教程下载Excel2007 实战技巧精粹论坛Excel 数据透视表应用大全论坛Excel 高效办公系列读者论坛Excel 应用大全读者论坛08 新版精粹系列图书读者论坛Excel 实战技巧精粹读者论坛Microsoft Excel Zone - Excel2003/Excel2007 技术交流与问答Excel 基础应用Excel 函数与公式ExcelVBA 程序开发Excel 图表与图形Excel 数据透视表Exc
15、el Profession Apply - Office/Excel 行业应用交流与培训Excel 财会与金融Excel 人力资源管理Excel 生产管理Microsoft Office FamilyMicrosoft Office OutlookMicrosoft Office WordMicrosoft Office PowerPointMicrosoft Access & SQL Server其他 MicrosoftOffice 产品Office Resource - excel 教程 excel 下载 excel2007 培训教程下载 资源共享 原创发表Office 图书品评Office Competition - Office/Excel 技术竞赛开放式竞赛专区Microsoft Office 之外电脑网络休闲吧Excel Home 论坛事务管理会员广场人才市场 学习经验分享
