如何检查Excel中是否存在某个特定的区域名称？

在运行某些VBA脚本之前，您可能需要检查当前工作簿中是否存在命名区域。本文提供的VBA代码可以帮助您快速检查Excel中是否存在某个特定的区域名称。

使用VBA代码检查是否存在某个特定的区域名称

使用VBA代码检查是否存在某个特定的区域名称

您可以运行以下VBA代码来快速检查当前工作簿中是否存在某个特定的区域名称。

1. 同时按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 在 Microsoft Visual Basic for Applications 窗口中，点击 插入 > 模块。然后复制并将以下VBA代码粘贴到窗口中。

VBA代码：检查Excel中是否存在某个特定的区域

Sub CheckRanges()
    Dim chkRange As Range
    Dim areasName(2) As String
    Dim chkCnt As Long
    Dim i As Integer
    areasName(0) = "new"
    areasName(1) = "MyRange"
    areasName(2) = "Range2"
  
    Application.ScreenUpdating = False
    For i = 0 To 2
        On Error Resume Next
        chkCnt = Len(ThisWorkbook.Names(areasName(i)).Name)
        On Error GoTo 0
         
        If chkCnt <> 0 Then
            Set chkRange = Range(areasName(i))
            MsgBox "This Range: '" & areasName(i) & "' DOES exist!", vbInformation, "Kutools for Excel"
            chkCnt = 0
        Else
            MsgBox "This Range: '" & areasName(i) & "' does NOT exist!", vbInformation, "Kutools for Excel"
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

备注：

3. 按下 F5 键运行代码。随后会弹出 Kutools for Excel 对话框，告诉您指定的区域名称是否存在，请依次点击 确定 按钮关闭对话框。请参见截图：

相关文章：

• 如何检查单元格中的第一个字符是字母还是数字？
• 如何检查单元格值是否介于两个值之间？
• 如何检查单元格是否以特定字符开头或结尾？