CELLS是列吧。。
我想用rows可以不??
我写了一个。。但他随时都要报错..郁闷。。
Sub shanchu()
For i = 4 To 10
If Rows(i, 1) = Nothing Then
Rows(i, 2).Select
Selection.ClearContents
Rows(i, 3).Select
Selection.ClearContents
Rows(i, 8).Select
Selection.ClearContents
Rows(i, 9).Select
Selection.ClearContents
Rows(i, 11).Select
Selection.ClearContents
Else
End If
Next
End Sub