ich will durch ein Button in eine andere versteckte Tabelle (Sheet) wechseln.
Dabei soll die PivotTabelle in dem Sheet aktualisiert werden.
Welche Befehlskette ist hier die richtige?
Sub TabellemitPivotAnzeigen()
On Error GoTo Fehler
With Worksheets("Tabelle1") 'name anpassen !!
.Visible = xlSheetVisible 'Blatt einblenden
.PivotTables(1).RefreshTable '1. Pivottabelle im Tabelenblatt aktualisieren
.Activate 'Blatt anzeigen
End With
'Fehlerbehandlung
Fehler:
With Err
If .Number 0 Then
MsgBox "Fehler Nr.: " & .Number & vbLf & .Description
End If
End With
End Sub