参照設定しているライブラリの一覧を出力する【ExcelVBA】

参照設定しているライブラリの一覧を出力したい

参照設定しているライブラリの一覧を出力したい場合があります。
下記コードのようにfor分で出力可能です。

Public Sub sample()

    Dim obj As Object
    
    '■設定されている「参照設定」をDebug.Printする
    For Each obj In Application.VBE.ActiveVBProject.References
        Debug.Print obj.Description
        Debug.Print obj.GUID
    Next
    
    '■出力例
    'Visual Basic For Applications
    '{000204EF-0000-0000-C000-000000000046}
    'Microsoft Excel 16.0 Object Library
    '{00020813-0000-0000-C000-000000000046}
    'OLE Automation
    '{00020430-0000-0000-C000-000000000046}
    'Microsoft Office 16.0 Object Library
    '{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}
    'Selenium Type Library
    '{0277FC34-FD1B-4616-BB19-A9AABCAF2A70}

End Sub

注意点

• 実行時エラー1004：プログラミングによるVisual Basicプロジェクトへのアクセスは信頼性に欠けます」が表示された場合は、以下方法から回避可能です。
• エクセルのオプションから、「セキュリティセンター」→「マクロの設定」から
  「VBAプロジェクト オブジェクト モデルへのアクセスを信頼する」にチェックを入れます。

関連記事

• VBAでIE操作する為の必須条件「参照設定」する
• Dictionaryで「ユーザー定義型は定義されていません」が表示される
• ライブラリへ参照設定を追加する