/VBA/Dlete rows with blanks and space " " vba

Dlete rows with blanks and space " " vba

Dim iCounter As Long
With Application
    .Calculation = xlCalculationManual
    .ScreenUpdating = False
    For iCounter = Selection.Rows.Count To 1 Step -1
        If WorksheetFunction.CountA(Selection.Rows(iCounter)) = 0 Then
            Selection.Rows(iCounter).EntireRow.Delete
        End If
    Next iCounter
    .Calculation = xlCalculationAutomatic
    .ScreenUpdating = True
End With

Source: powerspreadsheets.com

Similar codes

0 vote205 views1 answer
Vba static variable
VBA
1 vote205 views1 answer
Excel vba compare 2 rows
VBA
5 votes236 views1 answer
Excel vba tool to help with refactoring code
VBA
0 vote218 views1 answer
Convert number to minutes in vba
VBA
0 vote202 views1 answer
How to use VBA to add new record in MS Access?
VBA
3 votes223 views1 answer
Vba post request json
VBA
1 vote201 views1 answer
Vba delete array element
VBA
0 vote243 views4 answers
Jwt token vb.net validation
VBA
0 vote221 views1 answer
Vba array of integers
VBA
0 vote213 views1 answer
Excel vba formatconditions range
VBA