word中替换内容
参考了一篇文章 然后做了如下修改 用python的win32com模块替换word中的文字搞定批量打印奖状
# -*- coding: utf-8-*-
import win32com
from win32com.client import Dispatch
lst = ['zhangsan', 'lisi', 'wangwu']#供替换的字符串
OldStr = 'muban' #模板中要替换的字符串
w = win32com.client.Dispatch('Word.Application')
w.Visible = 0
w.DisplayAlerts = 0
# max = 10
#for i in range(max): # change OldStr to 0-9 range(max)可以改成列表形式 填入要替换的内容
for NewStr in lst:
doc = w.Documents.Open(FileName="C:\\1\\1.doc")#重新开一个模板进行下一次修改
w.Selection.Find.ClearFormatting()
w.Selection.Find.Replacement.ClearFormatting()
# OldStr, NewStr = NewStr, i #没看懂 实测有点问题 这里改了内容后不重新打开模板进行修改而是继续在改动后的内容上进行修改是会有可能出现bug的 为了严谨一些还是重##新打开模板进行修改 另存完毕及时关闭
w.Selection.Find.Execute(OldStr, False, False, False, False, False, True, 1, True, NewStr, 2)
doc.SaveAs('C:\\1\\1\\' + str(NewStr)+'.doc')#另存成另一个表
doc.Close()
# doc.Close()
# w.Documents.Close() #这里close报错 谁能告诉我原因???
w.Quit()