VBE操作技：VBAでモジュール名を書き変える

VBAを使って、Excelブックのモジュール名を書き変える方法を紹介します。（例：Module2をModuleXに名称変更します。）

前提：

VBAProject は次のようになっているとします。

（※ Module1とModule2が存在している）

手順：

① Visual Baisc プロジェクトへのアクセスを許可します。以下を参考にしてください。

Visual Baisc プロジェクトへのアクセスを許可する方法

② 「Microsoft Visual Basic for Application Extensibility」を参照設定します。

③ 次のプログラムコードを記載します。

Option Explicit

Public Sub Sample_ReNameModule_01()

    ' ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
    ' 参照設定：
    ' 「Microsoft Visual Basic for Application Extensibility」
    ' ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,

    ' このブックのVBProjectをオブジェクト変数に格納する。
    Dim Obj As VBIDE.VBProject
    Set Obj = ThisWorkbook.VBProject

    ' VBProjectに存在する"Module2"の名称を書き変える。
    Obj.VBComponents("Module2").Name = "ModuleX"

    ' オブジェクトを破棄する。
    Set Obj = Nothing

End Sub

このVBAを実行すると、Module2の名称がModuleXに変わります。