Кодовое имя листа

Пользователь

Сообщений: 177 Регистрация: 01.01.1970

26.11.2015 22:57:35

Приветствую!

Скажите пож. как сделать тоже самое, только обращаясь не к названию листа а к кодовому имени?

Код
Range("B3").Value = _ ActiveWorkbook.Sheets("Название1").Cells(Rows.Count, "A").End(xlUp).Offset(1, 5).Value

Кодовое имя листа на пример Лист8

Пользователь

Сообщений: 14895 Регистрация: 15.09.2012

Профессиональная разработка приложений для MS Office

26.11.2015 23:00:17

Код
Range("B3").Value = _ Кодовое_имя.Cells(Rows.Count, "A").End(xlUp).Offset(1, 5).Value

Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...

Hugo Пользователь Сообщений: 23800 Регистрация: 22.12.2012	#3 26.11.2015 23:07:08 Советую кодовое имя придумать самому Т.е. переименовать лист.

Александр.М Пользователь Сообщений: 177 Регистрация: 01.01.1970	#4 26.11.2015 23:25:13 Ребята спасибо! Всегда помогаете! Hugo - не смог пока что найти где переименовать, в Project в свойствах "Remove" подсвечено и не кликабельно

Пользователь

Сообщений: 14895 Регистрация: 15.09.2012

Профессиональная разработка приложений для MS Office

26.11.2015 23:29:38

Цитата
Александр.М написал: в Project в свойствах "Remove"

А с каких пор Remove стало означать переименование? Кликаете на лист и ищете свойство (Name). Оно как правило в самом верху окна свойств объекта.

Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...

Hugo Пользователь Сообщений: 23800 Регистрация: 22.12.2012	#6 26.11.2015 23:31:06 Всегда в проекте в свойствах листа Name менялось... Не знаю что там за Remove... Можно посмотреть?

Александр.М Пользователь Сообщений: 177 Регистрация: 01.01.1970	#7 26.11.2015 23:36:03