如何为Excel中大型相关矩阵的主对角线设置蓝色填充？

方法一：使用条件格式（无需代码，推荐基础用户） #

• 选中你需要设置格式的整个矩阵区域（比如从A1到Z100）
• 点击菜单栏的开始选项卡，找到条件格式 → 新建规则
• 在弹出的对话框中，选择使用公式确定要设置格式的单元格
• 在为符合此公式的值设置格式输入框中，输入公式：=ROW()=COLUMN()
• 点击格式按钮，切换到填充选项卡，选择你想要的蓝色，点击确定
• 再次点击确定完成设置，此时主对角线的单元格会自动填充蓝色

方法二：使用VBA宏（适合需要批量自动化的场景） #

• 打开你的Excel文件，按下快捷键Alt + F11打开VBA编辑器
• 在编辑器左侧的工程资源管理器中，找到你的工作簿，右键点击 → 插入 → 模块
• 在弹出的空白模块中，粘贴以下代码：

Sub FillDiagonalBlue()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim i As Long
    
    ' 设置要操作的工作表，改成你的实际工作表名称，比如"相关矩阵"
    Set ws = ThisWorkbook.Worksheets("相关矩阵")
    ' 获取矩阵最后一行（假设矩阵从A1开始连续）
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    
    ' 循环填充主对角线
    For i = 1 To lastRow
        ws.Cells(i, i).Interior.Color = RGB(0, 112, 192) ' 标准蓝色，可自行调整RGB值
    Next i
End Sub

• 修改代码中的"相关矩阵"为你实际的工作表名称
• 按下F5键运行宏，或者回到Excel界面，点击开发工具选项卡 → 宏，选择FillDiagonalBlue后点击执行
• 执行完成后，主对角线单元格就会被填充为蓝色

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