这个问题通常是由于在VBA项目中添加了一个已损坏的加载项所引起的。解决此问题的步骤如下:
- 打开Excel菜单栏中的“文件”,然后在“选项”中选择“加载项”。
- 单击“转到”按钮旁边的下拉菜单,然后选择“Excel加载项”。
- 找到您想要禁用的加载项,并将其取消选中。
- 如果您希望重新启用某个加载项,请从已禁用的加载项列表中选中该项。
- 单击“好”,关闭选项对话框。
- 您现在应该能够在VBA项目中使用AddIns.Add语句而不会遇到内部错误51。例如:
Set myAddin = AddIns.Add(myAddinPath)
myAddin.Installed = True