Lembaran Kerja VBA - Bagaimana menggunakan Objek Lembaran Kerja di VBA?

Lembaran Kerja Excel VBA

Excel adalah buku kerja dan dalam buku kerja itu, ia mengandungi lembaran kerja atau helaian. Adalah sangat penting untuk memahami konsep Lembaran Kerja di VBA kerana sepanjang masa kita bekerja dengan lembaran kerja. Dalam fail excel biasa, kami menyebutnya sebagai helaian tetapi dalam terminologi VBA disebut sebagai "Lembaran Kerja". Semua koleksi lembaran kerja disebut "Lembaran Kerja".

Dalam VBA, Lembaran Kerja adalah objek. Ada dua cara merujuk lembaran kerja satu menggunakan objek "Lembar Kerja" dan satu lagi menggunakan objek "Lembar".

Saya tahu soalan anda ialah apa perbezaan antara mereka. Di excel, kita dapat melihat dua jenis helaian, satu adalah lembaran kerja biasa, dan satu lagi adalah helaian carta.

Tab lembaran kerja di excel hanya mempertimbangkan lembaran kerja dalam buku kerja kecuali helaian carta. "Helaian" mempertimbangkan semua lembaran kerja dalam buku kerja, termasuk lembaran carta. Contohnya, lihat gambar di bawah.

Di atas, kami mempunyai sejumlah 5 helai. Dari 5 helaian ini, 3 adalah lembaran kerja, dan 2 adalah helaian carta.

Di sini jumlah "Lembaran Kerja" adalah 3, dan jumlah "Lembaran" adalah 2.

Sekarang, lihat gambar di bawah.

Di sini semua helaian adalah lembaran kerja, jadi jumlah "Lembaran Kerja" dan "Lembaran" adalah 3.

Jadi, sebagai sebahagian daripada kod, jika anda ingin menggunakan lembaran kerja, objek ingat perkara ini.

Sintaks Lembaran Kerja VBA

Seperti yang saya katakan, lembaran kerja adalah pemboleh ubah objek. Walau bagaimanapun, ini juga mempunyai sintaks.

Indeks bukan nombor lembaran kerja yang kita rujuk. Seperti yang anda lihat pada akhirnya, ia disebut sebagai Objek.

Contohnya, Lembaran Kerja (1). Pilih bermaksud memilih lembaran kerja pertama buku kerja. Tidak kira apa nama lembaran kerja; apa sahaja lembaran kerja yang dimasukkan terlebih dahulu dalam buku kerja akan dipilih.

Kita juga boleh merujuk lembaran kerja dengan namanya. Kita perlu menyebut yang lengkap kerana ia adalah nama lembaran kerja dalam petikan ganda.

Contohnya, Lembaran Kerja ("Lembaran Jualan"). Pilih bermaksud pilih helaian yang dinamakan sebagai "Lembaran Jualan." Di sini tidak kira berapakah bilangan lembaran kerja yang selalu memilih lembaran kerja yang ditentukan.

Bagaimana cara menggunakan Objek Lembaran Kerja di VBA?

Contoh # 1

Contohnya, anggap anda mempunyai 5 helaian dalam buku kerja anda, dan nama lembaran kerja tersebut adalah "Lembaran Kerja 1", "Lembaran Kerja 2", "Lembaran Kerja 3", "Lembaran Carta 1", dan "Lembaran Carta 2".

Sekiranya saya menggunakan penomboran untuk memilih lembaran kerja, maka saya boleh menggunakan nombor sebagai rujukan lembaran kerja.

Lembaran kerja (2). Pilih bermaksud ia akan memilih lembaran kerja kedua buku kerja.

Kod:

Sub Lembaran Kerja_Contoh1 () Lembaran Kerja (2). Pilih Sub Akhir

Saya akan menjalankan kod ini menggunakan kekunci F5 atau secara manual dan melihat hasilnya.

Sekarang saya akan menukar nombor helaian menjadi 3.

Kod:

Sub Lembaran Kerja_Contoh1 () Lembaran Kerja (3). Pilih Sub Akhir

Sekarang lihat apa yang berlaku semasa anda menjalankan kod secara manual atau menggunakan kod kunci F5.

Jika anda melihat gambar di atas, ia telah memilih 4 th lembaran kerja apabila saya diminta untuk memilih 3 rd lembaran kerja.

Ini kerana saya telah menggunakan objek Lembaran Kerja, bukan objek Lembaran. Seperti yang saya katakan sebelumnya, objek "Lembaran Kerja" hanya mempertimbangkan lembaran kerja, bukan lembaran carta.

