python办公自动化（win32com）：把excel每个sheet内容复制到word指定的位置

import os
from win32com.client import Dispatch
excel = Dispatch("ket.Application")
excel.Visible = False

doc_app = Dispatch("kwps.Application")
doc_app.Visible = True
doc = doc_app.Documents.Open(r'C:\Users\meiya\PycharmProjects\copyExcelToWord_V2\产品规格说明书模板(1).docx')
parag_range = doc.Range(0, 0)  # 插入标题的开始位置

#  实现了在指定位置复制粘贴的功能
filename = "基础信息" + '-' + "检测点管理功能"+'.xlsx'
filepath = os.path.join(os.path.dirname(__file__),filename)
copy_wb = excel.Workbooks.Open(filepath)
for copy_sheet in copy_wb.Worksheets:
    parag = doc.Paragraphs.Add(Range=parag_range)  # 添加新段落
    parag_range = parag.Range
    parag_range.InsertBefore("这是标题")
    parag2 = doc.Paragraphs.Add(Range=parag_range)  # 添加新段落
    parag_range = parag2.Range
    copy_sheet.UsedRange.Cells.Copy()
    parag_range.PasteExcelTable(False, False, True)


copy_wb.Close()
excel.Quit()
doc.Save()
doc.Close()
doc_app.Quit()