Mündəricat
VBA makrosunun tətbiqi Excel-də istənilən əməliyyatı yerinə yetirmək üçün ən effektiv, ən sürətli və ən təhlükəsiz üsuldur. Bu yazıda sizə VBA istifadə edərək Excel-də pivot cədvəlini necə yeniləməyi göstərəcəyik.
İş kitabını endirin
Pulsuz yükləyə bilərsiniz Excel iş kitabını buradan məşq edin.
Pivot Cədvəli VBA.xlsm ilə Yeniləyin
Excel-də VBA ilə Pivot Cədvəli Yeniləmək üçün 5 Nümunə
Aşağıda bütün məqalə boyu istifadə edəcəyimiz pivot cədvəlimizin nümunəsi verilmişdir və sizə VBA
1. Excel-də Bir Pivot Cədvəli Yeniləmək üçün VBA
Excel iş vərəqinizdə yalnız bir pivot cədvəlini yeniləmək istəyirsinizsə,
- <1 düyməsini basın. Klaviaturanızda>Alt + F11 və ya nişana keçin Tərtibatçı -> Visual Basic Redaktoru açmaq üçün Visual Basic .
- Açılır kod pəncərəsində, menyu çubuğundan , klikləyin Daxil et -> Modul .
- Aşağıdakı kodu kopyalayın və kod pəncərəsinə yapışdırın.
2208
Kodunuz indi işə hazırdır.
Burada, Pivot Cədvəl1 bizim Pivot Cədvəlimizin adıdır. Siz Pivot Cədvəlinizin adını yazırsınız.
- Klaviaturanızda F5 düyməsini basın və ya menyu çubuğundan İşlə - seçin - > Sub/UserForm -u işə salın. Siz həmçinin kiçik Play ikonasına klikləyə bilərsinizmakronu işə salmaq üçün alt menyu çubuğu.
Bu, mövcud Excel iş vərəqinizdə pivot cədvəlini təzələyəcək.
Ətraflı oxuyun: Pivot Cədvəli Yenilənmir (5 Problem və Həlli)
2. Aktiv İş Vərəqindəki Bütün Pivot Cədvəlləri Yeniləmək üçün Makro
Aktiv iş vərəqindəki bütün pivot cədvəlləri yeniləmək üçün , aşağıdakı addımları yerinə yetirin.
- Eyni əvvəlki kimi, Developer nişanından Visual Basic Redaktoru açın və kod pəncərəsində Daxil edin Modulu edin.
- Kod pəncərəsində aşağıdakı kodu kopyalayın və yapışdırın.
6684
Kodunuz artıq işə hazırdır.
- Çalışdırın makronu və aktiv iş vərəqinizdəki bütün pivot cədvəlləri yenilənəcək.
Ətraflı oxuyun: Bütün Pivot Cədvəlləri necə təzələmək olar Excel
3. Çoxsaylı İş Kitabında Bütün Pivot Cədvəlləri Yeniləmək üçün VBA Kodu
Əgər siz VBA kodu ilə eyni anda birdən çox iş dəftərindəki bütün pivot cədvəlləri yeniləmək istəyirsinizsə, o zaman addımlar:
- Developer nişanından Visual Basic Redaktoru açın və Daxil edin Modulu kod pəncərəsi.
- Kod pəncərəsində aşağıdakı kodu köçürün və yapışdırın.
2234
Kodunuz indi işləməyə hazırdır.
- Çalışdırın kodu və bütün açıq Excel iş kitablarınızdakı bütün pivot cədvəlləri yenilənəcək.
Unutmayın hamısını saxlaiş kitabları bu kodu işlədərkən açın.
Oxşar Oxumalar
- Excel-də Pivot Cədvəli Necə Redaktə etmək olar (5 Metod )
- Pivot Cədvəl Aralığını Yeniləyin (5 Uyğun Metod)
- Mənbə Məlumatı Dəyişiklikləri zamanı Pivot Cədvəlini Avtomatik Yeniləmə
4. Excel-də VBA ilə Pivot Cədvəl Keşinin Yenilənməsi
İş kitabınızda eyni məlumatlardan istifadə edən bir neçə pivot cədvəliniz varsa, təzələmək əvəzinə yalnız pivot cədvəl keşini təzələyə bilərsiniz faktiki pivot masa hər zaman. Keşin təzələnməsi keşdəki eyni məlumat bağlantısından istifadə edərək bütün pivot cədvəllərinin keş yaddaşını avtomatik təmizləyir.
Bunun üçün addımlar:
- Visual Basic Redaktoru açın Developer nişanından və kod pəncərəsində Daxil edin Modul .
- Kod pəncərəsində aşağıdakı kodu kopyalayın və yapışdırın.
7035
Kodunuz indi işə salınmağa hazırdır.
- Çalışdırın kodu və hamısını pivot cədvəl keş yaddaşları təmizlənəcək.
Ətraflı oxuyun: Excel-də VBA olmadan Pivot Cədvəlini Avtomatik Yeniləmə (3 Ağıllı Metod)
5. VBA makrosu ilə verilənləri dəyişdirərkən pivot cədvəlini avtomatik yeniləyin
Böyük miqdarda məlumatı olan bir pivot cədvəliniz varsa və istədiyiniz yalnız bütün cədvələ toxunulmamış bir neçə məlumatı yeniləməkdirsə? . Excel-də siz avtomatik yeniləyə bilərsiniz VBA ilə verilənləri yeniləyərkən pivot cədvəli .
- Tərtibatçıdan Visual Basic Redaktoru açın.
- Redaktorun sol tərəfində iş vərəqinin bütün adlarına malik Project Explorer paneli olacaq.
- Project Explorer -də ikiqat- pivot cədvəlini ehtiva edən vərəq adına klikləyin.
- Hadisə makrosunu yaradacağımız kod pəncərəsi görünəcək. Kod modulunun sol tərəfindəki Obyekt açılan qutudan İş vərəqi seçin. Bu modula Worksheet_SelectionChange hadisəsi əlavə edəcək, əslində buna ehtiyacımız yoxdur, ona görə də bu kod parçasını sonra siləcəyik.
- Sonra Prosedur üzərinə klikləyin. açılan siyahı və seçin Dəyişiklik . Bu, kod modulunun yuxarı hissəsinə İş vərəqi_Dəyişimi adlı yeni hadisə əlavə edir. Biz buraya kodumuzu yazacağıq ki, İş vərəqi_SeçimiChange tərəfindən yaradılan kodu sil
- İndi kopyalayın aşağıdakı kodu daxil edin və onu İş Cədvəli_Dəyişikliyi
1670
-ə yapışdırın. Kodunuz indi işə salınmağa hazırdır.
Burada, PivotTbl iş vərəqidir adı Excel iş kitabımızdadır və PivotTable1 bizim Pivot Cədvəlimizin adıdır. Siz iş vərəqinizdə və Pivot Cədvəlinizdə olan adı yazırsınız.
- İndi hər dəfə iş vərəqinizdəki orijinal verilənlər cədvəlindəki məlumatları, pivot masa olacaqavtomatik yenilənəcək.
Ətraflı oxuyun: Excel-də Pivot Cədvəlini Avtomatik Yeniləmə
Nəticə
Bu məqalə sizə Excel-də VBA ilə pivot cədvəlini necə yeniləməyi göstərdi. Ümid edirəm bu məqalə sizin üçün çox faydalı oldu. Mövzu ilə bağlı hər hansı sualınız olarsa, çekinmeyin.
