重写文档

命令说明

将内容写入到 Word 文档，会覆盖原有的内容

命令原型

Word.WriteAll(objWord,sText)

命令参数

参数	必选	类型	默认值	说明
objWord	True	expression	objWord	Word 文档对象
sText	True	string	""	写入内容

运行实例

/*********************************重写文档***************************************
命令原型：
     Word.WriteAll(objWord,sText)
入参：
    objWord--Word 文档对象
    sText--写入内容
出参:
    无
注意事项:
    需要打开word后才能使用  
*********************************************************************************/
Dim objWord
objWord = Word.Open('''C:\Users\Administrator\Desktop\标准化执行注意事项.docx''',"","",true)
//读取该文档所有内容
sRet = Word.ReadAll(objWord)
//打印该文档所有内容
TracePrint($PrevResult)
//用"踩踩踩踩踩\\n1.哇.\\n2.哇\\n3.滴滴滴"覆盖该文档所有内容
Word.WriteAll(objWord,"踩踩踩踩踩\\n1.哇.\\n2.哇\\n3.滴滴滴")
//读取该文档所有内容
sRet = Word.ReadAll(objWord)
//打印该文档所有内容
TracePrint($PrevResult)

可视化样例