Excel VBA-.References.Remove

时间:2018-07-10 21:41:26

标签: excel-vba

我正在研究一个Excel项目,许多人将在不同的计算机设置上使用该项目。有些会或有些不会安装Adobe Pro,所以我正在研究将删除缺少的引用并禁用特定控件的代码,以便用户仍可以使用excel项目的其余部分。我搜索了多个论坛,但无法使其他人的示例正常工作(一个示例:How to Add/Remove reference programmatically?)。由于出现编译错误-找不到项目或库-如果尝试将oRef声明为Reference,我的猜测是我需要添加另一个引用以使此代码正常工作。以下是我在“ .References.Remove oRef”行上得到的错误消息,以及我已附加到项目中的引用的屏幕快照。缺少的参考是我要在代码中删除的参考。选中“信任对VBA Project对象模型的访问”框。

'Private Sub Workbook_Open()
Private Test()
  Dim oRef As Object

  With ThisWorkbook.VBProject
    For Each oRef In .References
      If oRef.isbroken Then
        .References.Remove oRef
      Else
        MsgBox oRef.Name
      End If
    Next
  End With
End Sub

错误消息

Error message

附加参考

Attached References

0 个答案:

没有答案