pip install Spire.Doc

from spire.doc import Document, AutoFitBehaviorType, FileFormat, DefaultTableStyle
from spire.xls import Workbook

# 指定文件名
excel_file = "Sample.xlsx"
word_file = "output/ExcelDataToWord.docx"

# 创建 Workbook 实例
workbook = Workbook()
# 加载 Excel 文件
workbook.LoadFromFile(excel_file)

# 获取第一个工作表
sheet = workbook.Worksheets.get_Item(0)
# 获取第一个工作表中已使用的单元格范围
allocatedRange = sheet.AllocatedRange

# 创建 Document 实例
doc = Document()

# 向文档添加节，并在该节中添加表格
section = doc.AddSection()
table = section.AddTable()

# 重置 Word 表格的行数和列数，以匹配 Excel 工作表的行数和列数
table.ResetCells(allocatedRange.RowCount, allocatedRange.ColumnCount)

# 遍历已使用的单元格范围的每一行和每一列
for rowIndex in range(allocatedRange.RowCount):
    # 遍历当前行中的每一列
    for colIndex in range(allocatedRange.ColumnCount):
        # 向 Word 表格添加单元格，并在单元格中添加段落
        cell = table.Rows.get_Item(rowIndex).Cells.get_Item(colIndex)
        paragraph = cell.AddParagraph()
        # 将单元格的值追加到 Word 表格，并设置文本格式
        textRange = paragraph.AppendText(allocatedRange.get_Item(rowIndex + 1, colIndex + 1).NumberText)
        textRange.CharacterFormat.FontName = "HarmonyOS Sans SC"

# 自动调整表格宽度以适应窗口，并应用表格样式
table.AutoFit(AutoFitBehaviorType.AutoFitToWindow)
table.ApplyStyle(DefaultTableStyle.GridTable1LightAccent6)

# 保存 Word 文档
doc.SaveToFile(word_file, FileFormat.Docx2019)

# 释放资源
doc.Dispose()
workbook.Dispose()

from spire.xls import Workbook, HorizontalAlignType, ExcelPatternType, VerticalAlignType
from spire.doc import Document, Color, HorizontalAlignment, VerticalAlignment, PageOrientation, FileFormat

def MergeCells(worksheet, wordTable):
    # 检查是否存在合并单元格
    if not worksheet.HasMergedCells:
        return
    for cell_range in worksheet.MergedCells:
        start_row, start_col = cell_range.Row, cell_range.Column
        row_count, col_count = cell_range.RowCount, cell_range.ColumnCount
        # 处理水平合并
        if col_count > 1:
            for row in range(start_row, start_row + row_count):
                wordTable.ApplyHorizontalMerge(row - 1, start_col - 1, start_col - 1 + col_count - 1)
        # 处理垂直合并
        if row_count > 1:
            wordTable.ApplyVerticalMerge(start_col - 1, start_row - 1, start_row - 1 + row_count - 1)

def CopyFormatting(tableTextRange, excelCell, wordCell):
    # 复制字体样式
    font = excelCell.Style.Font
    tableTextRange.CharacterFormat.TextColor = Color.FromRgb(font.Color.R, font.Color.G, font.Color.B)
    tableTextRange.CharacterFormat.FontSize = float(font.Size)
    tableTextRange.CharacterFormat.FontName = font.FontName
    tableTextRange.CharacterFormat.Bold = font.IsBold
    tableTextRange.CharacterFormat.Italic = font.IsItalic
    # 复制背景颜色
    if excelCell.Style.FillPattern != ExcelPatternType.none:
        wordCell.CellFormat.BackColor = Color.FromRgb(excelCell.Style.Color.R, excelCell.Style.Color.G,
                                                      excelCell.Style.Color.B)
    # 复制水平对齐方式
    hAlignMap = {
        HorizontalAlignType.Left: HorizontalAlignment.Left,
        HorizontalAlignType.Center: HorizontalAlignment.Center,
        HorizontalAlignType.Right: HorizontalAlignment.Right
    }
    if excelCell.HorizontalAlignment in hAlignMap:
        tableTextRange.OwnerParagraph.Format.HorizontalAlignment = hAlignMap[excelCell.HorizontalAlignment]
    # 复制垂直对齐方式
    vAlignMap = {
        VerticalAlignType.Top: VerticalAlignment.Top,
        VerticalAlignType.Center: VerticalAlignment.Middle,
        VerticalAlignType.Bottom: VerticalAlignment.Bottom
    }
    if excelCell.VerticalAlignment in vAlignMap:
        wordCell.CellFormat.VerticalAlignment = vAlignMap[excelCell.VerticalAlignment]

