excel - 如何使用 VBA 更改单元格的格式化字体颜色？

Question

我想根据条件在我的 excel 工作表中选择行，然后编辑同一行中其他单元格的格式。

我知道我可以使用自动过滤器选择行(第 n 列等于“”):

Sub beautify()

Dim rng As Range
Set rng = ActiveSheet.Range("F60:AJ3272")
rng.AutoFilter Field:=4, Field:=4, Criteria1:=""

End Sub 

现在如何将我选择的行的 F 列的字体更改为白色。

Answer 1

您可以使用 VBA 更改单元格的背景颜色，使用 .Interior.ColorIndex = RGB(r, g, b) : red以及带有 .Font.Color = RGB(r, g, b) : red 的单元格内文本的字体颜色
应该定义更改这些属性的范围，就像您在问题中提到的列和您选择的行一样，所以说您选择了 F 列和第 12 行，它应该如下所示:

Range("F12").Font.Color = -4142 

因此，假设您想滚动一列的每一行，并更改每个空白单元格的颜色，您可以做的是:

Dim i As Long

For i = 1 To Rows.Count
'Column F is 6
If Cells(i, 6).Value = "" Then
  Cells(i, 1).Interior.ColorIndex = RGB(150, 0, 0)
Next i