Automatische Ausfüllfunktion

[schauan]

Hallöchen,

alternativ würde auch ein kurzes Makro gehen:

Code:

Sub Makro1()
    Range("A5:A8764").Formula = "=MOD(ROW()-5,24)+1"
    Range("A5:A8764").Value = Range("A5:A8760").Value
End Sub

Allerdings musst Du bestimmt zwischendurch mal wegen der Sommer- und Winterzeit korrigieren ?

[Max1710]

Vielen Dank!

Hat mir weitergeholfen.

Aber ich bekomme es jetzt nicht hin, dass die 1 24mal vorkommt im Anschluss die 2 24 mal ....und das ganze bis 365. Jemand eine Idee?

Also:      
A        B   <-- Diese Spalte funktioniert,   die Spalte A bekomme ich nicht hin.
1        1
1        2
1        3
1        .
1        .
1        .
1        24
2       1
2       .
2       .
2       24
.
.
365  24

[Max1710]

=AUFRUNDEN(A3/24;0)


Schlüssel zum Erfolg dieses Problems