HOME > 即効テクニック > Excel VBA > セル操作関連のテクニック > ブック内に定義されているセル範囲の名前とその参照範囲を表示する

即効テクニック

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

ブック内に定義されているセル範囲の名前とその参照範囲を表示する

(Excel 97/2000)
サンプルマクロは、ブック内に定義されているセル範囲の名前とその参照範囲を表示します。
Excel97とExcel2000では、若干コードが違います。
Sub Sample()

Dim myName As Name
Dim strName As String
    
    For Each myName In Names
        strName = strName & vbCrLf & myName.Name & myName
    Next

    'Excel2000の場合
    If InStr(3, strName, vbCrLf) <> 0 Then
        strName = Mid(strName, InStr(3, strName, vbCrLf) + 2)
        MsgBox strName
    Else
        MsgBox "名前は定義されていません。"
    End If
    
    'Excel97の場合
    'If strName <> vbNullString Then
        'strName = Mid(strName, 2)
        'MsgBox strName
    'Else
        'MsgBox "名前は定義されていません。"
    'End If

End Sub