[分享]双击工具栏空白处禁止自定义弹出(36、39楼)

zbs112 · 发表于 2006-9-4 19:46

button版主，能抽个时间帮我调试一下，好吗？

1）新增的自定义菜单的type参数不是msoBarTypeMenuBar就可以了，比如可以改为msoBarTypeNormal。这个要从哪改？

2）我想要的自定义菜单分为2行排列，第1行如：恢复菜单、隐藏菜单，第2行为：保存、打印、预览等。这个要怎么改？

aQX7eZN4.rar (13.14 KB, 下载次数: 13)

[此贴子已经被作者于2006-9-4 19:48:57编辑过]

button · 发表于 2006-9-5 14:51

请查看示例。

xeWKPSNb.rar (12.79 KB, 下载次数: 19)

zbs112 · 发表于 2006-9-5 18:30

button版主，你好！

当双击菜单空白处时，按22楼的示例还是弹出自定义的对话框，请看下图。

button · 发表于 2006-9-6 19:35

可以，但是不一定是稳定的处理方法，稍后给你一个示例

zbs112 · 发表于 2006-9-6 20:11

先谢了，button版主。

button · 发表于 2006-9-7 10:57

以前做过一个例子，不过不完善，现在改进了一下，测试条件中文版的EXCEL2000，xp，2003，系统分别是中文版win98，xp。你可以在其它条件下再测试一下。97不知道可不可以。

J47DU2o7.rar (9.29 KB, 下载次数: 30)

zbs112 · 发表于 2006-9-7 11:23

测试通过，谢谢BUTTON版主！

测试条件中文版的EXCEL2000，系统是中文版2000。

Cf0pCxc8.rar (17.19 KB, 下载次数: 17)

nawong · 发表于 2006-9-7 12:02

WIN NT +Offfice2000,不通過，程式不回應，只有Ctrl+Alt+Del才能結束進程。

清风_ll · 发表于 2006-9-7 12:25

XP+2003中通过,button兄辛苦了.

button · 发表于 2006-9-7 12:50

将HOOK或者子类化技术应用于VBA中的确会出现程序不响应的问题，这个问题在非模式窗体里也非常容易出现，最好是运行程序时不要打开VBE窗口，可能会好一些。

		自动登录	找回密码
密码			免费注册

继续求助中......