Runtime error 1004 saat menghapus banyak kolom dalam excel VBA

0

Mendapatkan kesalahan runtime 1004 saat menjalankan makro berikut ini yang memiliki kolom mulai dari A hingga BJ.

Sub sbVBS_To_Delete_Specific_Multiple_Columns()
Sheets("GRT Flight Data Log_raw").Range("A:B,H:I,K:L,P,AB:AH,AK:AN,AQ,AT,AZ:BJ").EntireColumn.Delete
End Sub

Saya telah menggunakan kode ini pada log data yang sama menghapus kolom yang berbeda untuk aplikasi yang berbeda dan berfungsi dengan baik. Ini adalah kode yang berfungsi:

Sub sbVBS_To_Delete_Specific_Multiple_Columns()

Sheets("GRT Flight Data Log").Range("A:B,H:L,P:Q,S:BJ").EntireColumn.Delete
End Sub

Saya telah kehabisan setiap kemungkinan yang saya temukan, tolong bantu.

microsoft-excel vba macros Christopher Rogers
sumber
Tidak yakin dengan masalah Anda. Tetapi apakah "P" suatu rentang? Mungkin Anda perlu melakukan "P: P"
Yisroel Tech
Anda benar, rentang saya memiliki set kolom tunggal jadi saya mengubah semua nilai kolom tunggal untuk mencerminkan bahwa AQ sekarang AQ: AQ dan P sekarang P: P seperti yang Anda ucapkan terima kasih.
Christopher Rogers
"runtime error 1004" adalah semua kesalahan yang dikatakan? Seharusnya mengatakan sesuatu yang lebih rinci.
Yisroel Tech
Itu memang mengatakan lebih banyak tentang rentang tetapi Anda menyelesaikannya terlepas jadi terima kasih.
Christopher Rogers
Oh, Anda mengedit komentar itu. Kupikir kau tidak tertolong. Saya akan menulis komentar saya sebagai jawaban sehingga bisa diterima.
Yisroel Tech

Jawaban:

0

Saya melihat bahwa dalam rentang yang Anda miliki Pyang bukan kisaran tetapi satu huruf.

Anda harus mengubahnya menjadi sesuatu seperti P:P

Yisroel Tech
sumber