快捷導(dǎo)航

Python操作Word批量生成文章的方法

更新時(shí)間：2015年07月28日 17:48:21 投稿：mrr

這篇文章主要介紹了Python操作Word批量生成文章的方法,需要的朋友可以參考下

下面通過COM讓Python與Word建立連接實(shí)現(xiàn)Python操作Word批量生成文章，具體介紹請(qǐng)看下文：

需要做一些會(huì)議記錄?？偣灿卸嗌倌?？五個(gè)地點(diǎn)x7個(gè)月份x每月4篇=140篇。雖然不很重要，但是140篇記錄完全雷同也不好。大體看了一下，此類的記錄大致分為四段。于是決定每段提供四種選項(xiàng)，每段從四選項(xiàng)里隨機(jī)選一項(xiàng)，拼湊成四段文字，存成一個(gè)文件。而且要打印出來，所以準(zhǔn)備生成一個(gè)140頁的Word文檔，每頁一篇。

需要用到win32com模塊(下載鏈接： http://sourceforge.net/projects/pywin32/files/ )，

通過COM讓Python與Word建立連接。代碼如下：

# -*- coding: cp936 -*-
#導(dǎo)入隨機(jī)數(shù)模塊
import random
#導(dǎo)入win32com模塊,用來操作Word
import win32com 
from win32com.client import Dispatch, constants
#創(chuàng)建新的WORD文檔
w = win32com.client.Dispatch('Word.Application')
w.Visible = 0#0表示在后臺(tái)操作。設(shè)為1則在前端能看到Word界面。
w.DisplayAlerts = 0#不顯示警告
doc = w.Documents.Add()
#準(zhǔn)備對(duì)文檔頭部進(jìn)行操作
myRange = doc.Range(0,0)#從第0行第0個(gè)字開始：
myRange.Style.Font.Name = "宋體"#設(shè)置字體
myRange.Style.Font.Size = "16"#設(shè)置為三號(hào)
#========以下為文章的內(nèi)容部分=======
#文章標(biāo)題（用\n來控制文字的換行操作）
title='XXXXX會(huì)\n會(huì)議時(shí)間: '
#會(huì)議時(shí)間
timelist=['1月9日','1月16日','1月23日','1月30日',
 '2月6日','2月13日','2月20日','2月27日',
 '3月6日','3月13日','3月20日','3月27日',
 '4月3日','4月10日','4月17日','4月24日',
 '5月8日','5月15日','5月22日','5月29日',
 '6月5日','6月12日','6月19日','6月26日',
 '7月3日','7月10日','7月17日','7月24日'
 ]
#會(huì)議地點(diǎn)
addrlist=['\n會(huì)議地點(diǎn): 地點(diǎn)AXXX\n主持人: 張X\n',
 '\n會(huì)議地點(diǎn): 地點(diǎn)BXXXX主持人: 吳X\n',
 '\n會(huì)議地點(diǎn): 地點(diǎn)CXXXX\n主持人: 王X\n',
 '\n會(huì)議地點(diǎn): 地點(diǎn)DXXXX\n主持人: 冉X\n',
 '\n會(huì)議地點(diǎn): 地點(diǎn)EXXXX\n主持人: 李X\n',
 ]
#參加人員
member='參加人員: XXX,XXX,XXX,XXX,XXX,XXX,XXX。\n會(huì)議內(nèi)容：\n '
#四段文字
list1=['第一段(A型)\n','第一段(B型)\n','第一段(C型)\n','第一段(D型)\n']
list2=['第二段(A型)\n','第二段(B型)\n','第二段(C型)\n','第二段(D型)\n']
list3=['第三段(A型)\n','第三段(B型)\n','第三段(C型)\n','第三段(D型)\n']
list4=['第四段(A型)\n','第四段(B型)\n','第四段(C型)\n','第四段(D型)\n']
#開始循環(huán)操作，往Word里面寫文字
 #先開始遍歷地點(diǎn)（A,B,C,D,E四個(gè)地區(qū)）
for addr in addrlist:
 #遍歷28個(gè)日期
 for time in timelist:
 #隨機(jī)生成四個(gè)數(shù)（范圍0-3）
 aa=random.randint(0,3)
 bb=random.randint(0,3)
 cc=random.randint(0,3)
 dd=random.randint(0,3)
 #從文件開頭依次插入標(biāo)題、時(shí)間、地點(diǎn)、人物
 myRange.InsertAfter(title)
 myRange.InsertAfter(time)
 myRange.InsertAfter(addr)
 myRange.InsertAfter(str3)
 #在后面繼續(xù)添加隨機(jī)選取的四段文字
 myRange.InsertAfter(list1[aa])
 myRange.InsertAfter(list2[bb])
 myRange.InsertAfter(list3[cc])
 myRange.InsertAfter(list4[dd])
#循環(huán)完畢，保存為 D:\d.doc
doc.SaveAs(r'D:\d.doc')
#退出操作
doc.Close()
w.Quit()

最終結(jié)果如圖：

================================================================