Melaksanakan makro VBA ialah kaedah yang paling berkesan, paling cepat dan paling selamat untuk menjalankan sebarang operasi dalam Excel. Dalam artikel ini, kami akan menunjukkan kepada anda cara memuat semula jadual pangsi dalam Excel menggunakan VBA.

Muat turun Buku Kerja

Anda boleh memuat turun percuma amalkan buku kerja Excel dari sini.

Muat Semula Jadual Pangsi dengan VBA.xlsm

5 Contoh untuk Muat Semula Jadual Pangsi dengan VBA dalam Excel

Berikut ialah contoh jadual pangsi kami yang akan kami gunakan sepanjang keseluruhan artikel dan tunjukkan kepada anda 5 contoh berbeza jadual pangsi yang menyegarkan dalam Excel dengan VBA kod.

1. VBA untuk Menyegarkan Satu Jadual Pangsi dalam Excel

Jika anda mahu memuat semula hanya satu jadual pangsi dalam lembaran kerja Excel anda,

• Tekan Alt + F11 pada papan kekunci anda atau pergi ke tab Pembangun -> Visual Basic untuk membuka Visual Basic Editor .

• Dalam tetingkap kod timbul, dari bar menu , klik Sisipkan -> Modul .

• Salin kod berikut dan tampalkannya ke dalam tetingkap kod.

4901

Kod anda kini sedia untuk dijalankan.

Di sini, PivotTable1 ialah nama Jadual Pivot kami. Anda menulis nama yang terdapat pada Jadual Pangsi anda.

• Tekan F5 pada papan kekunci anda atau daripada bar menu pilih Jalankan - > Jalankan Sub/Borang Pengguna . Anda juga boleh hanya mengklik pada ikon Main kecil dalambar submenu untuk menjalankan makro.

Ini akan memuat semula jadual pangsi dalam lembaran kerja Excel anda yang sedia ada.

Baca lebih lanjut: Jadual Pangsi Tidak Menyegarkan (5 Isu & Penyelesaian)

2. Makro untuk Muat Semula Semua Jadual Pangsi dalam Lembaran Kerja Aktif

Untuk memuat semula semua jadual pangsi dalam lembaran kerja aktif , ikut langkah di bawah.

• Sama seperti sebelumnya, buka Editor Asas Visual daripada tab Pembangun dan Sisipkan a Modul dalam tetingkap kod.
• Dalam tetingkap kod, salin kod berikut dan tampalkannya.

5431

Kod anda kini sedia untuk dijalankan.

• Jalankan makro dan semua jadual pangsi dalam lembaran kerja aktif anda akan dimuat semula.

Baca lebih lanjut: Cara Muat Semula Semua Jadual Pangsi dalam Excel

3. Kod VBA untuk Muat Semula Semua Jadual Pangsi dalam Buku Kerja Berbilang

Jika anda ingin memuat semula semua jadual pangsi dalam berbilang buku kerja sekali gus dengan kod VBA maka langkahnya ialah:

• Buka Editor Asas Visual daripada tab Pembangun dan Sisipkan a Modul dalam tetingkap kod.
• Dalam tetingkap kod, salin kod berikut dan tampalkannya.

2948

Kod anda kini sedia untuk dijalankan.

• Jalankan kod dan semua jadual pangsi dalam semua buku kerja Excel terbuka anda akan dimuat semula.

Ingat untuk simpan semuabuku kerja buka semasa menjalankan kod ini.

Bacaan Serupa

• Cara Mengedit Jadual Pangsi dalam Excel (5 Kaedah )
• Kemas kini Julat Jadual Pangsi (5 Kaedah yang Sesuai)
• Cara Mengemas kini Jadual Pangsi Secara Automatik Apabila Data Sumber Berubah

4. Menyegarkan semula Cache Jadual Pangsi dengan VBA dalam Excel

Jika anda mempunyai berbilang jadual pangsi dalam buku kerja anda yang menggunakan data yang sama, anda boleh memuat semula hanya cache jadual pangsi dan bukannya memuat semula jadual pangsi sebenar sepanjang masa. Memuatkan semula cache secara automatik mengosongkan memori cache semua jadual pangsi menggunakan sambungan data yang sama dalam cache.

Langkah-langkah untuk melakukannya ialah,

• Buka Editor Asas Visual daripada tab Pembangun dan Sisipkan a Modul dalam tetingkap kod.
• Dalam tetingkap kod, salin kod berikut dan tampalkannya.

1387

Kod anda kini sedia untuk dijalankan.

• Jalankan kod dan semua memori cache jadual pangsi akan dikosongkan.

Baca Lagi: Cara Auto Muat Semula Jadual Pangsi tanpa VBA dalam Excel (3 Kaedah Pintar)

5. Auto-Muat Semula Jadual Pangsi Semasa Menukar Data dengan Makro VBA

Bagaimana jika anda mempunyai jadual pangsi yang mempunyai jumlah data yang besar dan anda hanya mahu mengemas kini beberapa data sambil memastikan keseluruhan jadual tidak disentuh . Dalam Excel, anda boleh auto muat semulajadual pangsi semasa mengemas kini data dengan VBA .

• Buka Editor Asas Visual daripada Pembangun.
• Di sebelah kiri editor, akan terdapat anak tetingkap Project Explorer yang mempunyai semua nama lembaran kerja.
• Dalam Project Explorer , double- klik pada nama helaian yang mengandungi jadual pangsi.

• Tetingkap kod akan muncul di mana kita akan mencipta makro acara. Pilih Lembaran Kerja daripada kotak lungsur Objek di sebelah kiri modul kod. Ini akan menambah acara Worksheet_SelectionChange pada modul, kami sebenarnya tidak memerlukannya jadi kami akan memadamkan sekeping kod ini kemudian.
• Kemudian klik pada Prosedur senarai lungsur turun dan pilih Tukar . Ini menambah acara baharu di bahagian atas modul kod yang dipanggil Tukar_Lembaran Kerja . Kami akan menulis kod kami di sini supaya memadamkan kod yang dijana oleh Worksheet_SelectionChange

• Sekarang salin kod berikut dan tampalkannya dalam Worksheet_Change

9870

Kod anda kini sedia untuk dijalankan.

Di sini, PivotTbl ialah lembaran kerja nama dalam buku kerja Excel kami dan PivotTable1 ialah nama Jadual Pivot kami. Anda menulis nama yang terdapat pada lembaran kerja dan Jadual Pangsi anda.

• Kini setiap kali anda menukar data dalam jadual data asal dalam lembaran kerja anda, data dalam jadual pangsi akandikemas kini secara automatik.

Baca lebih lanjut: Cara Auto Refresh Jadual Pangsi dalam Excel

Kesimpulan

Artikel ini menunjukkan kepada anda cara memuat semula jadual pangsi dalam Excel dengan VBA . Saya harap artikel ini banyak memberi manfaat kepada anda. Jangan ragu untuk bertanya jika anda mempunyai sebarang soalan mengenai topik tersebut.