可以在拆分每个新工作表时，将原工作表每一行的字体颜色和填充颜色复制到新工作表中相应的单元格中。

具体修改如下：

1. 在每个新工作表创建后，添加以下代码：

   复制原工作表每一行的字体颜色和填充颜色到新工作表

   for row_num, row in enumerate(sheet.iter_rows(), 1): for col_num, cell in enumerate(row, 1): new_cell = new_sheet.cell(row=row_num, column=col_num) new_cell.font = cell.font new_cell.fill = cell.fill

2. 完整修改后的代码如下：

import openpyxl import os from datetime import datetime from openpyxl import load_workbook from openpyxl.styles import Font, PatternFill

打开Excel文件

wb = openpyxl.load_workbook(r'C:\Users\Administrator\Desktop\工作簿1.xlsx') sheet = wb.worksheets[0]# 获取第一个工作表 sheet.freeze_panes = 'A2'# 冻结A1窗格

获取第二行所有单元格的内容

row2_values = [] for cell in sheet[2]: row2_values.append(cell.value)

获取第一列所有单元格的内容

col1_values = [cell.value for cell in sheet['A']]

排除A1单元格

col1_values = col1_values[1:]

拆分第一列单元格内容到新的工作表

unique_values = set(col1_values) for value in unique_values: count = col1_values.count(value) new_sheet_name = f"{value} ({count} 人)" new_sheet = wb.create_sheet(title=new_sheet_name)

# 在新工作表的第一行插入原工作表A1单元格的内容
new_sheet.insert_rows(1)
for col_num, cell in enumerate(sheet[1], 1):
    new_sheet.cell(row=1, column=col_num, value=cell.value)

# 添加第二行单元格内容到新工作表
new_sheet.append(row2_values)

# 添加第一列单元格内容到新工作表
for row_num, cell_value in enumerate(col1_values):
    if cell_value == value:
        new_sheet.append([cell.value for cell in sheet[row_num + 2]])

# 删除新工作表中的空行
for row in new_sheet.iter_rows():
    if all([cell.value is None for cell in row]):
        new_sheet.delete_rows(row[0].row)

# 复制原工作表每一行的字体颜色和填充颜色到新工作表
for row_num, row in enumerate(sheet.iter_rows(), 1):
    for col_num, cell in enumerate(row, 1):
        new_cell = new_sheet.cell(row=row_num, column=col_num)
        new_cell.font = cell.font
        new_cell.fill = cell.fill

# 合并第一行单元格并居中
num_cols = new_sheet.max_column
new_sheet.merge_cells(start_row=1, start_column=1, end_row=1, end_column=num_cols)
new_sheet.cell(row=1, column=1).alignment = openpyxl.styles.Alignment(horizontal='center', vertical='center')

删除工作表名字为表头（1）人的工作表

if '表头 (1 人)' in wb.sheetnames: wb.remove(wb['表头 (1 人)'])

保存为新的excel文件

wb.save(r'C:\Users\Administrator\Desktop\拆分表格结果.xlsx'