如何在选择时更改单元格的颜色？

在本文中，您将学习选择任何颜色后如何更改单元格的颜色。我们将使用VBA代码更改颜色。

问题：-当通过VBA代码选择单元格时，我想将选定的单元格颜色更改为B2：E10范围内的蓝色。

以下是我们拥有的数据快照：

img1

===

我们需要执行以下步骤：

单击“开发人员”选项卡。从“代码”组中，选择“ Visual Basic”

img2

  • 在工作表模块中输入以下代码

私有子Worksheet_SelectionChange（按目标的ByVal目标）

Me.Cells.Interior.Color = xlNone

如果不是（相交（目标，范围（“ B2：E10”））不存在），则

ActiveCell.Interior.Color = 15651769

如果

结束

结束子

===

img3

  • 当我们选择B2：E10范围内的任何单元格时，所选单元格将以蓝色突出显示。

img4

  • 如果我们选择其他任何单元格，则该单元格将突出显示。

img5

这样，我们可以在vba中的单元格中填充颜色。