Сохранение листа в новую книгу

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Сохранение листа в новую книгу (Макросы Sub)

ilikeread

Дата: Среда, 04.09.2013, 15:54 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 56

Репутация: 1 ±

Замечаний: 0% ±

Excel 2010

Уважаемые.
Помогите подредактировать кусочек кода чтобы не ругался/
При работе выдаёт сообщение что невозможно сохранить в книге без поддержки макросов и предлагает варианты.
Поможите сделать так чтоб не спрашивал а просто сохранял без поддержки.

[vba]

Код

'Создание сметы отдельным файлом
ActiveSheet.Copy 'копирование листа в новую книгу
ActiveWorkbook.SaveAs "N:\MyDoc\11 КП\" & Name & "_смета" & ".xls" 'Сохранение в нужной папке с нужным именем.
ActiveWorkbook.Close

[/vba]

Ответить

_Boroda_

Дата: Среда, 04.09.2013, 16:07 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16738

Репутация: 6534 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

А так?
[vba]

Код

ActiveWorkbook.SaveAs Filename:="N:\MyDoc\11 КП\" & Name & "_смета" & ".xls", FileFormat:=xlExcel8

[/vba]
Кстати, возможно, Вы не сохранили текущую книгу, в которой макрос пишете. Попробуйте перед запуском макроса сохраниться. Конечно, в xlsm или в xls.

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

ilikeread

Дата: Среда, 04.09.2013, 16:10 | Сообщение № 3

Группа: Пользователи

Ранг: Участник

Сообщений: 56

Репутация: 1 ±

Замечаний: 0% ±

Excel 2010

_Boroda_,

Спасибо , помогло.

Ответить

Сохранение листа в новую книгу (Макросы Sub)

Страница 1 из 1
1