147 Aufrufe
Gefragt in Tabellenkalkulation von

Hallo,

ich möchte die Befehlszeile

   Sheets("01.03 bis 07.03").ScrollArea = "A1:X259"

Variabel gestalten.

Die verwendeten Variablen stehen in einer eigenen Tabelle „Variable“.

Die Codierung

   Sheets(Variable!C2 & " bis " & Variable!D2).ScrollArea = "A1:X259"

erzeugt den Fehlerhinweis „Laufzeitfehler 424. Objekt erforderlich“

Kann mir jemand weiterhelfen, wie muß die Codierung lauten?

Vielen Dank im voraus.

2 Antworten

0 Punkte
Beantwortet von beverly_ Experte (3.3k Punkte)

Hi Heinz,

was genau steht denn in den Zellen C2 und D2 - das Datum 01.03.2019 bzw. 07.03.2019 oder der Text 01.03 und 07.03? Wenn es Text ist, dann reicht dieser Code:

    Worksheets(Worksheets("Variable").Range("C2") & " bis " & Worksheets("Variable").Range("D2")).ScrollArea = "A1:X250"


Sollte es allerdings ein Datum sein, welches im Format TT.MM angezeigt wird, dann so:

    Worksheets(Format(Worksheets("Variable").Range("C2"), "dd.mm") & " bis " & Format(Worksheets("Variable").Range("D2"), "dd.mm")).ScrollArea = "A1:X250"


Bis später, Karin

0 Punkte
Beantwortet von
Hallo Karin,

danke für Deine Hilfe. Die Variablen sind als Datum definiert. Die 2. Lösung hat das Problem gelöst.

Heinz
...