Ketoan.vn chia sẻ đến bạn đọc 2 cách xóa dòng có điều kiện trong Excel rất đơn giản và nhanh chóng tại bài viết dưới đây. ...

Nếu muốn xóa một/nhiều hàng (theo điều kiện) trong Excel thì bạn sẽ phải mất rất nhiều thời gian để chọn và xóa trong bảng dữ liệu. Cách này cũng rất dễ xảy ra thiếu sót, đặc biệt là với những bảng tính có số lượng dữ liệu lớn. Bài viết này sẽ hướng dẫn 2 cách xóa dòng có điều kiện trong Excel rất đơn giản và nhanh chóng. Mời các bạn đọc bài viết nhé.

xoa dong

Cách 1: Sử dụng Find and Replace

Ngoài tính năng tìm kiếm và thay thế, chức năng Find and Replace còn được sử dụng để xóa dòng có điều kiện trong Excel. Bạn đọc thực hiện như sau:

Bước 1: Chọn vùng dữ liệu có dòng và bạn cần xóa.

Bước 2: Nhấn tổ hợp phím Ctrl + F để mở hộp thoại Find and Replace.

Bước 3: Tại hộp thoại Find and Replace, tại ô Find what nhập giá trị của ô có điều kiện mà bạn muốn xóa, sau đó chọn Find All. Ở ví dụ này ta sẽ xóa các ô có giá trị “sữa béo”.

Bước 4: Nhấn tổ hợp phím Ctrl + A để chọn tất cả các kết quả tìm kiếm được ở cuối hộp thoại Find and Replace. Sau đó đóng hộp thoại lại.

tl2

Bước 5: Nhấn chuột phải vào một trong các ô đã chọn, sau đó chọn Delete, rồi chọn Table Rows.

Như vậy, chỉ với một vài thao tác đơn giản, các dòng chứa giá trị “Sữa béo” đã được xóa khỏi bảng dữ liệu.

tl4

Cách 2: Sử dụng mã VBA

Ngoài chức năng Find and Replace, bạn có thể xóa các dòng có điều kiện bằng sử dụng mã VBA. Bạn đọc thực hiện như sau:

Bước 1: Nhấn tổ hợp phím Alt + F11 để mở cửa sổ Microsoft Visual Basic for applications.

Bước 2: Chọn Insert, sau đó chọn tiếp Module để nhập đoạn mã VBA.

tl6

Bước 3: Nhập đoạn mã sau vào Module, sau đó chọn Run để chạy mã.

Sub DeleteRows()  

‘Updateby20140314  

Dim rng As Range  

Dim InputRng As Range  

Dim DeleteRng As Range  

Dim DeleteStr As String  

xTitleId = “Xoa dong”  

Set InputRng = Application.Selection  

Set InputRng = Application.InputBox(“Range :”, xTitleId, InputRng.Address, Type:=8)  

DeleteStr = Application.InputBox(“Delete Text”, xTitleId, Type:=2)  

For Each rng In InputRng  

If rng.Value = DeleteStr Then  

If DeleteRng Is Nothing Then  

Set DeleteRng = rng  

Else  

Set DeleteRng = Application.Union(DeleteRng, rng)  

End If  

End If  

Next  

DeleteRng.EntireRow.Delete  

End Sub

Bước 4: Khi có hộp thoại xuất hiện, bạn chọn vùng dữ liệu có chứa dòng cần xóa vào ô nhập. Sau đó ấn OK.

tl12

Bước 5: Khi hộp thoại tiếp theo hiện lên, bạn nhập giá trị điều kiện của dòng muốn xóa vào ô. Sau đó ấn OK để hoàn tất.

Như vậy bạn đã hoàn thành xóa các dòng chứa điều kiện trong Excel bằng mã VBA.

Trên đây là 2 cách đơn giản giúp bạn xóa dòng chứa điều kiện trong Excel một cách nhanh chóng và chính xác. Mời bạn đọc tham khảo và áp dụng. Chúc các bạn thành công.

Theo Ketoan

Elite author
We always feel that we can do better and that our best piece is yet to be written.
Tất cả bài viết
BÀI VIẾT MỚI NHẤT