Excel如何迁移工作表中考试地点相关单元格背景色至其他工作表？

方法1：VBA宏（精准可控） #

直接通过VBA读取源单元格背景色并赋值到目标表，适合需要精准匹配考试地点相关单元格的场景：

1. 按Alt + F11打开VBA编辑器
2. 右键左侧工程面板→插入→模块
3. 粘贴以下代码，根据你的实际需求修改表名、范围和判断规则：

Sub CopyExamLocationColors()
    Dim wsSource As Worksheet, wsTarget As Worksheet
    Dim sourceRange As Range, cell As Range
    Dim targetRow As Integer
    
    ' 替换为你的源/目标工作表名称
    Set wsSource = ThisWorkbook.Worksheets("源工作表")
    Set wsTarget = ThisWorkbook.Worksheets("目标工作表")
    
    ' 替换为考试地点所在的单元格范围
    Set sourceRange = wsSource.Range("A2:D200")
    
    targetRow = 2 ' 目标表起始行
    
    For Each cell In sourceRange
        ' 自定义判断逻辑：识别考试地点相关单元格（示例：包含"考点"关键词或在指定列）
        If InStr(cell.Value, "考点") > 0 Or cell.Column = 2 Then
            ' 复制背景色到目标表对应位置
            wsTarget.Cells(targetRow, cell.Column).Interior.Color = cell.Interior.Color
            ' 如需复制特定值，取消下方注释
            ' wsTarget.Cells(targetRow, cell.Column).Value = cell.Value
        End If
        ' 按行同步目标表行号（可根据实际布局调整）
        If cell.Column = sourceRange.Columns.Count Then
            targetRow = targetRow + 1
        End If
    Next cell
End Sub

4. 修改代码中的工作表名称、源数据范围和判断条件（比如怎么识别考试地点单元格）
5. 按F5运行宏，或回到Excel通过「开发工具→宏」执行

方法2：条件格式匹配（适合规则明确的场景） #

如果考试地点的背景色和内容有固定对应关系（比如"北京考点"对应红色），可以直接用条件格式在目标表套用：

• 选中目标表需要设置格式的单元格范围
• 「开始→条件格式→新建规则→使用公式确定要设置格式的单元格」
• 输入匹配公式，例如=源工作表!A2="北京考点"或=ISNUMBER(SEARCH("考点",源工作表!A2))
• 点击「格式」按钮，设置与源表一致的背景色
• 确定后，目标表会自动匹配源表对应单元格的格式规则

关于Name Manager无效的说明 #

名称管理器仅用于定义单元格范围、常量或公式，本身不具备复制单元格格式的功能，因此无法实现你的需求。

内容的提问来源于stack exchange，提问作者Modern Houses