Untuk memilih helaian ketiga dari semua helaian dalam buku kerja, gunakan objek Helaian.

Kod:

Sub Lembaran Kerja_Contoh1 ()

Helaian (3). Pilih

Sub Akhir

Sekarang ia akan memilih helaian ketiga yang tepat.

Contoh # 2 - Pilih Lembaran Kerja mengikut Nama

Memilih helaian dengan nama namanya adalah cara tepat untuk merujuk helaian tersebut. Sebagai contoh, jika kita ingin memilih lembaran "Lembaran Kerja 3", maka anda boleh menggunakan kod di bawah.

Kod:

Sub Lembaran Kerja_Contoh2 () Lembaran Kerja ("Lembaran Kerja 3"). Pilih Sub Akhir

Ini akan memilih helaian yang tepat; tidak kira di mana ia diletakkan di dalam buku kerja.

Tetapi jika anda cuba mengakses lembaran carta dengan objek "Lembaran Kerja", kami akan mendapatkan "Langganan dari rentang kesalahan."

Kod:

Sub Lembaran Kerja_Contoh2 () Lembaran Kerja ("Lembaran Carta 1"). Pilih Sub Akhir

Jalankan kod ini melalui kekunci F5 atau secara manual dan lihat hasilnya.

Contoh # 3 - Masalah dengan Nama Lembaran Kerja

Terdapat satu lagi masalah dengan merujuk helaian dengan namanya. Sekiranya seseorang menukar nama lembaran kerja, sekali lagi, kami akan mendapat "Ralat langganan dari rentang."

Untuk menyelesaikan masalah ini, pergi ke editor asas visual dengan menekan kekunci ALT + F11 .

Sekarang pilih nama helaian dan tekan kekunci F4 untuk melihat tetingkap sifat.

Dalam sifat ini, tetingkap menukar nama lembaran kerja menjadi nama anda.

Satu perkara yang menarik di sini adalah walaupun kita telah menukar nama lembaran kerja dari "Lembaran Kerja 1" menjadi "WS1", kita masih dapat melihat nama yang sama dalam buku kerja.

Sekarang kita dapat merujuk lembaran ini dengan nama "WS1".

Kod:

Sub Lembaran Kerja_Contoh2 () Lembaran Kerja ("WS1"). Pilih Sub Akhir

Sekarang tidak kira siapa yang menukar nama lembaran kerja. Namun, kod kami merujuk kepada helaian yang sama selagi ia tidak berubah dalam penyunting asas visual.

Contoh # 4 - Dapatkan Kiraan Jumlah Helaian dalam Buku Kerja

Lembaran kerja adalah objek, dan kita dapat menggunakan semua sifat dan kaedah yang berkaitan dengannya. Apa yang kita buat dengan lembaran kerja?

Kami memasukkan lembaran kerja. Kami menamakan semula lembaran kerja. Kami memadamkan lembaran kerja dan banyak perkara lain yang kami lakukan dengannya.

Masukkan objek "Lembaran Kerja" dan letakkan titik untuk melihat semua pilihan dengannya.

Untuk mendapatkan jumlah lembaran kerja, gunakan VBA Count Property.

Kod:

Sub Lembaran Kerja_Contoh3 () Dim i Selagi i = Lembaran Kerja.Jumlah MsgBox i Akhir Sub

Ini akan menunjukkan jumlah lembaran kerja.

Walaupun terdapat 5 helai, kami mendapat kiraannya sebagai 3 kerana 2 helaian lain adalah helaian carta.

Untuk mendapatkan jumlah keseluruhan helaian, gunakan objek "Helaian".

Kod:

Sub Lembaran Kerja_Contoh3 () Dim i As Long i = Sheets.Count MsgBox i End Sub

Ini akan menunjukkan jumlah helaian penuh.

Contoh # 5 - Kaedah Menggunakan Objek Lembaran Kerja

Setelah memasukkan objek lembaran kerja, kita dapat mengakses semua sifat dan objek yang berkaitan dengannya. Kita boleh menambah helaian baru. Kita boleh memadam, dll.

Untuk Menambah Helaian Baru.

Lembaran kerja. Tambah

Untuk Padamkan Lembaran Kerja

Lembaran Kerja ("Nama Helaian"). Padam

Untuk Menukar Nama Lembaran Kerja

Lembaran Kerja ("Nama Lembaran"). Nama = "Nama Baru"

Artikel menarik...