VBA单元格中如何生成弹出式菜单
1、VBA单元格中生成弹出式菜单第一步,同进按下组合键ALT+F11,打开vba代码编辑窗口。
2、VBA单元格中生成弹出式菜单第二步,在左侧的vba工程窗口空白区域上右击鼠标,艚硒渤恨弹出菜单中选择“插入”——“模块”。
3、VBA单元格中生成弹出式菜单第三步,在新建的模块中,输入以下代码。
4、首先,定义一个CommandBar对象类型,用来保存单元格右键快捷菜单命令项。
5、再定义了一个菜单项对象,指向CommandBar对象类型的一个新增菜单项,并指定单击新增的命筠沭鱿漆令时执行的子过程名称为test,显示为测试。
6、再定义一个子过程test,用来响应菜单的动作。
7、VBA单元格中生成弹出式菜单第四步,将光标定义在第一个过程中,按F5运行该过程。
8、VBA单元格中生成弹出式菜单第五步,回到excel表单中,右键任意单元格,就会发现右键菜单中多了一个“测试”选项。
9、点击“测试”选项,效果如下。
声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
阅读量:65
阅读量:85
阅读量:22
阅读量:63
阅读量:31