vba里设置读取背景和字体颜色
今天入住博客园,真HAPPY!!!!
记录今天的学习情况 :)
sub readcolor()
cells.interior.pattern=xlnone '清除背景颜色
range(“a1:k30").interior.color="&h00ffff" '设置背景色为黄色
range(“a1:k30").font.color="&h00ffff" ‘设置字体颜色为黄色
range("a1")=range(“a1:k30").interior.color '读取背景色
range("b1")=range(“a1:k30").font.color ’读取字体色
end sub