☰

根据特定值在 Excel 中为单元格着色

tag-icon • tag-icon microsoft-excel
根据特定值在 Excel 中为单元格着色

我在 Excel 中有一个包含 200 个单元格的列表。我输入了姓名，并希望单元格中的文本颜色或单元格的背景根据输入的姓名而变化。我使用了大约 25 个姓名。

答案1

我建议你使用 Excel 的条件格式功能。你可以查看帮助来了解如何操作。你还可以找到各种 记录的例子

例子： SU488776 示例

答案2

条件格式最适合这种情况，但如果您想要 VBA 替代方案，您可以在开发人员选项卡中录制宏，然后在“项目”侧栏中的“模块”下编辑它。然后在ThisWorkbook项目侧栏下将代码放入SheetChange事件中。

您需要更改文本区域上方的两个下拉菜单，左侧菜单需要设置为Workbook（通常为唯一选项），右侧菜单需要设置为SheetChange然后，您可以使用此简单代码设置任意数量的名称。请记住，有很多方法可以做到这一点。

您可以根据需要ElseIf's在if和之间放置任意数量。else

Sub Macro

Dim i As Integer
i = 1

    Range("A" & i).Select

    If ActiveCell = "Name1" Then

        ActiveCell.Interior.ColorIndex = 12

    ElseIf ActiveCell = "Name2" Then

        ActiveCell.Interior.ColorIndex = 4

    ElseIf ActiveCell = "Name2" Then

        ActiveCell.Interior.ColorIndex = 11

    Else 

        ActiveCell.Interior.ColorIndex = 15

    End If

End Sub

在代码中使用 select 并不是最好的编程实践，但这是少量数据，所以没问题。希望这能有所帮助！

相关内容