فهرست مطالب
پیاده سازی VBA macro موثرترین، سریع ترین و ایمن ترین روش برای اجرای هر عملیات در اکسل است. در این مقاله به شما نشان خواهیم داد که چگونه جدول محوری را در اکسل با استفاده از VBA به روز کنید.
دانلود Workbook
می توانید نسخه رایگان را دانلود کنید. کتاب کار اکسل را از اینجا تمرین کنید.
Refresh Pivot Table با VBA.xlsm
5 مثال برای بازخوانی Pivot Table با VBA در Excel
در زیر مثالی از جدول محوری ما آمده است که در کل مقاله از آن استفاده خواهیم کرد و 5 مثال مختلف از جدول محوری تازه کردن در اکسل با VBA<را به شما نشان خواهیم داد. 2> کد.
1. VBA برای بازخوانی One Pivot Table در اکسل
اگر می خواهید فقط یک جدول محوری را در کاربرگ اکسل خود بازخوانی کنید،
- <1 را فشار دهید>Alt + F11 روی صفحه کلید خود یا به برگه Developer -> Visual Basic برای باز کردن Visual Basic Editor .
- در پنجره کد پاپ آپ، از نوار منو ، روی درج -> ماژول .
- کد زیر را کپی کرده و در پنجره کد قرار دهید.
5110
کد شما اکنون آماده اجرا است.
در اینجا، PivotTable1 نام جدول محوری ما است. شما نامی را که Pivot Table شما دارد می نویسید.
- F5 را روی صفحه کلید خود فشار دهید یا از نوار منو Run - را انتخاب کنید. > Sub/UserForm را اجرا کنید. همچنین میتوانید روی نماد کوچک Play کلیک کنیدنوار منوی فرعی برای اجرای ماکرو.
این جدول محوری را در کاربرگ اکسل موجود شما تازه می کند.
بیشتر بخوانید: جدول محوری تازه نمی شود (5 مشکل و راه حل)
2. ماکرو برای بازخوانی همه جداول محوری در کاربرگ فعال
برای بازخوانی همه جداول محوری در کاربرگ فعال ، مراحل زیر را دنبال کنید.
- همان مانند قبل، Visual Basic Editor را از تب Developer و Insert a Module را در پنجره کد باز کنید.
- در پنجره کد، کد زیر را کپی کرده و آن را جایگذاری کنید.
7103
کد شما اکنون آماده اجرا است.
- اجرا کنید ماکرو را اجرا کنید و همه جداول محوری در کاربرگ فعال شما به روز می شوند.
بیشتر بخوانید: نحوه بازخوانی همه جداول محوری در Excel
3. کد VBA برای بازخوانی همه جداول محوری در چندین کتاب کار
اگر می خواهید همه جداول محوری در چندین کتاب کار را به طور همزمان با کد VBA بازخوانی کنید، مراحل عبارتند از:
- باز کردن Visual Basic Editor از تب Developer و Insert a Module در پنجره کد.
- در پنجره کد، کد زیر را کپی کرده و آن را جایگذاری کنید.
6966
کد شما اکنون آماده اجرا است.
- اجرا کنید کد را اجرا کنید و تمام جداول محوری در همه کتابهای اکسل باز شما به روز می شوند.
به خاطر داشته باشید به همه را نگه داریدکتابهای کاری باز کردن در حین اجرای این کد )
4. تازه کردن کش جدول محوری با VBA در اکسل
اگر چندین جدول محوری در کتاب کار خود دارید که از داده های یکسانی استفاده می کنند، می توانید تنها حافظه پنهان جدول محوری را بازخوانی کنید به جای تازه کردن جدول محوری واقعی همیشه. تازه کردن حافظه پنهان به طور خودکار حافظه نهان تمام جداول محوری را با استفاده از اتصال داده مشابه در حافظه پنهان پاک می کند.
مراحل انجام این کار عبارتند از،
- باز کردن Visual Basic Editor از تب Developer و Insert a Module در پنجره کد.
- در پنجره کد، کد زیر را کپی کنید و آن را جایگذاری کنید.
8678
کد شما اکنون آماده اجرا است.
- اجرای کد و همه حافظه های کش جدول محوری پاک خواهند شد.
بیشتر بخوانید: نحوه بازخوانی خودکار Pivot Table بدون VBA در اکسل (3 روش هوشمند) <3
5. بازخوانی خودکار Pivot Table هنگام تغییر داده ها با VBA Macro
اگر یک جدول محوری دارید که حجم زیادی از داده دارد و تنها چیزی که می خواهید این است که چند داده را در حالی که کل جدول دست نخورده است به روز کنید چه می شود. . در اکسل، میتوانید را بهروزرسانی خودکار کنیدجدول محوری هنگام بهروزرسانی دادهها با VBA .
- ویژوال بیسیک ویرایشگر را از توسعهدهنده باز کنید.
- در سمت چپ ویرایشگر، یک صفحه Project Explorer وجود دارد که همه نامهای کاربرگ را دارد.
- در Project Explorer ، دوبار- روی نام برگه ای که حاوی جدول محوری است کلیک کنید.
- پنجره کد ظاهر می شود که در آن یک ماکرو رویداد ایجاد می کنیم. Worksheet را از کادر کشویی Object در سمت چپ ماژول کد انتخاب کنید. این یک رویداد Worksheet_SelectionChange را به ماژول اضافه می کند، ما در واقع به آن نیازی نداریم، بنابراین بعداً این قطعه کد را حذف خواهیم کرد.
- سپس بر روی رویه کلیک کنید. لیست کشویی و تغییر را انتخاب کنید. این یک رویداد جدید در بالای ماژول کد به نام Worksheet_Change اضافه می کند. ما کد خود را در اینجا می نویسیم بنابراین حذف کد ایجاد شده توسط Worksheet_SelectionChange
- اکنون کد را کپی کنید کد زیر را دنبال کنید و آن را در Worksheet_Change
3576
کد شما اکنون آماده اجرا است.
در اینجا، PivotTbl کاربرگ است. نام در کتاب کار اکسل ما و PivotTable1 نام جدول محوری ما است. شما نامی را که کاربرگ و Pivot Table شما دارند، می نویسید.
- اکنون هر بار که داده ها را در جدول داده های اصلی در کاربرگ خود تغییر می دهید، داده ها در جدول محوری خواهد شدبه طور خودکار به روز می شود.
بیشتر بخوانید: نحوه بازخوانی خودکار Pivot Table در اکسل
نتیجه گیری
این مقاله به شما نشان داد که چگونه جدول محوری را در اکسل با VBA بازخوانی کنید. امیدوارم این مقاله برای شما بسیار مفید بوده باشد. در صورت داشتن هرگونه سوال در مورد موضوع می توانید بپرسید.