# 指定文件名
excelFileName = "Sample.xlsx"
wordFileName = "output/ExcelDataFormatToWord.docx"

# 创建 Workbook 实例并加载 Excel 文件
workbook = Workbook()
workbook.LoadFromFile(excelFileName)

# 获取工作表
sheet = workbook.Worksheets.get_Item(0)

# 创建 Document 实例
doc = Document()
# 向文档添加节，并设置页面方向
section = doc.AddSection()
section.PageSetup.Orientation = PageOrientation.Landscape

# 向节中添加表格
table = section.AddTable()
# 根据 Excel 工作表的行数和列数设置表格的行列数
table.ResetCells(sheet.LastRow, sheet.LastColumn)

# 执行 MergeCells 方法合并单元格
MergeCells(sheet, table)

# 遍历 Excel 工作表的每一行和每一列
for r in range(1, sheet.LastRow + 1):
    tableRow = table.Rows.get_Item(r - 1)
    tableRow.Height = float(sheet.Rows.get_Item(r - 1).RowHeight)
    for c in range(1, sheet.LastColumn + 1):
        # 获取 Excel 工作表中的单元格和 Word 表格中的单元格
        eCell = sheet.Range.get_Item(r, c)
        wCell = table.Rows.get_Item(r - 1).Cells.get_Item(c - 1)
        # 将单元格的值追加到 Word 表格
        textRange = wCell.AddParagraph().AppendText(eCell.NumberText)
        # 复制单元格格式
        CopyFormatting(textRange, eCell, wCell)

# 保存 Word 文档
doc.SaveToFile(wordFileName, FileFormat.Docx2019)
doc.Dispose()
workbook.Dispose()

from spire.doc import Document, DocPicture, FileFormat, OleObjectType
from spire.xls import Workbook

# 指定文件路径和文件名
excelFileName = "Sample.xlsx"
wordFileName = "output/ExcelOleToWord.docx"
tempImageName = "SheetImage.png"

# 创建 Workbook 实例并加载 Excel 文件
workbook = Workbook()
workbook.LoadFromFile(excelFileName)

# 将第一个工作表保存为图像
sheet = workbook.Worksheets.get_Item(0)
sheet.ToImage(1, 1, sheet.LastRow, sheet.LastColumn).Save(tempImageName)

# 创建 Document 实例以生成 Word 文档
doc = Document()
# 向文档添加节，并在该节中添加段落
section = doc.AddSection()
paragraph = section.AddParagraph()

# 创建 DocPicture 实例并加载图像
pic = DocPicture(doc)
pic.LoadImage(tempImageName)

# 设置图像宽度
pic.Width = section.PageSetup.PageSize.Width - section.PageSetup.Margins.Left - section.PageSetup.Margins.Right

# 将 Excel 文件作为 OLE 对象插入到 Word 文档，并设置已保存的图像作为显示图片
ole = paragraph.AppendOleObject(excelFileName, pic, OleObjectType.ExcelWorksheet)
# 设置为不以图标显示 OLE 对象
ole.DisplayAsIcon = False

# 保存 Word 文档
doc.SaveToFile(wordFileName, FileFormat.Docx2019)
workbook.Dispose()
doc.Dispose()