Jak odświeżyć tabelę przestawną na chronionym arkuszu?
Zwykle tabela przestawna nie jest odświeżana na chronionym arkuszu, w tym artykule wprowadzę kod VBA, aby odświeżyć tabelę przestawną z chronionego arkusza roboczego.
Odśwież tabelę przestawną na chronionym arkuszu z kodem VBA
Odśwież tabelę przestawną na chronionym arkuszu z kodem VBA
Domyślnie nie ma bezpośredniego sposobu na odświeżenie tabeli przestawnej w chronionym arkuszu, ale za pomocą następującego kodu VBA można szybko odświeżyć wszystkie tabele przestawne w bieżącym arkuszu, gdy dane ulegną zmianie w oryginalnej tabeli.
1. Przytrzymaj przycisk ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.
Kod VBA: Odśwież tabelę przestawną na chronionym arkuszu:
Sub RefreshAll()
'Updateby Extendoffice 20161109
Dim xpt As PivotTable
With ActiveSheet
.Protect UserInterfaceOnly:=True
For Each xpt In .PivotTables
xpt.RefreshTable
Next xpt
End With
End Sub
3. A następnie naciśnij F5 klucz do uruchomienia tego kodu, jeśli oryginalne dane ulegną zmianie, wszystkie tabele przestawne w aktywnym arkuszu zostaną odświeżone jednocześnie.
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!