我有一個啟用宏的 word 檔案，每次我按下用戶表單上的某個命令按鈕時，我都想在網路上的其他位置制作我的檔案的無宏備份副本。我不想使用“.SaveAs2”，因為在我點擊命令按鈕后我仍然想在啟用宏的檔案中。
在 Excel 中，我們有這個解決方法，您可以在啟用宏的 excel 檔案上使用“sheets.copy”復制所有作業表，然后使用“ActiveWorkbook.SaveAs”方法將新創建的作業簿（現在是一個無宏的作業簿）保存在您想要的任何位置.
uj5u.com熱心網友回復：
嘗試這個。
Sub Word_CopyFileBasedOnActiveDocument()
Dim wDoc As Word.Document: Set wDoc = ActiveDocument
Dim wTmp As Word.Document
' Create a new document based on the active document
Set wTmp = Application.Documents.Add(Template:=wDoc.FullName, Visible:=False)
' Save as non macro enabled
wTmp.SaveAs2 Filename:=wDoc.Path & "\newFile.doc", FileFormat:=wdFormatXMLDocument
' Close file
wTmp.Close False
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/338053.html