Cách Xóa Nhiều Dòng Trong Excel ? Hướng Dẫn Cách Xóa Nhiều Dòng Trong Excel

-
Trong khi làm việc trên Excel, có lẽ rằng bạn đã chạm chán phải các trường hợp cần xóa tương đối nhiều dòng vào Excel, nếu như các dòng đó thỏa mãn 1 điều kiện nhất định làm sao đó.

Bạn đang xem: Cách xóa nhiều dòng trong excel


Ví dụ:

Xóa những dòng nhưng mà cột C có đánh dấu “x”Xóa những dòng mà lại Cột B có giá trị nhỏ dại hơn 0.1…

Nếu chúng ta đam mê mày mò về VBA để vận dụng cho các thao tác trên Excel thì đây là thời cơ để rèn luyện đấy! Dưới đấy là 1 đoạn code để xử lý vấn đề xóa những dòng một cách auto và lập cập mà chúng ta có thể học tập.


Sub Delete
Using
For
Loop()
Dim row
Index As Long
Application.Screen
Updating = False
With Sheet1
.Range(“D1”) = Now
For row
Index = 40000 lớn 1 Step –1
If .Range(“A” & row
Index).Value 0.1 Then
.Range(“A” và row
Index).Entire
Row.Delete
End If
Next
.Range(“E1”) = Now
End With
Application.Screen
Updating = True
Msg
Box “Done”
End Sub

Sau khi đang bấm nút mang lại code chạy, việc bạn làm chỉ cần nghỉ ngơi cho thời hạn code up date mà không cần phải thao tác thêm bất cứ thứ gì. Mặc dù nhiên, có không ít trường hợp đoạn code của người sử dụng chạy mãi, chạy mãi mà lại vẫn ko thấy show kết quả. Vậy thì bạn cần theo dõi các phần dưới đây của nội dung bài viết nhé!

Chuẩn bị dữ liệu để triển khai test bài toán xóa nhiều dòng

Trong bảng dưới, dữ liệu để test bài toán xóa dòng nằm ở cột A, Sheet 1, vùng A1:A40000. Đây là các giá trị nằm trong tầm từ 0 tới 1, với được chế tạo ra thành từ hàm mảng động bắt đầu trong Excel Rand
Array. Yêu mong trong lấy một ví dụ này là các bạn sẽ thực hiện tại xóa đi những dòng mà lại cột A có giá trị nhỏ dại hơn 0,1. Hiện nay tại đang xuất hiện khoảng 4000 loại thỏa điều kiện này.

*

Với đoạn code VBA sẽ đề cập, việc xóa cái theo đk này đã mất khoảng tầm hơn 10 phút. Ở hình bên dưới, D1 vẫn là thời gian bước đầu và D2 là thời gian đoạn code kết thúc chạy.

*

Cách xóa những dòng theo điều kiện nhanh hơn

Cách 1:

Ý tưởng tại đây là các bạn sẽ dùng một bí quyết trong cột phụ để hoàn toàn có thể nhận hiểu rằng dòng nào yêu cầu xóa, rồi xóa cái đó cùng với đoạn code VBA sau:


