Hướng dẫn how do i delete rows in excel based on cell value in vba? - làm cách nào để xóa các hàng trong excel dựa trên giá trị ô trong vba?

Trong bài viết này

  • Xóa toàn bộ hàng hoặc cột
    • Xóa nhiều hàng hoặc cột
  • Xóa các hàng trống / trống
    • Xóa hàng nếu ô trống
  • Xóa hàng dựa trên giá trị ô
  • Thêm các ví dụ về hàng và cột xóa
    • Xóa các hàng trùng lặp
    • Xóa các hàng bảng
    • Xóa các hàng được lọc
    • Xóa hàng trong phạm vi
    • Xóa các hàng đã chọn
    • Xóa hàng cuối cùng
    • Xóa cột theo số

Hướng dẫn này sẽ trình bày các cách khác nhau để xóa các hàng và cột trong Excel bằng VBA.

Xóa toàn bộ hàng hoặc cột

Để xóa toàn bộ hàng trong VBA, hãy sử dụng dòng mã này:

Rows[1].Delete

Lưu ý rằng chúng tôi sử dụng phương thức xóa để xóa một hàng.Delete method to delete a row.

Thay vì tham chiếu đối tượng hàng, bạn có thể tham chiếu các hàng dựa trên đối tượng phạm vi của chúng với Entirerow:Rows Object, you can reference rows based on their Range Object with EntireRow:

Range["a1"].EntireRow.Delete

Tương tự như xóa toàn bộ cột, sử dụng các dòng mã sau:

Columns[1].Delete
Range["a1"].EntireColumn.Delete

Xóa nhiều hàng hoặc cột

Xóa các hàng trống / trống

Rows["1:3"].Delete

Xóa hàng nếu ô trống

Columns["A:C"].Delete

Xóa hàng dựa trên giá trị ô

Thêm các ví dụ về hàng và cột xóa

Range["a1:a10"].EntireRow.Delete

Xóa các hàng trùng lặp

Xóa các hàng trống / trống

Xóa hàng nếu ô trống

Sub DeleteRows_EntireRowBlank[]

Dim cell As Range

For Each cell In Range["b2:b20"]
    If Application.WorksheetFunction.CountA[cell.EntireRow] = 0 Then
        cell.EntireRow.Delete
    End If
Next cell

End Sub

Xóa hàng dựa trên giá trị ô

Xóa hàng nếu ô trống

Xóa hàng dựa trên giá trị ô

Range["b3:b20"].SpecialCells[xlCellTypeBlanks].EntireRow.Delete

Xóa hàng dựa trên giá trị ô

Thêm các ví dụ về hàng và cột xóa

Sub DeleteRowswithSpecificValue[]

Dim cell As Range

For Each cell In Range["b2:b20"]
    If cell.Value = "delete" Then
        cell.EntireRow.Delete
    End If
Next cell

End Sub

Thêm các ví dụ về hàng và cột xóa

Xóa các hàng trùng lặp

Xóa các hàng bảng

Xóa các hàng được lọc

Xóa các hàng trùng lặp

Xóa các hàng bảng

Range["a1"].EntireRow.Delete
0

Xóa các hàng được lọc

Xóa hàng trong phạm vi

Xóa các hàng bảng

Xóa các hàng được lọc

Range["a1"].EntireRow.Delete
1

Xóa các hàng được lọc

Xóa hàng trong phạm vi

Range["a1"].EntireRow.Delete
2

Xóa các hàng đã chọn

Xóa hàng trong phạm vi

Xóa các hàng đã chọn

Range["a1:a10"].EntireRow.Delete

Xóa các hàng đã chọn

Xóa hàng cuối cùng

Range["a1"].EntireRow.Delete
4

Xóa hàng cuối cùng

Xóa cột theo số

Range["a1"].EntireRow.Delete
5

Hướng dẫn này sẽ trình bày các cách khác nhau để xóa các hàng và cột trong Excel bằng VBA.

Range["a1"].EntireRow.Delete
6

Xóa cột theo số

Hướng dẫn này sẽ trình bày các cách khác nhau để xóa các hàng và cột trong Excel bằng VBA.

Range["a1"].EntireRow.Delete
7

Trong bài viết này

  • Xóa hàng dựa trên giá trị ô
    • Xóa hàng - dựa trên bộ lọc
    • Xóa hàng dựa trên tiêu chí ô
    • Xóa hàng nếu ô trống
    • Xóa hàng trống
    • Xóa hàng nếu ô chứa giá trị
  • Chèn hàng dựa trên giá trị ô

Điều này sẽ lặp qua một phạm vi, chèn các hàng nếu một ô nhất định trong hàng đó nói là chèn chèn.

Xóa hàng dựa trên giá trị ô

Hướng dẫn này sẽ trình bày cách xóa hoặc chèn các hàng dựa trên các giá trị ô.

Range["a1"].EntireRow.Delete
8

Điều này sẽ lặp qua một phạm vi và xóa các hàng nếu cột A nói rằng xóa xóa.

Chúng ta phải bắt đầu vòng lặp với hàng dưới cùng vì việc xóa một hàng sẽ thay đổi dữ liệu, bỏ qua các hàng nếu bạn lặp từ trên xuống dưới.

Xóa hàng - dựa trên bộ lọc

Trong ví dụ trước, chúng tôi vòng qua các hàng, xóa từng hàng đáp ứng các tiêu chí. Ngoài ra, chúng ta có thể sử dụng Autofilter Excel, để lọc các hàng dựa trên một số tiêu chí và sau đó xóa các hàng có thể nhìn thấy:

Range["a1"].EntireRow.Delete
9

Xóa hàng dựa trên tiêu chí ô

Điều này sẽ lặp qua một phạm vi, xóa các hàng nếu ô trong cột A đáp ứng các tiêu chí nhất định [

Bài Viết Liên Quan

Chủ Đề