Агуулгын хүснэгт
Энэ нийтлэлд би танд хэрхэн ажлын хуудас эсвэл ажлын дэвтрийн бүх Пивот Хүснэгтийг Excel-ийн VBA ашиглан сэргээхийг харуулах болно. Мөн та нэг Пивот Хүснэгтийг сэргээж сурах болно , мөн пивот хүснэгт кэш.
Бүх пивот хүснэгтийг Excel-ийн VBA-р шинэчлэх (Түргэн харах)
7832
Энэ нь идэвхтэй ажлын дэвтрийн бүх пивот хүснэгт -ийг шинэчилнэ.
Дасгал хийх ажлын номыг татаж авах
Энэ дасгалын номыг татан авч ажиллаж байхдаа дасгал хийнэ үү. энэ нийтлэлийг уншиж байна.
Бүх пивот хүснэгтүүдийг сэргээх.xlsm
Excel дээр VBA ашиглан бүх пивот хүснэгтийг сэргээх 4 арга
Пивот хүснэгт нь Excel-ийн ажлын хуудсан дээрх Мөр ба Утга гэсэн хоёр ангиллын өгөгдлийг агуулсан тусгай төрлийн хүснэгт юм.
Хүснэгтийн бүх баганыг эдгээр хоёр ангиллын дагуу ангилдаг.
Хэрэв та өгөгдлийн багцыг сонгоод өгөгдлийн багцаас автоматаар үүсгэгдэнэ. Оруулах > Excel хэрэгслийн самбар дээрх Пивот Хүснэгт сонголт.
Өнөөдрийн бидний зорилго бол ажлын хуудасны бүх пивот хүснэгт -ийг хэрхэн сэргээх талаар сурах явдал юм. Excel-ийн VBA -тэй ажлын ном.
1. Excel-д нэг пивот хүснэгтийг сэргээх
Эхлээд бид нэг пивот хүснэгт -г сэргээж сурах болно.
Ганц пивот хүснэгтийг сэргээх , эхлээд та үүнийг пивот хүснэгт объект гэж нэрлэх хэрэгтэй.
Дараа нь та үүнийг хийх хэрэгтэй. VBA -н RefreshTable аргыг ашиглана уу.
Энд идэвхтэй байгаа PivotTable1 нэртэй пивот хүснэгт байна. ажлын хуудас. (Энд дарж пивот хүснэгтийн нэрийг хэрхэн авах талаар мэдээрэй).
Үүнийг сэргээхийн тулд бид дараах мөрийн кодын ашиглах ёстой:
4503
Кодыг ажиллуулснаар идэвхтэй ажлын хуудсан дээрх пивот хүснэгт пивот хүснэгт -г сэргээнэ.
Дэлгэрэнгүй унших: Excel-д пивот хүснэгтийг хэрхэн автоматаар шинэчлэх вэ (2 арга)
2. Excel-ийн ажлын хуудасны бүх пивот хүснэгтийг шинэчлэх
Одоо бид ажлын хуудасны бүх пивот хүснэгтийг VBA -ээр шинэчлэх болно.
Идэвхтэй ажлын хуудасны бүх пивот хүснэгтийг шинэчлэхийн тулд ActiveSheet.PivotTables объектын пивот хүснэгт бүрийг давтах шаардлагатай. Дараа нь RefreshTable аргыг ашиглана уу.
5306
Кодыг ажиллуулбал энэ нь бүх пивот хүснэгтийг шинэчилнэ. Идэвхтэй ажлын хуудасны .
Дэлгэрэнгүй унших: Пивот хүснэгтийг сэргээдэггүй (5 асуудал ба шийдэл)
3 . Excel програмын ажлын дэвтрийн бүх пивот хүснэгтийг сэргээх
Мөн Excel-ийн ажлын номын бүх пивот хүснэгтийг дахин шинэчлэх боломжтой.
Бүх <Идэвхтэй ажлын номын 1>пивот хүснэгт , VBA -ийн ActiveWorkbook.PivotTables объектоор хүснэгт бүрийг давт. Дараа нь RefreshTable аргыг ашиглана уу.
6964
Энэ код ньидэвхтэй ажлын номын бүх пивот хүснэгтийг шинэчилнэ үү.
Дэлгэрэнгүй унших: Эх сурвалжийн өгөгдөл өөрчлөгдөх үед пивот хүснэгтийг хэрхэн автоматаар шинэчлэх вэ
4. Excel-ийн VBA-р пивот хүснэгтийн кэшийг сэргээнэ үү
Хэрэв таны ажлын дэвтэрт ижил өгөгдөл ашигладаг олон пивот хүснэгт байгаа бол пивот хүснэгтийн кэш<-ийг сэргээсэн нь дээр. 2> пивот хүснэгт -г сэргээхийн оронд.
пивот хүснэгтийн кэш -г сэргээхийн тулд идэвхтэй ажлын номын пивот хүснэгтийн кэш бүрийг давтах хэрэгтэй. ActiveWorkbook.PivotCaches объект.
Дараа нь VBA -ийн R efresh аргыг ашиглана.
9630
Энэ нь идэвхтэй ажлын номноос бүх пивот хүснэгтийн кэш -г сэргээх болно.
Дэлгэрэнгүй унших: VBA-гүйгээр пивот хүснэгтийг хэрхэн автоматаар шинэчлэх вэ Excel-д (3 ухаалаг арга)
Санамжлах зүйлс
Энд бид пивот хүснэгтүүдийг -г идэвхтэйгээс сэргээхийг үзүүлэв. зөвхөн ажлын хуудас эсвэл ажлын дэвтэр. Хэрэв та идэвхгүй байгаа ажлын ном эсвэл ажлын хуудаснаас өгөгдлийг сэргээхийг хүсвэл ActiveSheet эсвэл ActiveWorkbook объектын оронд ажлын хуудас эсвэл ажлын номын нэрийг ашиглана уу.
Жишээ нь, Хуудас1 -аас бүх пивот хүснэгтийг шинэчлэхийн тулд Ажлын хуудасны хүснэгт бүрийн хувьд("Хуудас1"). Пивот хүснэгт .
-г ашиглана уу. Мөн Ажлын дэвтэр1 -ээс сэргээхийн тулд Дэлгэц дээрх хүснэгт бүрийн хувьд (“Ажлын дэвтэр1”). Пивот хүснэгтүүд -г ашиглаарай.
Дүгнэлт
Эдгээрийг ашиглахаргуудын хувьд та Excel-ийн VBA -ийн тусламжтайгаар ажлын хуудас эсвэл ажлын номноос бүх пивот хүснэгт -ийг сэргээж болно. Танд асуух зүйл байна уу? Биднээс асуугаарай.