Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Получить свойства именованных диапазонов книги
 
#1
20.02.2019 10:48:22
Доброго дня!

Такая ситуация, мне необходимо перебрать все имеющиеся именованные диапазоны в книге и получить их свойства. Я попробовал For Each, но не смог получить имя и такой цикл перебирает диапазоны с областью действия sheets(1), как указать все листы?
Код
For Each NM In ThisWorkbook.Sheets(1).Names
     rangeAddress = range(NM).Address 'возвращает диапазон - "$A$10"
     nameAddress = range(NM).Name     'возвращает диапазон - "=Заявка!$A$10"
Next
 
 
 
#2
20.02.2019 11:04:10
Перебрать диапазоны с областью действия "Книга" у меня получилось, но вот получить имя нет.
 
 
 
#3
20.02.2019 11:10:15
Debug.Print NM.Name
 
 
 
#4
20.02.2019 11:10:20
Здравствуйте. Если я правильно понял, надо так:
Код
 nameAddress = NM.Name: Debug.Print nameAddress
Кому решение нужно - тот пример и рисует.
 
 
 
#5
20.02.2019 11:11:33
Код
nameAddress = NM.Name
 
 
 
#6
20.02.2019 11:13:20
Пытливый, vikttur,Kostya_Ye, да, точно, все сработало, спасибо!
Изменено: ALFA - 20.02.2019 11:14:20
 
 
 
#7
20.02.2019 11:26:25
Возник еще вопрос, при таком цикле перебираются не только пользовательские именованные диапазоны? что еще содержится в книге, в контейнере .Names помимо именованных диапазонов листов?
Код
With ThisWorkbook
    For Each NM In .Names
        
        rangeAddress = range(NM).Address
        nameAddress = NM.Name
        
    Next
End With
Изменено: ALFA - 20.02.2019 11:27:22
 
 
 
#8
20.02.2019 11:44:44
К слову нашел циклом имя "_xlfn.SHEETS", но такого в диспетчере имен нет и метода range у этого объекта нет.
 
 
 
#9
20.02.2019 11:45:44
Имена, содежащие вычисления, т.е. именованные формулы
 
 
 
#10
20.02.2019 11:55:12
ALFA,
Гугл говорит, что эти имена Эксель создает для совместимости функций из новых версий со старыми версиями. При переборе в макросе такие имена просто игнорируйте.
 
 
 
#11
20.02.2019 11:57:19
vikttur, Спасибо за инфу.
 
 
 
Страницы: 1
Наверх