V

【VBA】判断某单元格为空,删除所在行,光标上移

肉松 笔记 2019-10-27
Sub xuanzexx()

Dim i As Integer
For i = 135 To 4 Step -1
    If Cells(i, 11) = "" Then
        Rows(i).Select
        Selection.Delete Shift:=xlUp
    End If
Next i

End Sub
PREV
Everything的使用技巧
NEXT
【VBA】excel中 #N/A = Error 2042

评论(0)

发布评论