Answers for "delete empty cells vba"

VBA
1

excel vba delete empty rows

' Deletes empty rows
dim rRange As Range, rowsCount As Long, i As Long
Set rRange = ActiveSheet.Range("A1:B100")
rowsCount = rRange.rows.Count
For i = rowsCount To 1 Step -1
    If WorksheetFunction.CountA(rRanges.rows(i)) = 0 Then 
        rRange.rows(i).Delete
    End If
Next
Posted by: Guest on February-09-2021

Code answers related to "delete empty cells vba"

Code answers related to "VBA"

Browse Popular Code Answers by Language