WordToExcel

https://code.sololearn.com/cKo5De5KFB2A/?ref=app

```

from pathlib import Path #pathlib文档操作模块

from docx import Document #操作DOCX

import xlwings as xw #操作EXCEL

p = Path()

files = p.glob('**/*.docx') #列出指定目录下的所有文件

wb = xw.Book('test1.xlsx') #打开指定工作簿

sht = wb.sheets['Sheet1'] #打开指定工作表

for i in range(1,500):

    for file in files: #for循环列出每个文件

        doc = Document(file) #打开DOCX文件

        table = doc.tables[0] #得到文件的第一个TABLE

        texts = '' #设定变量texts用于存储TABLE内的值

        for j in range(1,len(table.rows)): #for循环取出TABLE内的值

            text = table.cell(j,0).text #取出第j行第0列值

            texts = texts + str(text) #循环存入texts变量

        sht.range(f'e{i}').value = file.stem #将文件名存入EXCEL表E列

        sht.range(f'd{i}').value = texts #将texts变量值存入EXCEL表D列

        break #跳出files循环，进入下一range循环

```