Как запросить диалог сохранения документа Word при открытии файла шаблона?

1075
chemicalpython

Я хотел бы, чтобы диалоговое окно сохранения появилось при первом щелчке по шаблону документа Word (точка), чтобы у него было предложенное местоположение (например, c: \ temp) и имя документа / окончание файла (docx). У меня действительно есть просьба заполнить заголовок документа через fill-inполе после открытия файла шаблона, так что в идеале это можно использовать для предлагаемого заголовка документа.

Я использовал информацию из другого источника, чтобы попытаться предложить пользователю сохранить файл при открытии файла Word шаблона (.dotm). Я получил запрос на сохранение, но он хочет, чтобы я снова сохранил его как файл .dotm вместо желаемого .docx.

Примечание. Использование Word 2016 и ограниченные знания VBA.

Первый пример работает только с Excel, так как Word не разрешает GetSaveAsFilename (см. Строку 3) 

Private Sub Document_New() Application.DisplayAlerts = False fName = Application.GetSaveAsFilename(filefilter:="Excel Files (*.xlsx), *.xlsx") ActiveWorkbook.SaveAs Filename:=fName Application.DisplayAlerts = True  End Sub

Источник 1

Во втором примере есть всплывающее окно сообщения, которое показывает «c: \ temp \ test.docx», но диалог сохранения сохраняется как точка. 

Private Sub Document_New() 'Chemicalpython: changed above from Sub SaveName() Dim strFileName As String Dim StrPath As String 'provide default filename StrPath = "c:\temp\test.docx" With Dialogs(wdDialogFileSaveAs) .Name = StrPath If .Display <> 0 Then strFileName = .Name Else strFileName = "User Cancelled" End If End With MsgBox strFileName 'Chemicalpython: this is the message box End Sub

Источник 2

Желаемый результат: Image : desired outcome

0
Вы не сможете сделать это только с VBA, см. Http://stackoverflow.com/q/5881105/4628637 R3uK 7 лет назад 0
Хорошо, спасибо за информацию! Если я найду хороший способ обойти это и с помощью ссылки, которую вы разместили, я буду обновлять здесь. ура chemicalpython 7 лет назад 1

0 ответов на вопрос

Похожие вопросы