一运行就编译错误,请教大神哪里错了?感谢!
Sub 找出不及格标注红色()Dim ss As RangeFor Each ss In Range("a2", Cells(Rows, Count, l).End(xlUp)) If ***.value < 60 Then ss.***.colorindex = 3 End IfNext ssEnd Sub
正确的
For Each ss In Range("a2", Cells(***.count, 1).End(xlUp))
你的逗号写错了,应该是点
下一篇:神奇代码岛做地图如何设置名字
上一篇:为何多数显示器的外观为黑色
热门标签: