Data per baris? Select Column A, pencet F5, pilih special Blanks, Lalu Ok
pencet Ctrl - untuk delete row
atau pake macro:
Sub DelEmptyRow
Dim NextRow As Long, FirstRow As Long, LastRow As Long, Lrow As Long
With ActiveSheet
NextRow = .Cells(.Rows.Count, "A").End(xlUp).Row
.Select
FirstRow = 4
LastRow = NextRow
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.calculation = xlmanual
For Lrow = LastRow To FirstRow Step -1
If Lrow.Value = "" Then
.EntireRow.Delete
End If
Next Lrow
End With
Application.screenupdating = true
Application.calculation = xlAutomatic
Application.DisplayAlerts = False
Cells(1,1).select
End Sub
Yahoo! Toolbar kini dilengkapi Anti-Virus dan Anti-Adware gratis.
Download Yahoo! Toolbar sekarang.
http://id.toolbar.yahoo.com
