Excel VBA ialah alat yang berkuasa dan berguna untuk melaksanakan tugas dengan cepat dalam jumlah pukal. Anda boleh menggunakan beberapa syarat dan memperoleh hasil yang berbeza berdasarkan syarat individu melalui VBA. Sekarang, kadangkala, anda mungkin ingin menyemak sama ada helaian tertentu wujud dalam buku kerja anda. Dan, jika tidak, anda mungkin perlu mencipta helaian itu. Dalam artikel ini, saya akan menunjukkan kepada anda semua langkah untuk menambah helaian jika ia tidak wujud, menggunakan Excel VBA.

Excel VBA: Tambah Helaian Jika Ia Tidak Wujud (Pandangan Pantas)

3890

Masukkan ke dalam modul baharu untuk menggunakan kod di atas.

Muat Turun Buku Kerja Amalan

Anda boleh memuat turun buku kerja amalan kami dari sini secara percuma!

Langkah-langkah untuk Menggunakan Kod VBA untuk Menambah Helaian dalam Excel Jika Ia Tidak Wujud

Katakan, anda mempunyai buku kerja yang mengandungi 4 lembaran kerja bernama Januari, Februari, Mac dan April. Setiap helaian mengandungi laporan jualan bulan berikutnya. Sekarang, anda perlu mencari beberapa helaian dalam buku kerja dan tambah helaian jika ia tidak wujud. Anda boleh mengikuti garis panduan langkah demi langkah di bawah untuk mencapainya.

📌 Langkah 1: Masukkan Modul Baharu

Mula-mula, anda perlu memasukkan modul untuk menulis kod VBA.

• Untuk melakukan ini, pada mulanya, pergi ke tab Pembangun tab >> Visual Basic alat.

• Hasilnya, Microsoft VisualAsas untuk Aplikasi tetingkap akan muncul.
• Seterusnya, pergi ke tab Sisipkan tab >> Modul alat.

Oleh itu, modul baharu bernama Modul1 telah dibuat.

Baca Lagi: Cara Menambah Helaian dengan Nama dalam Excel VBA (6 Cara Mudah)

Bacaan Serupa

• Buat Buku Kerja Baharu dan Simpan Menggunakan VBA dalam Excel
• Excel VBA: Cipta Buku Kerja Baharu dan Namakannya (6 Contoh)
• Cara Membuat Helaian Baharu daripada Templat Menggunakan Makro dalam Excel

📌 Langkah 2: Tulis dan Simpan Kod VBA yang Diperlukan

Sekarang, anda perlu menulis kod di dalam modul dan menyimpannya.

• Dalam untuk melakukan ini, klik pada pilihan Modul1 dan tulis kod berikut dalam tetingkap kod.

90331268

• Sebagai Hasilnya, tetingkap kod akan kelihatan seperti berikut.

🔎 Penerangan Kod:

♣ Segmen 1:

6900

Dalam bahagian ini, kami telah mengisytiharkan nama makro dan nama pembolehubah es.

♣ Segmen 2:

4961

Dalam bahagian ini, kami telah mencipta kotak input. Melalui kotak input ini, kita boleh mengambil input nama fail yang perlu kita cari.

♣ Segmen 3:

6735

Dalam bahagian ini, kami menyemak sama ada helaian yang diperlukan wujud dalam buku kerja. Jika tidak, ia akan mencipta helaian yang diperlukan dan menunjukkan kepada kami mesej tentang perubahan ini.

♣ Segmen 4:

4073

Dalam bahagian ini, kami telah bekerja dengan hasilnya jika helaian yang diperlukan sudah wujud dalam buku kerja. Dalam senario ini, kotak mesej lain akan muncul memberitahu anda bahawa helaian ini wujud. Tambahan pula, dalam bahagian ini, kami menamatkan kod dengan betul.

• Selepas itu, tekan Ctrl + S.

• Selepas itu, tetingkap Microsoft Excel akan muncul. Klik pada butang Tidak .

• Hasilnya, tetingkap Simpan Sebagai akan muncul.
• Berikut, pilih pilihan Simpan sebagai jenis: sebagai format .xlsm . Selepas itu, klik pada butang Simpan .

Oleh itu, anda telah menulis dan menyimpan kod yang anda perlukan.

Nota:

Anda mesti menyimpan buku kerja Excel dalam format .xlsm . Jika tidak, makro tidak akan didayakan dan kod tidak akan berfungsi.

Baca Lagi: Excel VBA untuk Menambah Helaian dengan Nama Pembolehubah (5 Contoh Ideal)

📌 Langkah 3: Jalankan Kod

Sekarang, anda perlu menjalankan kod dan menyemak hasilnya.

• Untuk melakukan ini, pertama sekali, klik pada ikon Jalankan dalam tetingkap Microsoft Visual Basic for Applications .

• Akibatnya, tetingkap Macros akan muncul.
• Seterusnya, pilih makro AddSheetIfNotExist dan klik pada butang Run .

• Pada masa ini, kotak mesej yang kami buatbernama Tambah Helaian Jika Tidak Wujud akan muncul. Di sini, pilihan auto ialah Helaian5 .

• Sekarang, untuk menyemak, tulis “April” dalam kotak teks dan klik pada butang Ok .

• Selepas itu, anda akan melihat mesej lain itu kotak akan muncul memberitahu anda bahawa helaian itu sudah wujud.
• Klik pada butang Ok .

• Selepas itu, jalankan kod sekali lagi dan tulis “Mei” dalam kotak teks kotak mesej yang dibuat. Selepas itu, klik pada butang OK .

• Akibatnya, anda akan melihat kotak mesej lain yang akan muncul memberitahu anda bahawa helaian “Mei” tidak wujud dan oleh itu ia mencipta helaian ini.
• Selepas itu, klik pada butang OK .

Akhir sekali, anda dapat melihat anda telah menambah helaian yang tidak wujud sebelum ini. Dan, buku kerja akan kelihatan seperti ini sekarang.

Baca Lagi: Excel VBA: Tambah Helaian Selepas Terakhir (3 Contoh Ideal)

Kesimpulan

Jadi, dalam artikel ini, saya telah menunjukkan kepada anda semua langkah untuk menambah helaian jika tidak wujud dengan Excel VBA. Semak artikel penuh dengan teliti untuk memahaminya dengan lebih baik dan mencapai hasil yang anda inginkan. Saya harap anda mendapati artikel ini berguna dan bermaklumat. Jika anda mempunyai sebarang pertanyaan atau cadangan lanjut, sila hubungi saya.

Dan, lawati ExcelWIKI untuk banyak lagiartikel seperti ini. Terima kasih!