Sub Delete
Using
Special
Cells()
Application.Screen
Updating = False
With Sheet1.Range(“B1:B40000”)
.Range(“E1”) = Now
.Formula = “=IF(A1
.Cells.Special
Cells(xl
Cell
Type
Formulas, xl
Errors).Entire
Row.Delete
.Range(“E2”) = Now
End With
Application.Screen
Updating = True
Msg
Box “Done”
End Sub

*

Cách 2:

Bạn sử dụng hàm Filter trong cỗ hàm mảng động new của kynanggame.edu.vn. Bằng cách thức này, tác dụng filter ngay sát như sẽ sở hữu được ngay mau chóng (kết quả lọc sinh hoạt cột B)

*

Cách 3:

Dùng chức năng Filter để triển khai lọc kết quả hoặc là copy qua sheet khác:


Sub Delete
Rows
With
Values
New
Sheet() ‘100K records 10K lớn delete
‘Test 1: 2.40234375 sec
‘Test 2: 2.41796875 sec
‘Test 3: 2.40234375 sec
‘1M records 100K khổng lồ delete
‘Test 1: 32.9140625 sec
‘Test 2: 33.1484375 sec
‘Test 3: 32.90625 sec
Dim old
Ws As Worksheet, new
Ws As Worksheet, row
Heights() As Long
Dim ws
Name As String, t As Double, old
Used
Rng As Range
Fast
WB True: t = Timer
Set old
Ws = Worksheets(1)
ws
Name = old
Ws.Name
Set old
Used
Rng = old
Ws.Range(“A1”, Get
Max
Cell(old
Ws.Used
Range))
If old
Used
Rng.Rows.Count > 1 Then ‘If sheet is not empty
Set new
Ws = Sheets.Add(After:=old
Ws) ‘Add new sheet
With old
Used
Rng
.Auto
Filter Field:=1, Criteria1:=“Test String”
.Copy ‘Copy visible data
End With
With new
Ws.Cells
.Paste
Special xl
Paste
Column
Widths
.Paste
Special xl
Paste
All ‘Paste data on new sheet
.Cells(1, 1).Select ‘Deselect paste area
.Cells(1, 1).Copy ‘Clear Clipboard
End With
old
Ws.Delete ‘Delete old sheet
new
Ws.Name = ws
Name
End If
Fast
WB False: Input
Box “Duration: “, “Duration”, Timer – t
End Sub

Sub Delete
If()
Dim LR As Long
Application.Screen
Updating = False
With Sheet1
.Range(“C1”).Value = Now
If .Auto
Filter
Mode Then .Auto
Filter
Mode = False
LR = .Range(“B” và .Rows.Count).End(xl
Up).Row
With .Range(“B1”).Resize(LR)
.Auto
Filter
.Auto
Filter Field:=1, Criteria1:=“>0.5”
.Offset(1).Resize(LR – 1).Special
Cells(xl
Cell
Type
Visible).Entire
Row.Delete Shift:=xl
Up
End With
.Auto
Filter
Mode = False
.Range(“C2”).Value = Now
End With
Application.Screen
Updating = True
End Sub

*

Vậy là thông qua bài viết này, chúng tôi đã sở hữu lại cho chính mình 4 biện pháp xóa nhiều dòng vào Excel vô cùng dễ dàng và dễ dàng, chúc bạn tiến hành thành công!


*
*

Cách cần sử dụng hàm dịch số thành chuỗi vào Excel

Trong bài viết này, công ty chúng tôi sẽ phía dẫn cho chính mình hàm chuyển số thành chuỗi vào Excel bởi công nắm Format Cells, cùng theo dõi nhé! Hàm TEXT và đổi khác định dạng number…


Hồng Thắm


giải đáp cách thực hiện hàm ngày tháng năm vào Excel
Hướng dẫn cách đổi trục biểu đồ trong Excel

Email của bạn sẽ không được hiển thị công khai. Các trường cần được ghi lại *

Excel đến kynanggame.edu.vn 365 Excel 2021 Excel 2019 Excel năm 2016 Excel 2013 Excel 2010 Excel 2007 coi th&#x
EA;m...&#x
CD;t hơn

Bạn rất có thể xóa ô để loại trừ nội dung của ô (công thức với dữ liệu), định hình (bao bao gồm định dạng số, format có đk và viền) và các chú ham mê đính kèm. Các ô vẫn xóa vẫn luôn là ô trống hoặc ko được định dạng trên trang tính.

Trên tab Trang đầu, trong nhóm Chỉnh sửa, bấm chuột mũi tên lân cận nút Xóa

*
, rồi thực hiện một trong quá trình sau:

Để xóa toàn bộ nội dung, định dạng cùng chú thích trong số ô đã chọn, hãy bấm Xóa Tất cả.

Để chỉ xóa những định dạng được áp dụng cho các ô đã chọn, hãy bấm Xóa Định dạng.

Xem thêm: Cách sửa lỗi cập nhật liên minh huyền thoại, cách sửa lỗi không cập nhật được trên lmht

Để chỉ xóa nội dung trong số ô đang chọn, để lại số đông định dạng và ghi chú tại chỗ, bấm vào Xóa Nội dung.

Để xóa ngẫu nhiên chú thích hợp hoặc ghi chú làm sao được đi kèm với những ô được chọn, hãy bấm Xóa chú thích và Ghi chú.

Để xóa siêu kết nối bất kỳ được kèm theo với các ô sẽ chọn, nên chọn Xóa khôn xiết kết nối.


Lưu ý: 

Nếu bạn nhấn vào một ô, rồi dấn DELETE hoặc BACKSPACE (xóa lùi) thì các bạn hãy xóa câu chữ của ô nhưng mà không một số loại bỏ ngẫu nhiên định dạng ô hoặc chú thích ô nào.

Nếu bạn xóa một ô bằng phương pháp sử dụng Xóa toàn bộ hoặc Xóa Nội dung,ô không hề chứa giá bán trị, đồng thời, công thức tham chiếu mang đến ô đó sẽ nhận giá tốt trị 0 (không).

Nếu bạn muốn loại quăng quật ô ngoài trang tính và đưa dịch các ô bao phủ để điền khoảng trống, bạn cũng có thể chọn các ô và xóa chúng. Bên trên tab Trang đầu, trong đội Ô, bấm chuột mũi tên mặt cạnh Xóa, rồi click chuột Xóa Ô.


*
*
*

Bạn bắt buộc thêm trợ giúp?


Phát triển các kĩ năng của bạn
Khám phá câu chữ đào tạo
Sở hữu tính năng mới đầu tiên
Tham gia kynanggame.edu.vn Office nội bộ

Thông tin này có hữu ích không?



Không
Cảm ơn bạn! Bạn có muốn góp ý gì nữa không? (Bạn càng cho thấy nhiều thông tin, chúng tôi càng cung cấp bạn được xuất sắc hơn.)Bạn rất có thể giúp bọn chúng tôi cải thiện không? (Bạn càng cho thấy nhiều thông tin, cửa hàng chúng tôi càng hỗ trợ bạn được xuất sắc hơn.)
Bạn sử dụng rộng rãi đến đâu với chất lượng dịch thuật?
Điều gì ảnh hưởng đến kinh nghiệm của bạn?
Giải quyết được vấn đề
Xóa hướng dẫn
Dễ theo dõi
Không bao gồm thuật ngữ
Hình hình ảnh có ích
Chất lượng dịch thuật
Không khớp với màn hình
Hướng dẫn không bao gồm xác
Quá kỹ thuật
Không đủ thông tin
Không đủ hình ảnh
Chất lượng dịch thuật
Bạn tất cả góp ý gì thêm không? (Không bắt buộc)
Gửi làm phản hồi

Cảm ơn phản hồi của bạn!


×
Nội dung mới
kynanggame.edu.vn Store
Giáo dục
Doanh nghiệp
Developer & IT
Công ty
Tiếng Việt (Việt Nam) California Consumer Privacy Act (CCPA) Opt-Out Icon chọn lọc quyền riêng rẽ tư của người tiêu dùng ở California California Consumer Privacy Act (CCPA) Opt-Out Icon tuyển lựa quyền riêng tư của chúng ta ở California © kynanggame.edu.vn 2023