Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Почему создается две книги? - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Почему создается две книги? (что делаю не так?)
Почему создается две книги?
Michael_S Дата: Пятница, 22.03.2013, 09:47 | Сообщение № 1
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Всем добрый день. Вот кусочек кода
[vba]
Код
Private Sub Workbook_Open()
Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
My_Path_File & "\" & My_File_Name, FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False
End Sub
[/vba] при открытии книги создается новая книга... все нормально, но... когда я потом открываю вновь созданную книгу, то открывается две книги - нужная и пустая (скрин). Как от этого избавится?
К сообщению приложен файл: 7596709.jpg (29.6 Kb)


Сообщение отредактировал Michael_S - Пятница, 22.03.2013, 09:48
 
Ответить
СообщениеВсем добрый день. Вот кусочек кода
[vba]
Код
Private Sub Workbook_Open()
Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
My_Path_File & "\" & My_File_Name, FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False
End Sub
[/vba] при открытии книги создается новая книга... все нормально, но... когда я потом открываю вновь созданную книгу, то открывается две книги - нужная и пустая (скрин). Как от этого избавится?
Автор - Michael_S
Дата добавления - 22.03.2013 в 09:47
RAN Дата: Пятница, 22.03.2013, 09:52 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Потому, что при открытии файла сразу создается новая книга.
Как обойти см. здесь

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеПотому, что при открытии файла сразу создается новая книга.
Как обойти см. здесь
Автор - RAN
Дата добавления - 22.03.2013 в 09:52
Michael_S Дата: Пятница, 22.03.2013, 10:10 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
[vba]
Код
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\Кн1.xlsx", FileFormat:=51
[/vba]
Т.е. мы не создаем книгу, а сохраняем открытую с новым именем без поддержки макросов?.
Что здесь значит "FileFormat:=51"?

Объявление[vba]
Код
Private WithEvents App As Application
[/vba]обязательно?
 
Ответить
Сообщение[vba]
Код
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\Кн1.xlsx", FileFormat:=51
[/vba]
Т.е. мы не создаем книгу, а сохраняем открытую с новым именем без поддержки макросов?.
Что здесь значит "FileFormat:=51"?

Объявление[vba]
Код
Private WithEvents App As Application
[/vba]обязательно?
Автор - Michael_S
Дата добавления - 22.03.2013 в 10:10
RAN Дата: Пятница, 22.03.2013, 10:18 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Если "\Кн1.xlsx" не существует, мы создаем новую книгу, и сохраняем ее как "\Кн1.xlsx", если существует - открываем.
FileFormat:=51 - формат сохранения по умолчанию для вновь созданной книги (для 2007 и ... - xlsx)
(топни F1 на SaveAs )
Цитата (Michael_S)
обязательно?

Обязательно.

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеЕсли "\Кн1.xlsx" не существует, мы создаем новую книгу, и сохраняем ее как "\Кн1.xlsx", если существует - открываем.
FileFormat:=51 - формат сохранения по умолчанию для вновь созданной книги (для 2007 и ... - xlsx)
(топни F1 на SaveAs )
Цитата (Michael_S)
обязательно?

Обязательно.
Автор - RAN
Дата добавления - 22.03.2013 в 10:18
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Почему создается две книги? (что делаю не так?)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!