Autoausfüllen in 3-er Schritten

Forumthread: Autoausfüllen in 3-er Schritten
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Autoausfüllen in 3-er Schritten

15.05.2009 14:12:26

Judith

Hallo zusammen,
kann mir jemand sagen, wie man die Spalte A in einem Tabellenblatt in bestimmten Schritten ausfüllt?
Ehrlich gesagt, bin ich total ratlos.
Also, folgende Vorgabe:
Anfangszeile ist immer 1
Endzeile per InputBox abfragen (z.B. 150)
Schritte per InputBox abfragen ( z.b. 3) 1, 4, 7, 10, 13 usw.
Die Werte sollen dann untereinander in Spalte A eingetragen werden bis die Endzeile erreicht ist.
Wäre super, wenn mir da jemand helfen könnte.
Viele Grüße
Judith

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Reihe - Funktion

15.05.2009 14:31:02

Daniel
AW: Autoausfüllen in 3-er Schritten

15.05.2009 15:03:02

Judith

AW: Reihe - Funktion

15.05.2009 14:31:02

Daniel

Hi
dafür gibt es doch in Excel die Funktion BEARBEITEN - AUSFÜLLEN - REIHE
das ausführen und den Recorder mitlaufen lassen, dann weisst du, wie der Befehl zum Ausfüllen geht und kannst deinen Code entsprechend aufbauen:


Sub Makro1()
Dim inkr As Double
Dim Zeilebis As Long
inkr = CDbl(InputBox("Inkrement"))
Zeilebis = CLng(InputBox("Ausfüllen bis Zeile"))
Range("A1") = 1
Range("A1:A" & Zeilebis).DataSeries _
Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, Step:=inkr, Trend:=False
End Sub

Gruß, Daniel

AW: Autoausfüllen in 3-er Schritten

15.05.2009 15:03:02

Judith

Hallo Daniel,
vielen Dank, für Deinen Beitrag! Du hast natürlich Recht, der Makrorekorder hätte mir evtl. weiterhelfen können. Aber so weit bin ich anscheinend noch nicht, dass ich den Rest geschafft hätte.
Ich hatt mit einer For Next Schleife gebastelt, allerdings ohne Erfolg.
Viele Grüße und "Danke" nochmal!
Judith