Всем привет 👋, извините, но тупо не могу догнать, никак не построю конструкцию: нужно пробежаться по всем листам книги и если среди них нет листа с именем, допустим "имя_1" выполнить условие (скопировать лист "образец" и назвать его "имя_1"). Как скопировать и переименовать лист не проблема, а вот как не допустить задвоения листов 🤯. Делать через ошибку? А как? Или есть более изящный способ.
Если нет листа с нужным именем, копировать лист-образец и переименовать
10.09.2020 18:07:52
|
|
|
|
10.09.2020 18:11:22
да, через ошибку. Присвойте переменной лист (Set Sht = Worksheets("имя_1") ) и если нет ошибки, то удаляйте этот лист
Я иногда делаю проверку на наличие листа так
Изменено: |
|||
|
|
10.09.2020 18:28:45
А немного начал понимать, попробую.
Я вот ещё что сейчас задумался, не дай боже круглые тезки 😁
Изменено: |
|
|
|
10.09.2020 18:39:49
Или в процессе. Но я бы пробежался сперва, сообщил, пускай юзер думает что делать.
Изменено: |
|||
|
|
10.09.2020 21:14:14
New, спасибо за помощь, но все равно есть проблема, я работаю с двумя разными книгами.
Пытался так:
Расширил функцию, но все равно не. А ещё, я использую несколько вариантов вызрва процедуры копирования листов: из выбранного диапазона, двойной клик по ячейке и из формы (переменные берутся из текст боксов), поэтому отдельная процедура. Зы. Конечно код "индийский", но я не профессионал, а это больше хобби |
|||
|
|
10.09.2020 21:22:48
я без вашего файла плохо понимаю, что вы делаете в своём коде, а так же не понял в чём сейчас у вас проблема. Вы вроде проверяете наличие листа в нужной вам книге. В чём сейчас ошибка?
И ещё вопрос - вы понимаете, что это 2 одинаковых цикла?
|
|||
|
|
10.09.2020 21:40:08
Ан нет, переделал, спс.
|
|
|
|
10.09.2020 21:42:55
)) ничего не понял. Ваш вопрос решён ?)
Изменено: |
|
|
|
10.09.2020 21:43:18
Да, решено. и все как надо заработало
|
||||
|
|
|||