サンプルマクロは、ブック内で名前が定義されているセル範囲の名前をすべて取得し、
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