请问如何使用vbs修改已存在的word文档并保存？

xiaoyaoke

如题，请问如何能够使用vbs生成word文档并添加内容然后保存，这之间尽量不要弹出确认界面，而且最后还要保存word处在打开状态
望达人解答

hsjzfling

在运行你的vbs脚本前先在进程中关掉所有的winword.exe
或者在QTP中运行systemutil.CloseProcessByName "winword.exe"

至于你写入word的需求偶不是很清楚，以前也没往word中写过东西，刚写了几句也费了点时间，有别的需求楼主就自己添加吧
EditWord "C:\test.doc","51testing"
Function EditWord(filepath,content)
        Set WordApp = CreateObject("Word.Application")
        WordApp.Visible = True
        Set doc = WordApp.Documents.Open(filepath)
        doc.Content = content
        doc.Save
        Set doc = Nothing
        Set WordApp = Nothing
        ReadWord = True
End Function

xiaoyaoke

非常感谢，嘿嘿