Показать сообщение отдельно
Старый 13.03.2013, 14:36   #90
sparkfire
Местный
 
Аватар для sparkfire
 
Регистрация: 01.06.2012
Адрес: Санкт Петербург
Сообщений: 191
Сказал(а) спасибо: 403
Поблагодарили 392 раз(а) в 113 сообщениях
Вес репутации: 283
sparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всемsparkfire - это имя известно всем
По умолчанию

Вопрос следующий:
Исходные данные-
а.моя таблица для расчетов(достаточно объемная для сохранения каждого расчета)
б. Необходимость сохранять данные из нее, не все, но несколько листов.
в.Часть кода(нарыл в сети):
Код:
ThisWorkbook.Worksheets(1).Copy
 ActiveWorkbook.SaveAs "D:\1.xls"
Насколько я понял- макрос сохраняет текущий лист в новый файл, с названием 1.xls
Теперь вопрос, как сохранять сразу несколько листов( например первый, третий и пятый), что нужно поменять в макросе, чтоб он сохранялся каждый раз с новым названием, например- "Расчет мебели от 13 марта- номер 1", если дата будет прописана в таблице формулой "сегодня()", а номер выставляется по порядку.
sparkfire вне форума   Ответить с цитированием Вверх