彩虹台直播:一个关于excel宏的问题

来源:百度文库 编辑:高考问答 时间:2024/04/29 05:03:21
Selection.AutoFilter
Selection.AutoFilter Field:=6, Criteria1:="YT"
Rows("2:242").Select
Selection.Delete Shift:=xlUp
这里选择的是2到242行 如果是全选应该是什么命令啊?
请指教 谢谢!!!
谢谢lizwan!
是选定所有有内容的行,并且不包括第一行。这样该如何操作呢?
internetwinner谢谢理解!
但你那段好象会致卡死哦,把20000改小了也会~

Cells.Select

我看懂了deer8488的意思了,试试这个:
Dim n As Integer
For n = 2 To 20000
If Cells(n, 6).Value = "" Then Exit For
If Cells(n, 6).Value = "YT" Then
Rows(n & ":" & n).Select
Selection.Delete Shift:=xlUp
n = n - 1
End If
Next n

Cells.Select