无法运行宏。宏可能在此工作簿中不可用

Question

VBA错误'运行时间1004'有问题。使用以下代码。从第5行的按钮调用宏，因此减法。第6,7,8行等中还有其他按钮，它们都调用相同的宏（以便随后调用特定的用户表单），因此变量。

Sub Export()
    i = RowNumber - 4

    Reinstated = "ReinstateR" & i

    Application.Run Reinstated

End Sub

宏'ReinstateR1'，'ReinstateR2'等都存储在一个单独的模块中。

Sub ReinstateR1()

'Macro function etc.

End Sub

出于某种原因，当我点击按钮时，我收到以下错误消息：

“无法运行宏'ReinstateR1'。宏可能在此工作簿中不可用，或者可能禁用所有宏。”

所有宏都已启用，宏位于同一工作簿中，等等。信任中心设置被设置为禁用所有带通知的宏等。

我很难过。我可以在没有变量的情况下调用宏，但这不是重点......

Answer 1

如果您的模块与其包含的例程具有相同的名称，则需要使用带有模块名称的Application.Run为其调用前缀（或更改模块或例程的名称） ），所以在这种情况下它是：

Application.Run "Reinstater1." & Reinstated