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))
你的逗號寫錯了,應該是點
Tags:錯了大神錯誤
文章版權聲明:除非注明,,否則均為便查問答網原創(chuàng)文章,,轉載或復制請以超鏈接形式并注明出處。