Ich möchte, dass der Inhalt des Tabellenblatts "Hilfsblatt" bei jedem Aufruf eines beliebigen Tabellenblattes innerhalb der Excel-Datei sortiert wird. Das funktioniert mit folgendem Code auch schon ganz gut:
Worksheets("Hilfsblatt").Columns("A:F").Sort Key1:=Worksheets("Hilfsblatt").Range("A2"), Order1:=xlAscending, _
Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlSortColumns, DataOption1:=xlSortNormal
Jetzt habe ich in meinem Dokument auch ein Diagramm, bei welchem mein Code nicht funktioniert. Aktiviere ich ein beliebiges Tabellenblatt läuft der Code ohne Probleme, Aktiviere ich das Tabellenblatt erhalte ich "Laufzeitfehler 13: Typen unverträglich"
Kann mir bitte jmd so helfen, dass der Code auch bei aktivieren des Tabellenblattes funktioniert?
Hier habe ich noch die Excel-Datei hochgeladen: https://www.herber.de/bbs/user/94114.xls
Viele Grüße
David