import win32com.client # 导入脚本模块
WordApp = win32com.client.Dispatch("Word.Application") # 载入WORD模块
WordApp.Visible = True # 显示Word应用程序
# 打开新的文件
doc = WordApp.Documents.Open("D:\\11.doc")
sel.TypeText(" 我我我我我")
import win32com
from win32com.client import Dispatch, constants
w = win32com.client.Dispatch('Word.Application')
# 或者使用下面的方法，使用启动独立的进程：
# w = win32com.client.DispatchEx('Word.Application')
# 后台运行，不显示，不警告
w.Visible = 0
w.DisplayAlerts = 0
# 打开新的文件
doc = w.Documents.Open("C:\\Users\\Administrator\\Desktop\\信贷报告(1)\\修改\\2附件3：信贷报告（简洁版） -友润.doc")
# worddoc = w.Documents.Add() # 创建新的文档
OldStr= '中国工商银行'
NewStr= '五、处置思路 若能成功收购本债权，项目组应积极寻找潜在买受人，争取抵押物早日拍卖，积极挖掘保证人财产线索，尽可能回收。 六、估值情况'
w.Selection.Find.Execute(OldStr, False, False, False, False, False, True, 1, True, NewStr, 2)
w.Save()
# 关闭word
w.Close()
sel = WordApp.Selection # 获取Selection对象
sel.TypeText(" 我我我我我")
import win32com.client
# 加载应用
app=win32com.client.Dispatch('Word.Application')
# 打开文件，经测试要是绝对路径
doc=app.Documents.Open("C:\\Users\\Administrator\\Desktop\\信贷报告(1)\\修改\\2附件3：信贷报告（简洁版） -友润.doc")
# worddoc = w.Documents.Add() # 创建新的文档
# ‘1111’为查找目标，‘abcd’为替换为的字符
doc.Content.Find.Execute(FindText=u'中国工商银行', ReplaceWith=u'abcd', Replace=2, Wrap=1)
# 保存，如果只有一种替换，这不是必须的，有两种替换要先保存第一种
doc.Save()
# 关闭word
doc.Close()
