我收到1004错误,但我不确定原因?
Sub my_script()
Sheets("mysheet").Select
ActiveSheet.Range(Rows(6)).Font.Color = vbWhite
End Sub
答案 0 :(得分:1)
无需Select
工作表就可以修改第6行字体的颜色。
此外,Range(Rows(6))
无效,请使用Rows(6)
。
Sub my_script()
Sheets("mysheet").Rows(6).Font.Color = vbWhite
End Sub