Xóa dòng trống trắng trong Excel bằng VBA Marco 2007 2010 2013

Forever Alone · 8/10/14

Xóa dòng trống trắng trong Excel bằng VBA Marco 2007 2010 2013

Marco là 1 chức năng cao cấp trong Excel giúp bạn có thể xử lý văn bản mạnh mẽ hơn, sử dụng chức năng này các bạn làm như sau:

Nhấn Ctrl + F11 để hiển thị Microsoft Visual basic for application --> Insert --> Module

Copy và dòng các hàm marco dưới đây vào, sau đó chọn Sheet văn bản mà bạn muốn xử lý --> Click vào nút Play màu xanh trên thanh công cụ --> Chọn Run --> Xong

Hàm Marco xóa tất cả những dòng trống trong Excel bằng cách sử dụng Marco.

Sub DeleteBlankRows1()

Dim i As Long
With Application

.Calculation = xlCalculationManual

.ScreenUpdating = False

For i = Selection.Rows.Count To 1 Step -1

If WorksheetFunction.CountA(Selection.Rows(i)) = 0 Then

Selection.Rows(i).EntireRow.Delete

End If

Next i
.Calculation = xlCalculationAutomatic

.ScreenUpdating = True

End With

End Sub

Xóa dòng trống trắng trong Excel bằng VBA Marco 2007 2010 2013

Bài viết mới nhất

Thống kê

Bài viết được quan tâm nhiều