AW: Variable für Arbeitsblätter
25.05.2007 09:10:30
Oberschlumpf
Hi Olli
Versuch es so:
For Schleife = 1 To Sheets.Count
Sheets(Schleife).Range("A1").Value = 1
Next
Mit diesem Bsp würde die Zelle A1 in jedem Sheet den Wert 1 erhalten, da die Schleife genau so oft wiederholt wird, wie Anzahl Blätter (Sheets.Count) in der Mappe vorhanden sind.
Ein Blatt kann durch seinen Index (Sheets(1), Sheets(2), usw) angesprochen werden.
Und die Variable "Schleife" ersetzt innerhalb der Klammer den festen Wert 1 oder 2 oder usw.
Das Blatt, welches in deiner Reihenfolge (Blattregister in Excel) an erster Stelle steht, hat immer den Index 1.
Natürlich musst du die Zeile in der Schleife durch deinen Code ersetzen.
Konnte ich helfen?
Ciao
Thorsten