|
Guten Morgen zusammen,
ich bin am verzweifeln. Ich möchte in folgender Tabelle, in Spalte C ab Zeile 2 eine Zahlenreihe haben. Damit meine ich C2=1 / C3=2 / C4=3 usw.
|
Zeilenbeschriftungen |
Summe von VK diff ges. |
|
66300584 |
-3995,7 |
|
37302611 |
-2715,63 |
|
33302771 |
-1905,27 |
|
63302304 |
-1863,04 |
|
37302340 |
-1598,52 |
|
66301013 |
-1582,39 |
|
33301001 |
-1531,96 |
|
33302433 |
-1491,32 |
|
66300552 |
-1457,58 |
|
66300396 |
-1355,07 |
|
63300117 |
-1279,41 |
|
33302557 |
-1251,86 |
|
31301264 |
-1235,01 |
ich habe es schon mit folgendem Code probiert:
Dim Ende As Long
With ActiveSheet
Ende = .Cells(.Rows.Count, 2).End(xlUp).Row
.Range("C2") = 1
.Range("C3") = 2
.Range("C2:C3").AutoFill Destination:=Range("C2:C" & Ende), Type:=xlFillDefault
End With
Nicht wundern es ist nur ein Teil von einem größeren Makro deshalb fehlt Sub... und End Sub... .
Das Makro füllt die Zellen C2 und C3 richtig aus jedoch funktioniert die Autofill funktion nicht.
Könnt ihr mir bitte helfen.
|