ich habe ein Makro, welches in einer Excel Datei im VBA Editor auf dem Excel Objekt (Blatt) hinterlegt wird, in dem sich eine Pivottabelle befindet. Dieses Makro sorgt dafür, daß die Fensterfixierung einer Pivottabelle immer aktualisiert wird. Ansonsten stellt sich nach diversen Änderungen an Pivotfeldern der Effekt ein, daß die Fixierung nicht mehr stimmt.
Das Makro in seiner jetzigen Form:
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim pvTable As PivotTable
Dim rgSelect As Range
Set pvTable = ActiveSheet.PivotTables(1)
ActiveWindow.FreezePanes = False
pvTable.PivotSelect "", XlPTSelectionMode.xlOrigin, True
Set rgSelect = Selection.Cells(Selection.Cells.Count).offset(2, 1)
rgSelect.Select
ActiveWindow.FreezePanes = True
End Sub
Nun möchte ich erreichen, daß ich das Makro in der VBA Umgebung meiner Person.xls Datei hinterlegen kann und wenn die Personl.xls geöffnet ist dieses Makro für jede geöffnete Pivottabelle anspringt, wenn auf dieser geändert wird.
Wie kann ich ein Makro aus der Personl.xls so allgemeingültig definieren?
Vielen Dank für Eure Anregungen,
Grüße, Andreas Hanisch