excel - VBA，Excel：可以将 .OnAction 值设置为 ThisWorkbook 中的 Public Sub

Question

VBA天才：

问题 1： 是否可以将菜单选项的.OnAction值设置为ThisWorkbook中的 Public Sub或必须 sub 在模块中？

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

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

我想将 sub 移动到ThisWorkbook，所以值变成这样：

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

问题 2： 如果 #1 的答案是肯定的，那么在 .OnAction 命令中获取对“ThisWorkbook”的引用的语法是什么？

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

谢谢VBA天才！

Answer 1

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