版本:Microsoft Office 2007
本人为刚接触VBA新手
目前使用录制宏
录制<格式化条件>
程式如下
Range("B4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlBetween, _
Formula1:="=100", Formula2:="=50"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 5296274
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
上面表示选取范围储存格内数字介于50~100，底色变为浅绿色
这边有个疑问想请教!
如何下判断，当范围内皆为浅绿色跳出MSGBOX显示"OK"
以下为自己写的判断式(下列皆无法有效判断)
If Range("B4").Interior.Color = RGB(146, 208, 80) Then
MsgBox "OK"
End If