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/