Nếu bạn muốn một cách để xóa tất cả các số hàng tương tự trong một lần di chuyển thì bài viết này là dành cho bạn.

Trong bài viết này, chúng ta sẽ tìm hiểu cách chúng ta có thể loại bỏ cùng một hàng trong nhiều trang tính thông qua macro.

===

Câu hỏi): Tôi muốn xóa cùng một hàng trong nhiều trang tính bằng mã VBA. Những gì tôi muốn là mã để xóa tất cả các hàng trong sổ làm việc bất kể có bao nhiêu trang tính trong tệp hiện tại; Tôi muốn xóa số hàng đã chọn khỏi tất cả 5 trang tính.

Trước hết, hãy nhập dữ liệu tương tự vào tất cả các trang tính ở cùng một vị trí

image 1

Chúng ta cần làm theo các bước sau:

Nhấp vào tab Nhà phát triển Từ nhóm Mã chọn Visual Basic

image 2

Nhập mã sau vào mô-đun chuẩn: –

Sub DeleteRows ()

Dim shtArr, i As Long, xx As Long

shtArr = Array (“Sheet1”, “Sheet2”, “Sheet3”, “Sheet4”, “Sheet5”)

xx = Selection.Row

Đối với i = LBound (shtArr) Tới UBound (shtArr)

Trang tính (shtArr (i)). Hàng (xx) .EntireRow.Delete

Tiếp theo tôi

End Sub

===

image 3

  • Bây giờ đặt con trỏ trên bất kỳ ô A1 và trên Trang tính1.

Nhấn ALT + F8 * để chạy macro; bạn sẽ thấy số hàng đã chọn sẽ bị xóa trong tất cả các trang tính.

  • Ảnh chụp nhanh sau đây hiển thị dữ liệu trang tính 1 & trang tính 2 làm ví dụ; khi bạn chạy bài tập này, bạn sẽ tìm thấy giải pháp tương tự trong tất cả các trang tính tương ứng.