Function cc()
Dim rng As Range
For Each rng In Range(“A1:G10”)
If rng.Interior.Color = RGB(255, 255, 0) Then
cc = 1 + cc
End If
Next rng
End Function
vba数颜色代码
原文地址:https://www.cnblogs.com/yukit/p/14046144.html
hmoban主题是根据ripro二开的主题,极致后台体验,无插件,集成会员系统
自学咖网 »
vba数颜色代码