Sub 新建保存另存()bL1检测VBA
'新建文档bL1检测VBA
Documents.AddbL1检测VBA
'保存[可以保存在原来位置]bL1检测VBA
ActiveDocument.SavebL1检测VBA
'另存为[需要指定位置]bL1检测VBA
ActiveDocument.SaveAs2 "c:\1.docx"bL1检测VBA
'关闭bL1检测VBA
ActiveDocument.ClosebL1检测VBA
End SubbL1检测VBA
bL1检测VBA
Sub 可以搭配使用()bL1检测VBA
'新建文档并另存bL1检测VBA
Documents.Add.SaveAs2 "c:\1.docx"bL1检测VBA
'关闭bL1检测VBA
ActiveDocument.ClosebL1检测VBA
End SubbL1检测VBA
bL1检测VBA
Sub 打开()bL1检测VBA
'打开指定文件【批量打开后面课程会介绍】bL1检测VBA
Documents.Open "c:\1.docx"bL1检测VBA
'在光标位置插入bL1检测VBA
Selection.TypeText "孙兴华"bL1检测VBA
'不保存bL1检测VBA
ActiveDocument.Close savechanges:=wdDoNotSaveChangesbL1检测VBA
End SubbL1检测VBA
bL1检测VBA
bL1检测VBA
其它常用代码：bL1检测VBA
【1】如果活动文档在上次保存后进行了修改，则保存活动文档bL1检测VBA
If ActiveDocument.Saved=False then ActiveDocument.SavebL1检测VBA
【2】保存Documents集合中的每一个文档，但在保存文档时不提示用户bL1检测VBA
Documents.Save Noprompt:=True,OriginalFormat:=wdOriginalDocumentFormatbL1检测VBA
|
参数bL1检测VBA |
中文bL1检测VBA |
|
wdOriginalDocumentFormatbL1检测VBA |
原始文档格式。bL1检测VBA |
|
wdPromptUserbL1检测VBA |
提示用户选择文档格式。bL1检测VBA |
|
wdWordDocumentbL1检测VBA |
Microsoft Word 文档格式。bL1检测VBA |
|
