Home > 即効テクニック > Excel VBA > セル操作関連のテクニック > 定義されているセル範囲の名前を取得し、リストボックスに表示し選択することで、その参照範囲を表示する

即効テクニック
セル操作関連のテクニック

定義されているセル範囲の名前を取得し、リストボックスに表示し選択することで、その参照範囲を表示する

(Excel 97/2000/)
サンプルマクロは、ブック内で名前が定義されているセル範囲の名前をすべて取得し、Userform1のListBox1にそのリストを表示します。また、そのリストを選択するとLabel1に参照範囲を表示します。
(フォームのコードウインド)

Private Sub ListBox1_Change()

    Label1.Caption = Mid(Names(ListBox1.Value).RefersToLocal, 2)

End Sub



Private Sub UserForm_Initialize()

    Dim myName As Name
    
    For Each myName In Names
        ListBox1.AddItem myName.Name
    Next
    
    ListBox1.ListIndex = 0

End Sub