使用VBA匹配单元格与另一个单元格的颜色

Question

我需要编写一些VBA代码，以便，如果我将其分配给命令按钮，通过单击它我应该能够匹配单元格C11和单元格C4的颜色。

假设我将C11的颜色更改为红色，通过单击命令按钮或自动将C4的颜色更改为红色。

有人可以帮我这个吗？

Answer 1

以下代码将颜色值从单元格“C11”复制到单元格“C4”：

Range("C4").Interior.Color = Range("C11").Interior.Color

只要您使用有效的Range-Objects，就可以使用不同的类型来满足您的需求。例如，活动选择（至少一个或多个单元格）：

Selection.Interior.Color = Range("C11").Interior.Color