excel - VBA、Excel : Can . OnAction 值设置为 ThisWorkbook 中的公共(public)子

标签 excel vba menu module controls

VBA 天才:

问题 1: 是否可以将菜单选项的 .OnAction 值设置为 ThisWorkbook 中的 Public Sub,或者必须子模块位于模块中吗?

这有效:ViewTextFile() 是模块中的公共(public)子

.Controls(strMenuItem).OnAction = "'ViewTextFile """ & strMenuItem & """'"

我想将子移动到ThisWorkbook,所以值变成这样:

.Controls(strMenuItem).OnAction = "'" & ThisWorkbook.Name & "!ViewTextFile """ & strMenuItem & """'"

问题 2:如果问题 1 的答案是肯定的,那么将“ThisWorkbook”的引用添加到 .OnAction 命令中的语法是什么?

请注意,参数 strMenuItem 必须包含在值中(如“ViewTextFile my_file.txt”)。我尝试了上述的许多变体,但没有成功。

谢谢你们,VBA 天才们!

最佳答案

.Controls(strMenuItem).OnAction = _
            "'ThisWorkbook.ViewTextFile """ & strMenuItem  & """'"

关于excel - VBA、Excel : Can . OnAction 值设置为 ThisWorkbook 中的公共(public)子,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/11730824/

相关文章:

excel - 如何像范围一样定义二维数组的列?

excel - 如何让 Excel 刷新特定单元格

vba - 如何为 Excel 工作簿创建参数化加载项

excel - 比较两个字符串时类型不匹配

excel - VBA 另存为方法

javascript - 使用 Swipe 支持如何将菜单滑回?

qt - 使用 QML 创建上下文菜单

vba - 在 Excel 公式中达到 =sum 中的最大被加数时是否有解决方法?

excel - 为什么对象不支持这种方法?

jquery - 水平子导航查询