要保留原工作表每一行的字体颜色和填充颜色，需要在拆分新工作表时，将原工作表每一行的样式应用到新工作表相应的行上。可以使用openpyxl.styles库中的copy函数来复制样式。修改后的代码如下：

import openpyxl import os from datetime import datetime from openpyxl import load_workbook from openpyxl.styles import copy, 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 = [] row2_styles = [] for cell in sheet[2]: row2_values.append(cell.value) row2_styles.append(cell.style)

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

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_cell = new_sheet.cell(row=1, column=col_num, value=cell.value)
    new_cell.font = copy(cell.font)
    new_cell.fill = copy(cell.fill)

# 添加第二行单元格内容和样式到新工作表
for col_num, cell_value in enumerate(row2_values, 1):
    new_cell = new_sheet.cell(row=2, column=col_num, value=cell_value)
    new_cell.style = row2_styles[col_num - 1]

# 添加第一列单元格内容和样式到新工作表
for row_num, cell_value in enumerate(col1_values, 1):
    if cell_value == value:
        new_row = [cell.value for cell in sheet[row_num + 1]]
        new_sheet.append(new_row)
        for col_num, cell in enumerate(sheet[row_num + 1], 1):
            new_cell = new_sheet.cell(row=row_num + 2, column=col_num)
            new_cell.font = copy(cell.font)
            new_cell.fill = copy(cell.fill)

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

# 合并第一行单元格并居中
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'