Страницы: 1
RSS
запустить макрос на каждом листе, запускаем макрос на каждому листке, кроме текущего.
 
добрый вечер!
Есть n-ное кол-во листов и открытый текущий лист (Лист1).
Есть макрос отлично работающий по каждому отдельному листу.
как запустить его по всем листам кроме текущего (Лист1)?

буду благодарен за помощь!  
 
Цитата
Денис Иванов написал:
Есть n-ное кол-во листов и открытый текущий лист (Лист1).
Хорошо
Цитата
Денис Иванов написал:
Есть макрос отлично работающий по каждому отдельному листу.
Отлмчно
Цитата
Денис Иванов написал:
как запустить его по всем листам кроме текущего (Лист1)?
Отредактировать
 
Код
Sub Main
  dim ws as worksheet
  for each ws in worksheets
    if ws.name <> "Лист1" then МакросОтличноРаботающийПоОтдельномуЛисту ws 
  next
end Sub

Sub МакросОтличноРаботающийПоОтдельномуЛисту(ws as worksheet)
   ' тут макрос может свирепствовать в данных листа ws, как тиф в гражданскую на Поволжье
End sub
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Страницы: 1
Наверх