VBA怎样判断单元格填充色为红色

如题所述

With Selection
.WrapText = True '自动换行
.Interior.Color = 65535 '背景 黄
.Font.Name = "黑体" '字体
.Font.Size = 10 '字号
.Font.Color = -16776961 '颜色 红
End With
温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-09-21
if range("a1").interior.colorindex=5 then …………
相似回答
大家正在搜