调用一个包含多个下划线的variables名

目前我正在开发一个子版本，如果一个单元格的值匹配工作表的名称，那么将会激活其中一个已经写入的子文件。

所以如果我在一个有数据validation的单元格中select了“索引”，子将会激活子索引名称“索引”，它将创build表格“索引”的pdf文件。 创buildPDF文件的子“索引”起作用。 如果在子名称中没有下划线，则激活子“索引”的子程序也起作用。 但是我确实希望它可以使用下划线，因为有些表的名字中有空格。 例如; 表“材料检查”与“Material_检查”或“Material_test_report”表单中的“材料检查报告”组合在一起。

代码只有在重置子名称后才有效。

码：

Sub CreateSomePDF() Dim iMyValue As String iMyValue = Worksheets("Invulformulier").Range("A96").Value Application.Run iMyValue End Sub 

是否有可能使其工作？ 我几乎可以肯定的是，由于单名的工作，下划线是问题。

Answer 1

如果你的问题是工作表中的名称中有空格，并且subs有下划线，为什么不在调用macros时把它们replace成string呢？

 Sub CreateSomePDF() Dim iMyValue As String iMyValue = Replace(Worksheets("Invulformulier").Range("A96").Value, " ","_") Application.Run iMyValue End Sub