Конференция VBStreets

**DDimok** » 06.07.2004 (Вт) 19:29

Народ, есть у меня большая книга (как шаблон для заполнения), люди в ней работают, пишут данные и хорошо бы все эти данные сохранить. Но в книге куча макросов, которые сохранять вовсе не надо. Хочется сохранить два отдельно взятых листа, а вот КАК ? МОжет кто подскажет ?

Заранее благодарен

**corgi** » 06.07.2004 (Вт) 20:35

ну если на этих листах нет макросов то можно так

Код: Выделить всё: Sheets(Array("Лист1", "Лист3")).Select Sheets(Array("Лист1", "Лист3")).Copy ActiveWorkbook.SaveAs filename:= _ "C:\Книга1.xls", FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

**DDimok** » 07.07.2004 (Ср) 14:32

Не-а, так не получится - так он сохраняет ВЕСЬ файл (включая все листы и макросы)

Есть вариант - создать рядом книгу, скопировать туда отдельные листы и сохранить ... Вооот, но это долго и муторно, хотелось просто сохранить отдельные листы ...

**corgi** » 07.07.2004 (Ср) 17:56

странно...
у тебя офис какой?

**DDimok** » 08.07.2004 (Чт) 14:40

Win XP Excel 2002 ...

**corgi** » 08.07.2004 (Чт) 16:40

проверил на 2000 все работает...

**asharky** » 08.07.2004 (Чт) 23:38

corgi писал(а):проверил на 2000 все работает...

На 97-м тоже сохраняет всю книгу :/

Может ещё решение есть?

Конференция VBStreets

А как программно сохранить отдельные листы из книги Екселя ?

А как программно сохранить отдельные листы из книги Екселя ?

Кто сейчас на конференции