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