HOME > 即効テクニック > Excel VBA > セル操作関連のテクニック > 名前付きセル範囲の参照範囲を表示する

名前付きセル範囲の参照範囲を表示する|Excel VBA

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

名前付きセル範囲の参照範囲を表示する

(Excel 97/2000/2002/2003/2007/2010)

次のサンプルは、ブック内で定義されているセル範囲の名前をすべて取得し、Userform1のListBox1に表示します。
また、リストからセル範囲を選択するとLabel1にその参照範囲を表示します。

(フォームモジュール)
Option Explicit
Private Sub UserForm_Initialize()
    Dim myName As Name
    
    For Each myName In Names
        ListBox1.AddItem myName.Name
    Next
    ListBox1.ListIndex = 0 '1行目を選択
End Sub

Private Sub ListBox1_Change()
    Label1.Caption = Mid(Names(ListBox1.Value).RefersToLocal, 2)
End Sub