Excel VBA delete ExternalData_ * Имена областей

Question

У меня есть несколько соединений, которые захватывают данные из Интернета в файл Excel. Каждый раз, когда данные копируются в файл, я получаю имя диапазона, как:

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 Не удаляйте ни одного из имен, почему?

Answer 1

Попробуйте вместо этого: имена

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