使用Application.Run调用宏会出现错误1004

Question

我无法找到Application.Run命令返回的错误1004的原因。

Sub Called()
  MsgBox "Yes"
End Sub

Sub Caller()
  Call Called ' works
  subName = "Called"
  Application.Run Application.ActiveWorkbook.Name & "!" & subName ' error 1004
End Sub

错误说明（法语）：

---------------------------
Erreur d'exécution '1004':
Erreur définie par l'application ou par l'objet
---------------------------

我在Google上搜索此问题后发现的每个解决方案都会导致同样的错误。 Caller和Called subs位于相同的“Sheet1”模块中。

我有点失落。我想知道这个问题是否与XL安全有关？或参考文献中缺少的东西？

Answer 1

将您的代码移出Sheet1模块并进入普通模块。

Answer 2

我遇到了同样的问题。

我通过将第二个宏移动到同一模块来修复它。

看起来像是内存问题。