| |
|
|
| | Добрый день!
Нужно определить, к какому листу принадлежит выполняемый макрос. Затем название листа передается общей функции обработки, которая хранится в отдельном модуле.
Я нашел временное решение проблемы добавив к модулю каждого листа константу, имеющую значение названия листа.
Private Const csMe As String = "CC"
Затем вызываем
Call FormatSheet(csMe)
Но такой подход не работает, если листы копировать или переименовывать. 
Может есть какие-нибудь идеи??? | |
| |
| |
| |
|
|
| | ActiveSheet.Name - возвращает имя текущего листа.
В вашем случае -
Call FormatSheet(ActiveSheet.Name ) | |
| |
| |
| |
|
|
| | А лист, которому принадлежит макрос, не обязательно активен.
Например событие Update при запуске RefreshAll срабатывает для всех pivotTable. | |
| |
| |
| |
|
|
| | TrueLove, Используя нижеопубликованный вариант Вы всегда сможете получить имя необходимого листа(рабочий лист или лист диаграммы) :
FormatSheet Me.Name 'FormatSheet Name
|
| |
| |
| |
| |
|
|
| | pashulka
Спасибо!
То, что надо!!! | |
| |
| |
|
|
| |
|
|
| | Ребят , не знаю где это спросить вроде тему новую тоже создавать не хочется... Вопрос такой как сделать что бы при копировании из редактора VBA например на этот замечательный сайт, кириллические символы не искажались ? | |
| |
| |
| |
|
|
| | раскладка клавы д.б. переключена на РУС | |
| |
| |
| |
|
|
| | >раскладка клавы д.б. переключена на РУС
понял, спасибо Дрюня | |
| |
| |
