Hallo Leute,
in der Auto_Open habe ich folgende Zeilen stehen, was auch funktioniert:
Worksheets("Fahrzeugtypen").Range("A3").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Nun möchte ich die Abfrage aber nicht nur beim Start aktualisieren, sondern auf Knopfdruck.
Wenn ich jetzt einen neuen CommandButton einfüge und die beiden o.a. Zeilen einfüge, gibt er mir folgende Fehlermeldung:
Laufzeitfehler 1004: Die Methode SeriesCollection für das Objekt _Chart ist fehlgeschlagen
Die Fehlermeldung bezieht sich auf folgende Zeilen, die aber ÜBERHAUPT NICHTS mit dem neuen CommandButton zu tun haben:
Application.Worksheets("Rechengang").ChartObjects("Diagramm 1").Activate
a = ActiveChart.SeriesCollection(1).Trendlines(1).DataLabel.Caption
Zugegeben, die SeriesCollection-Methode verstehe ich nicht wirklich, aber kann es daran denn liegen?
Übrigens funktioniert es auch, wenn ich den Code in die UserForm_Initialize schreibe, nur auf Knopfdruck eben nicht.
Das verstehe ich nicht !!!!
PS: ShowModal ist auf False, falls jemand vermutet, dass es damit zusammenhängt.
PPS: Vielleicht sollte man einen Level - VBA mittelmäßig einführen ;o)