2013-11-21 151 views
1

我有几个连接从互联网抓取数据到我的Excel文件。 数据被复制到文件每一次,我得到一个范围的名字,如:Excel VBA删除ExternalData_ *范围名称

ExternalData_1 
ExternalData_2 
... 

我试图与运行查询之前删除这些区域的名称:

Dim nName As Name 

For Each nName In ActiveWorkbook.Names 
    If nName.Name Like "ExternalData*" Then nName.Delete 
Next nName 

但这ISN不删除任何名字,为什么?

+0

检查工作表名称太多。 – nutsch

回答

3

试试这个:

Sub test() 
    Dim nName As Name 

    For Each nName In ActiveWorkbook.Names 
     If Left(nName.Name, 12) = "ExternalData" Then nName.Delete 
    Next nName 
End Sub 
+0

就是这样,它运作良好! –