Excel中的一个问题..拜托达人解答

[wxg600308]

我自己在Excel中做的菜单..没有事件触发....现在我想在随便点击一个菜单项的时候获取到我点击的菜单文本...

请问这应该怎么做?

[wxg600308]

顶一个...拜托各位呀..问题很急...有哪位能帮帮忙吗

[wxg600308]

楼上的..我的菜单意思是..我做了一个不用用代码去添加的菜单..

就是自己做了一个菜单控件一样...别人可以直接在上面去添加自己的菜单和子菜单...

不用自己再写代码..


现在的意思是..不管别人添加什么菜单..只要点击任意一个菜单的时候...最好我想用个变量把这个菜单名给保存下来..不知道这样行不

[gracexu]

你先说一下你的菜单是怎么做的。

[wxg600308]

就没人能解决????

[wxg600308]

附件怎么也传不上来啊

[danqe]

我看了半天也没明白你想要什么。
你仍然没有表达清楚。

[wNvShine]

我把东西发给你?

[netad1970]

把你做的菜单抓个图贴上来，在描述清楚。

[wxg600308]

我上传不了附件 不知道怎么回事

[wxg600308]

谁告诉我下怎么放图怎么放附件啊

[wxg600308]

可以把邮箱告诉我不?

我把东西直接发给你可以不?..

[gracexu]

我在修改代码呢，回头发给你。家务比较多。

[wxg600308]

好的..谢谢

[wNvShine]

这个菜单就是你自己在表里生成的吧..不通过代码实现...然后你想获取你当前选择菜单的文本值..

是这意思吧?

[wxg600308]

我定义了很多例程，也就是解决不了菜单被点击后获取Captiond的值，如果能
我也就可以用用一个共有例程（不是所有，只对指定导入数据菜单）随意添加和修改了
你的代码也是指定某一菜单再返回Caption的值

[gracexu]

[Quote=引用 6 楼 wxg600308 的回复:]
楼上的..我的菜单意思是..我做了一个不用用代码去添加的菜单..
就是自己做了一个菜单控件一样...别人可以直接在上面去添加自己的菜单和子菜单...
不用自己再写代码..
现在的意思是..不管别人添加什么菜单..只要点击任意一个菜单的时候...最好我想用个变量把这个菜单名给保存下来..不知道这样行不
[/Quote]
看了楼主的文件，再看楼主这句话，我感觉这个 Excel 文件不是楼主自己做的，因为楼主好像不是很清楚这个文件运行的后台代码。我纠正几点：
1. 这是个用代码添加的菜单，添加的方式和我在5楼的回答是一样的。不同的是，我的例子里把菜单项直接写在代码里，而楼主的文件是从表单读单元格数据。
2. 楼主所谓的菜单控件，就是单元格加添加删除两个按钮，用户可以按规定的格式在单元格里描述要添加的菜单的层次，名称，事件例程和图标等等。添加按钮后台的代码会遍历用户表单的数据，循环添加所有菜单。
3.用户点的菜单程序可以获取菜单名称，但不是像楼主想的那样用一个共有的例程，因为Excel 没有提供接口，告诉你哪个菜单被点击。你只能为每个菜单项指定自己的例程来做这件事情。代码如我在 5 楼所说。
4. 用户添加的菜单其实不是那么随意的，除非他不想做什么事情，你用一个默认的共有例程来显示些信息什么的。照你的文件来看，其实是已经定义了很多例程，能添加的菜单项不能超出这些例程范围。

[wxg600308]

“因为Excel 没有提供接口，告诉你哪个菜单被点击”
也就是说没有办法实现我想要的功能。
就没有其他办法可想了吗？

[gracexu]

也许你可以试试不在 Excel 里开发，移到 visual studio 里去，但是我还没有时间试。

http://msdn.microsoft.com/en-us/library/aa168343.aspx
Walkthrough: Creating Custom Menu Items in Excel

我理解你想要的东西，从这篇文章看是可以的。只是我没有时间去测试这里面的代码，所以还是按最笨的法子给你改了代码。你可以自己先照这篇文章走一遍。

[wNvShine]

LZ你的问题我已经解决...请去Email接收

[szwfzx]

学习了。