Làm thế nào để xóa bảng tính excel trong VBA?


-1

Làm cách nào để xóa tất cả các trang tính excel trong sổ làm việc ngoại trừ hai trang đầu tiên sử dụng cho Vòng lặp tiếp theo?

For 
Next

Câu trả lời:


2

Xem xét:

Sub Killer()
    j = Sheets.Count
    For i = j To 3 Step -1
        Sheets(i).Delete
    Next i
End Sub

Nếu bạn thích, bạn có thể tắt Cảnh báo trước khi chạy vòng lặp.


@SNipErHex Bạn khá hoan nghênh!
Gary's Student

1
Tôi đề nghị gói vòng lặp với Application.DisplayAlerts = FalseApplication.DisplayAlerts = True để tránh hộp xác nhận .
davidmneedham
Khi sử dụng trang web của chúng tôi, bạn xác nhận rằng bạn đã đọc và hiểu Chính sách cookieChính sách bảo mật của chúng tôi.
Licensed under cc by-sa 3.0 with attribution required.