Question

VB中怎么判断excel中某个单元格的前景色？

Answer 1

VB中判断excel中某个单元格的前景色也就是获取font的颜色。
在excel中，所谓的前景色就是字体颜色，所以获取和设置字体颜色的方法如下：
Sub getForegroundColor() '定义子过程
Dim dData As Range '定义单元格范围
Dim Cell As Range '指定cell范围
Set dData = Sheets("Sheet1").Range("l2:l10000") '赋值范围

For Each Cell In dData.Cells '循环判断
If Cell.Font.Color = 16777215 Then
Cell.offset(,1).Font.Color = 16777215 ’设置颜色
End If
Next
End Sub

Answer 2

可以使用表的事件，在选择的单元格的字体颜色变化。离开后全部变回。

追问

没看懂啊，能具体点吗？

Answer 3

前景色？莫非是文字颜色？

追问

是滴，就是文字颜色，比如红色，绿色啊

追答

Cells(x, y).Font.Color ~~~~