Как сохранить копию Книги Word?

Статус: Offline
Реєстрація: 25.03.2015
Повідом.: 5868
Как сохранить копию Книги Word?

Hi!

Столкнулся с неожиданной проблемой:
пишу надстройку на VB для Office 2013 и выше в VS2017, - для Excel сделал, думал перенести на Word не составит труда...
Оказалось, что там всё по-другому! Сразу налетел на грабли:

у меня в экселе идёт копирование в резерв открытого документа(даже ещё не сохранённого),
таким образом:

"Globals.ThisAddIn.Application.ActiveWorkbook.SaveCopyAs(directory + fName)"

у ActiveDocument такого метода нет... :(
Собственно вопрос - присоветуйте живые форумы для такого вопроса, которые не померли за 10 лет - на SQL.ru я спросил, там вроде не зомбаки, а вот некогда живой "forumvba.ru" - видать помер уже... :(
Где ещё?

Или - подскажите - как правильно написать, если кто знает? :confused:

Заранее спасибо! :yahoo:
 
Попробуйте метод под неожиданным названием SaveAs2.
Тільки зареєстровані користувачі бачать весь контент у цьому розділі
 
Попробуйте метод под неожиданным названием SaveAs2.
Тільки зареєстровані користувачі бачать весь контент у цьому розділі

В Икселе у класса Workbook есть метод как SaveAs, так и SaveCopyAs, который мне и требуется. Наверное они чем-то отличаются, неожиданно, да?
:confused:
Мне нужна копия на диске открытого Документа, без сохранения его оригинала и, соответственно, без изменения его имени.
Можете помочь?
 
В Икселе у класса Workbook есть метод как SaveAs, так и SaveCopyAs, который мне и требуется. Наверное они чем-то отличаются, неожиданно, да?
:confused:
Мне нужна копия на диске открытого Документа, без сохранения его оригинала и, соответственно, без изменения его имени.
Можете помочь?

Если записать макрос то получится что то вроде

ActiveDocument.SaveAs2 FileName:="33331.docx", FileFormat:= _
wdFormatXMLDocument, LockComments:=False, Password:="", AddToRecentFiles _
:=True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts _
:=False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False, CompatibilityMode:=14
 
Если записать макрос то получится что то вроде

ActiveDocument.SaveAs2 FileName:="33331.docx", FileFormat:= _
wdFormatXMLDocument, LockComments:=False, Password:="", AddToRecentFiles _
:=True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts _
:=False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False, CompatibilityMode:=14

И как этот макрос отвечает поставленной задаче?

В чём фишка?
 
сохраняет текущий активный документ как 33331.docx
 
Назад
Зверху Знизу