1. 程式人生 > >VBA:設定單元格是否填充單元格顏色

VBA:設定單元格是否填充單元格顏色

Sub lsy()

    Range("f9:f10").Font.ColorIndex = 2
    Range("g9").Font.ColorIndex = 2

    If Range("g10") < 0# Then
    Range("g10").Font.ColorIndex = 3
    Else
    Range("g10").Font.ColorIndex = 2
    End If

End Sub