将word版题库转换为Excel版

1、先观察word版题库，去掉大题题目，所有题目必须都是选择题，都有选项和答案。
  确保没有空行，每个选项的格式一样。题目、选项和答案分别一行，答案在每个题目的最后一行。每个选项一行，换行符不能是手动换行符。看一看最多有几个选项，假设最多的有5个选项。

2、需要的包：
import docx
import xlwt

docx和xlwt需要先安装。

3、代码如下：
第一列没有写入内容，最后自己加上序号。


tiKu = "题库.docx"#文件路径
count = 0   #用于Excel统计换行

doc = docx.Document(tiKu) #打开word题库
wbk = xlwt.Workbook()  #打开Excel，先自己新建一个Excel，命名为题库。
sheet = wbk.add_sheet('sheet 1' , cell_overwrite_ok=True)#工作表1

for para in doc.paragraphs:#按行读取word文档
if 'A.' in para.text:
sheet.write(count,2,para.text)    #第3列写入内容
elif 'B.' in para.text:
sheet.write(count, 3, para.text)  # 第4列写入内容
elif 'C.' in para.text:
sheet.write(count, 4, para.text)  # 第5列写入内容
elif 'D.' in para.text:
sheet.write(count, 5, para.text)  #第6列写入内容
elif 'E.' in para.text:
sheet.write(count, 6, para.text)  # 第7列写入内容
elif '答案' in para.text:
sheet.write(count, 7, para.text)  # 第8列写入内
count = count + 1        #进入下一行
else:
sheet.write(count, 1, para.text)  # 第2列写入内容
wbk.save('题库.xls')