Доброго времени суток всем.
Подскажите пожалуйста в вопросе.
На форме есть куча данных, каждая строка данных привязана к определенному листу. Результирующим элементом является checkbox. Если он помечен, то при сохранении данный лист должен будет переносится в новую книгу. Не могу создать условие данного переноса.
На любое первое условие равное true создается новая книга и туда переносится лист. А на втором уже выскакивает ошибка.
Как задать ссылку на созданный лист остальным.
Заранее спасибо за помощь.
Подскажите пожалуйста в вопросе.
На форме есть куча данных, каждая строка данных привязана к определенному листу. Результирующим элементом является checkbox. Если он помечен, то при сохранении данный лист должен будет переносится в новую книгу. Не могу создать условие данного переноса.
Код |
---|
If CheckBox1 = True Then sheets("Анализ1").Copy End If If CheckBox2 = True Then sheets("Анализ2").Copy End If If CheckBox3 = True Then sheets("Анализ3").Copy End If |
Как задать ссылку на созданный лист остальным.
Заранее спасибо за помощь.