Xóa hàng trống - Ví dụ về mã VBA

Mục lục

Xóa hàng trống

Cách rõ ràng để xóa các hàng trống khỏi tập dữ liệu là chỉ cần sắp xếp dữ liệu. Thao tác này sẽ di chuyển các hàng trống xuống cuối dữ liệu và "xóa" chúng. Nhưng điều gì sẽ xảy ra nếu bạn muốn xóa các hàng trống, tuy nhiên bạn không muốn dữ liệu được sắp xếp? VBA.

Macro sau sẽ xóa các hàng trống mà không cần sắp xếp (tắt cập nhật màn hình để chạy nhanh hơn).

Sub DeleteBlankRows () Dim x As Long With ActiveSheet For x = .Cells.SpecialCells (xlCellTypeLastCell) .Row To 1 Step -1 If WorksheetFunction.CountA (.Rows (x)) = 0 Then ActiveSheet.Rows (x) .Delete End If Next End With End Sub

Bạn sẽ giúp sự phát triển của trang web, chia sẻ trang web với bạn bè

wave wave wave wave wave