1、在word中打开VBA 代码窗口
2、请输入下述代码Sub 打开新建关闭保存()Documents.Open ("C:\Users\14830\Desktop\1.do艘早祓胂cx") '打开C:\Users\14830\Desktop文件夹里名字为1的文档Documents.Add '新建一个文档ActiveDocument.SaveAs "C:\Users\14830\Desktop\中国.docx" '新建的文档命名为中国另存到指定的位置C:\Users\14830\Desktop\Selection.TypeText "中国是个好地方" '新建文档的光标处插入中国是个好地方这句话ActiveDocument.Close savechanges:=wdPromptToSaveChanges '关闭这个新建的文档，并询问是否保存中国这个新建文档End Sub
