VBA实现多级的下拉菜单输入单元格

蓝桥玄霜

在VBE界面的菜单中，选择工具-引用，勾选Microsoft Scripting Runtime

忘得快

蓝桥玄霜 发表于 2012-11-21 12:41
在VBE界面的菜单中，选择工具-引用，勾选Microsoft Scripting Runtime

谢谢老师！勾选Microsoft Scripting Runtime后，在“用菜单填单元格”工作表的A列只弹出“请选择”，没有下拉菜单，其他几级都没有出现，不知如何处理？

蓝桥玄霜

是用我的附件测试的吗？

忘得快

蓝桥玄霜 发表于 2012-11-21 12:57
是用我的附件测试的吗？

不是，是我自己的文件。（可以了）

忘得快

蓝桥玄霜 发表于 2012-11-21 12:57
是用我的附件测试的吗？

老师你好！请将我的附件打开试试，谢谢。

蓝桥玄霜

忘得快 发表于 2012-11-21 14:20
老师你好！请将我的附件打开试试，谢谢。

你的附件在哪里？

忘得快

蓝桥玄霜 发表于 2012-11-21 14:34
你的附件在哪里？

老师：按照你的指导，下拉菜单已弹出，但菜单内容无法填入单元格，菜鸟估计与其他代码有冲突，删除了模块1下面的代码后就能填入单元格了，请老师帮菜鸟看看是哪句代码冲突？如何修改？谢谢！ 菜单内容无法填入单元格.rar (57.37 KB, 下载次数: 22)

2012-11-21 16:36 上传

点击文件名下载附件

蓝桥玄霜

是有了两个输入()过程了，改名一个即可。
请见附件。

忘得快

蓝桥玄霜 发表于 2012-11-21 16:59
是有了两个输入()过程了，改名一个即可。
请见附件。

谢谢老师！但下拉菜单形式还不能满足“录入”工作表所提的要求，菜鸟是想每一级菜单都可选，并且根据需要选3级填3个单元格，选4级填4个单元格，能否实现？你现在的代码必须5级要全部选完才能填入单元格。

zhendizhang8212

蓝桥玄霜 发表于 2011-11-2 13:15
请见附件。

蓝老师你好，根据你的代码，我改写了一下。我实现4级下拉菜单，但是输入上去的确实5列数据（后两列相同），如上图。不知道什么原因，请蓝老师帮忙解决一下。{:soso_e183:}