Sub BatchGenerateContracts()    Dim wdApp As Object    Dim wdDoc As Object    Dim wb As Workbook    Dim ws As Worksheet    Dim lastRow As Long    Dim i As Long    Dim templatePath As String    Dim savePath As String    ' 模板路径和保存路径（务必修改成你自己的）    templatePath = "C:\Templates\contract_template.docx"    savePath = "C:\Contracts\"    ' 当前工作簿和工作表    Set wb = ThisWorkbook    Set ws = wb.Sheets("Sheet1")    ' 创建Word应用    On Error Resume Next    Set wdApp = CreateObject("Word.Application")    If wdApp Is Nothing Then        MsgBox "无法创建Word应用，请确认已安装Microsoft Word。"        Exit Sub    End If    On Error GoTo 0    wdApp.Visible = False ' 后台运行，速度快    ' 找到最后一行    lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row    ' 遍历每一行员工数据    For i = 2 To lastRow        ' 打开模板        Set wdDoc = wdApp.Documents.Open(templatePath)        ' 替换书签内容        With wdDoc.Bookmarks            .Item("bm_id").Range.Text = ws.Cells(i, 1).Value            .Item("bm_name").Range.Text = ws.Cells(i, 2).Value            .Item("bm_dept").Range.Text = ws.Cells(i, 3).Value            .Item("bm_position").Range.Text = ws.Cells(i, 4).Value            .Item("bm_start").Range.Text = Format(ws.Cells(i, 5).Value, "yyyy年mm月dd日")            .Item("bm_years").Range.Text = ws.Cells(i, 6).Value            .Item("bm_salary").Range.Text = ws.Cells(i, 7).Value        End With        ' 保存为新文件        wdDoc.SaveAs2 savePath & ws.Cells(i, 1).Value & "_" & ws.Cells(i, 2).Value & "_劳动合同.docx"        ' 关闭当前文档，不保存模板        wdDoc.Close SaveChanges:=False    Next i    ' 退出Word    wdApp.Quit    Set wdDoc = Nothing    Set wdApp = Nothing    MsgBox "批量生成完成！共生成 " & lastRow - 1 & " 份合同。"End Sub

import pandas as pdfrom docx import Documentimport osfrom datetime import datetime# 路径配置EXCEL_PATH = r"C:\data\employee.xlsx"TEMPLATE_PATH = r"C:\templates\contract_template.docx"SAVE_DIR = r"C:\contracts"# 读取Exceldf = pd.read_excel(EXCEL_PATH)# 确保保存目录存在os.makedirs(SAVE_DIR, exist_ok=True)def replace_text_in_paragraph(paragraph, placeholders):    """    替换单个段落中的占位符    """    for key, value in placeholders.items():        if f"{{{{{key}}}}}" in paragraph.text:            # 保留原有格式            inline = paragraph.runs            for run in inline:                run.text = run.text.replace(f"{{{{{key}}}}}", str(value))def generate_contract(row):    """    生成单个合同    """    doc = Document(TEMPLATE_PATH)    # 构造占位符字典    placeholders = {        "id": str(row["工号"]),        "name": row["姓名"],        "dept": row["部门"],        "position": row["岗位"],        "start": row["入职日期"].strftime("%Y年%m月%d日"),        "years": str(row["合同期限(年)"]),        "salary": f"{row['月薪']:,}"    }    # 遍历所有段落    for para in doc.paragraphs:        replace_text_in_paragraph(para, placeholders)    # 处理表格中的占位符（合同常包含表格）    for table in doc.tables:        for row_table in table.rows:            for cell in row_table.cells:                for para in cell.paragraphs:                    replace_text_in_paragraph(para, placeholders)    # 保存文件    filename = f"{row['工号']}_{row['姓名']}_劳动合同.docx"    filepath = os.path.join(SAVE_DIR, filename)    doc.save(filepath)    print(f"已生成：{filename}")# 批量生成for idx, row in df.iterrows():    generate_contract(row)print("全部合同生成完成。")

if row["合同期限(年)"] >= 3:    placeholders["clause"] = "本合同包含长期服务奖金条款。"else:    placeholders["clause"] = ""

table = doc.tables[0]new_row = table.add_row()new_row.cells[0].text = "加班费"new_row.cells[1].text = "2000"