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
0Xó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
1Xóa các hàng được lọc
Xóa hàng trong phạm vi
Range["a1"].EntireRow.Delete
2Xó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
4Xóa hàng cuối cùng
Xóa cột theo số
Range["a1"].EntireRow.Delete
5Hướ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
6Xó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
9Xó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 [