如何根据单元格值更改工作表标签的颜色？

如何根据单元格值更改工作表标签的颜色？

通常，您可以在Excel中轻松快速地更改选项卡颜色，但是，您是否曾经尝试过根据工作表中的单元格值更改选项卡颜色？ 如果您对此任务感兴趣，我将为您介绍一些代码，这些代码可让您根据Excel中的特定单元格值为工作表标签着色。

使用VBA代码根据单元格值更改一张标签的颜色

使用VBA代码根据单元格值更改多个工作表标签

例如，我希望如果A1中的单元格值为文本“ TRUE”，则当前工作表标签颜色将为绿色；如果A1中的文本为“ FALSE”，则标签颜色将为红色；如果A1中的文本为“ FALSE”，则标签颜色将为蓝色。单元格AXNUMX中的值是任何其他文本，如以下屏幕截图所示：

1。 右键单击要基于单元格A1中的数据更改其颜色的工作表选项卡，然后选择 查看代码 从上下文菜单。

2。 在 Microsoft Visual Basic应用程序 窗口，将下面的VBA代码复制并粘贴到 模块 窗口。

VBA代码：根据单元格值更改一种工作表标签的颜色：

请注意： 在上面的代码中， A1 是您要根据以下选项为标签上色的单元格引用：真“”假”是您需要的文本，您可以根据需要对其进行更改，还可以根据需要在代码中更改颜色。

3。 然后保存并关闭此代码窗口，现在，当您在单元格A1中输入文本“ True”时，当前标签页颜色将变为绿色，而当您在单元格A1中输入文本“ False”时，标签页颜色将变为红色，如果在单元格A1中输入了其他文本，则标签颜色将自动变为蓝色。

如果您需要根据单元格值更改多个工作表标签的颜色，以下代码也可以为您提供帮助，请执行以下操作：

1。 按住 ALT + F11 键打开 Microsoft Visual Basic应用程序 窗口，在打开的窗口中，双击 的ThisWorkbook 在下面 VBA项目 部分，然后将以下代码复制并粘贴到空白处 模块:

VBA代码：根据单元格值更改多个工作表标签：

请注意： 在上面的代码中， A1 和Master是您要根据其为标签着色的单元格和工作表， Sheet1, Sheet2, Sheet3 是要为选项卡着色的工作表。 韩国电信, 韩国电信, 韩国旅游发展局 是您要为标签上色的A1中的单元格值，您可以根据需要更改代码中的引用和颜色。

2。 然后保存并关闭此代码窗口，现在，当您在主表的单元格A1中输入文本KTE时，Sheet1选项卡将变为红色，当您在单元格A1中输入KTO时，Sheet2将变为绿色，并且当在单元格A1中输入KTW时，Sheet3将变为蓝色，请参见屏幕截图：