Note: The other languages of the website are Google-translated. Back to English

Làm thế nào để xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định trong Excel?

Đôi khi bạn có thể cần phải xóa các hàng nếu các ô trong một cột được chỉ định lớn hơn hoặc nhỏ hơn một giá trị nhất định trong Excel. Bài viết này sẽ giới thiệu một số phương pháp để giải quyết vấn đề này.

Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định bằng mã VBA
Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định với Kutools cho Excel
Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định với Kutoos for Excel


Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định bằng mã VBA

Giả sử bạn muốn xóa toàn bộ các hàng nếu ô trong cột D lớn hơn hoặc nhỏ hơn một giá trị nhất định trong Excel. Bạn có thể chạy mã VBA sau để đạt được nó.

1. nhấn Khác + F11 các phím đồng thời để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. bên trong Microsoft Visual Basic cho các ứng dụng cửa sổ, nhấp Chèn > mô-đun. Sau đó sao chép và dán mã VBA bên dưới vào cửa sổ Mã.

Mã VBA: Xóa hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định trong Excel

Public Sub ProcessData()
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
        MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xRg.Range("A1").EntireRow.Insert
    Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
    xRg.Range("A1") = "Temp"
    xRg.AutoFilter 1, ">30000"
    Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
    On Error GoTo 0
    If Not xRg Is Nothing Then xRg.EntireRow.Delete
End Sub

Chú thích: Trong đoạn mã trên,> 30000 có nghĩa là bạn sẽ xóa các hàng nếu các ô lớn hơn 30000 trong một cột được chỉ định. Nếu bạn muốn xóa các hàng nếu các ô nhỏ hơn một giá trị nhất định, vui lòng thay đổi dấu> thành <và sau đó chỉ định giá trị của bạn.

3. nhấn F5 phím để chạy mã, trong cửa sổ bật lên Kutools cho Excel hộp thoại, chọn phạm vi (cột đơn) mà bạn sẽ tìm thấy nếu các ô trong cột này lớn hơn hoặc nhỏ hơn một giá trị nhất định. Và sau đó nhấp vào OK cái nút. Xem ảnh chụp màn hình:

Sau đó, tất cả các hàng có giá trị ô lớn hơn 30000 trong cột D sẽ bị xóa ngay lập tức.


Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định với Kutools cho Excel

Mô hình Chọn các ô cụ thể tiện ích của Kutools cho Excel có thể giúp bạn chọn tất cả các hàng có ô lớn hơn hoặc nhỏ hơn một giá trị nhất định trong một cột được chỉ định và sau đó bạn có thể xóa thủ công tất cả các hàng đã chọn cùng một lúc.

Trước khi áp dụng Kutools cho Excel, Xin vui lòng tải xuống và cài đặt nó trước tiên.

1. Chọn cột bạn muốn xóa các hàng dựa trên, sau đó nhấp vào Kutools > Chọn > Chọn các ô cụ thể. Xem ảnh chụp màn hình:

2. bên trong Chọn các ô cụ thể hộp thoại, vui lòng chọn Toàn bộ hàng trong Loại lựa chọn phần. bên trong Loại cụ thể phần, chọn Lớn hơn or Ít hơn từ danh sách thả xuống đầu tiên, hãy nhập giá trị nhất định vào hộp văn bản tiếp theo, sau đó nhấp vào OK .

3. Sau đó, một hộp thoại bật lên cho bạn biết có bao nhiêu hàng được chọn, vui lòng nhấp vào OK cái nút. Và bạn có thể thấy tất cả các hàng có giá trị lớn hơn 30000 trong cột D được chọn ngay lập tức.

4. Nhấp chuột phải vào một trong các hàng đã chọn, sau đó nhấp vào Xóa bỏ từ menu chuột phải. Và tất cả các hàng đã chọn sẽ bị xóa.

  Nếu bạn muốn dùng thử miễn phí (30-day) của tiện ích này, vui lòng nhấp để tải xuống, và sau đó đi đến áp dụng hoạt động theo các bước trên.


Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định với Kutoos for Excel

Ngoài hai phương pháp trên, bạn có thể lọc ra tất cả các hàng có ô lớn hơn hoặc nhỏ hơn một giá trị nhất định trong một cột được chỉ định, sau đó loại bỏ tất cả các hàng được lọc bằng Xóa hàng & cột ẩn (hiển thị) tiện ích của Kutools cho Excel.

Trước khi áp dụng Kutools cho Excel, Xin vui lòng tải xuống và cài đặt nó trước tiên.

1. Chọn tiêu đề cột, sau đó nhấp vào Ngày > Lọc. Xem ảnh chụp màn hình:

2. Nhấp vào mũi tên thả xuống trong cột bạn sẽ xóa các hàng dựa trên, sau đó nhấp vào Bộ lọc số > Lớn hơn or Ít hơn như ảnh chụp màn hình dưới đây:

3. bên trong Bộ lọc tự động tùy chỉnh hộp thoại, nhập một số nhất định sau hộp lớn hơn hoặc nhỏ hơn, rồi bấm vào OK .

4. Sau đó, tất cả các hàng có ô nhất định lớn hơn hoặc nhỏ hơn một giá trị nhất định trong cột D đều được lọc ra. Bạn có thể xóa tất cả các hàng đã lọc bằng cách chọn dữ liệu đã lọc và sau đó nhấp vào Kutools > Xóa bỏ > Xóa hàng & cột ẩn (hiển thị). Xem ảnh chụp màn hình:

5. bên trong Xóa hàng & cột ẩn (hiển thị) hộp thoại, đảm bảo Trong phạm vi đã chọn tùy chọn được chọn trong Nhìn vào danh sách thả xuống, chọn Hàng trong Xóa loại , chỉ định tùy chọn Hàng hiển thị trong Loại chi tiết và cuối cùng nhấp vào OK .

6. Sau đó, tất cả các hàng hiển thị trong phạm vi đã chọn sẽ bị xóa ngay lập tức, bạn có thể hủy bộ lọc bằng cách nhấp vào Ngày > Lọc.

  Nếu bạn muốn dùng thử miễn phí (30-day) của tiện ích này, vui lòng nhấp để tải xuống, và sau đó đi đến áp dụng hoạt động theo các bước trên.


Xóa các hàng nếu ô lớn hơn / nhỏ hơn một giá trị nhất định với Kutools cho Excel


Các bài liên quan:


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (2)
Xếp hạng 5 trong 5 · xếp hạng 1
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào! Làm cách nào để thay đổi mã của bạn (Xóa Hàng Nếu Ô Lớn hơn / Nhỏ hơn Một Giá trị Nhất định Với Mã VBA) nếu tôi muốn nó hoạt động trong mọi trang tính trong sổ làm việc? Tôi cần nó để xóa các hàng nếu ngày trong cột A là
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Siêu. Cảm ơn rất nhiều.
Lời chào từ İstanbul
Xếp hạng 5 trong 5
Không có bình luận nào được đăng ở đây
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL