Tip VBA Excel – Cara Mereset Semua Pemotong Tabel Pivot Dengan Mengeklik Tombol

Saya baru-baru ini mengerjakan solusi spreadsheet yang sangat banyak didasarkan pada Tabel Pivot dan banyak Pemotong untuk memudahkan penelusuran ke dalam data. Jika Anda telah menggunakan versi Excel apa pun dari Microsoft Excel 2010 dan seterusnya, Anda mungkin telah menggunakan pemotong untuk menavigasi data di Tabel Pivot Anda.

Pemotong menyediakan tombol yang bisa Anda klik untuk memfilter data Tabel Pivot, tetapi selain pemfilteran cepat, pemotong juga menunjukkan pilihan pemfilteran saat ini, yang memudahkan untuk memahami apa yang sebenarnya diperlihatkan dalam laporan Tabel Pivot yang difilter.

Jadi penelusuran ini tampaknya semuanya baik-baik saja, dengan solusi spreadsheet saya, tetapi satu masalah yang muncul adalah jumlah klik yang diperlukan untuk ‘Memulai’ atau mengatur ulang semua Pemotong kembali untuk menampilkan semua data. (Ada beberapa pemotong di lembar kerja – seperti 4). Apakah ini dianggap banyak mungkin masalah pendapat pribadi … dan seberapa mahir Anda dalam memanipulasi lembar kerja menggunakan Pemotong Tabel Pivot tetapi umpan balik dari audiens ini adalah bahwa ada terlalu banyak opsi klik.

Tantangannya adalah bahwa para pemotong harus berada di sana untuk menelusuri tetapi membutuhkan waktu terlalu lama untuk mengatur ulang.

Jadi, saya memutuskan untuk menggunakan sedikit kode untuk mengaktifkan satu tombol untuk mengatur ulang semua Pemotong dengan satu klik. Jadi inilah potongan kecil kode untuk makro saya yang kemudian saya lampirkan ke tombol di lembar kerja.

Sub ClearMySlicers ()

Redupkan Slcr Sebagai SlicerCache

Untuk Setiap Slcr Di ActiveWorkbook.SlicerCaches

Slcr.ClearManualFilter

Lanjut

Akhiri Sub

  • Buka lembar kerja Excel Anda dan tekan F11 untuk membuka Editor Visual Basic.

  • Di kotak drop-down sebelah kiri, klik dua kali pada buku kerja dan tempel kode di jendela. (Ini akan membuat makro yang berjalan saat kita memilihnya. Makro ini akan disebut ClearMySlicers).

  • x keluar dari jendela pengembang dan kita dapat memeriksa makro

  • Tab Pengembang – Grup Kode – Makro untuk menampilkan kotak Dialog Makro.

Kita bisa menekan Jalankan dari sini setiap kali kita ingin mengatur ulang Pemotong Pivot, tetapi lebih sederhana untuk hanya menyediakan pengguna buku kerja dengan tombol untuk mengklik.

  • Pilih Tab Pengembang – Grup Kontrol – Sisipkan – Kontrol Formulir

  • Pilih Ikon Tombol Tekan

  • Klik di tempat Anda ingin meletakkan tombol di lembar kerja Anda

  • Kotak Dialog Tetapkan Makro akan muncul

  • Pilih Makro yang baru saja kita buat dan tekan OK

  • Klik kanan pada tombol untuk mengubah teks di Edit Teks jika Anda perlu- dalam contoh saya, saya mengubahnya menjadi Memulai Kembali!

Dan hanya itu, yang perlu kita lakukan hanyalah mengujinya. Bekerja seperti mimpi. Semua orang bahagia.

Kembali ke Atas
%d blogger menyukai ini: