Herbers Excel-Forum - das Archiv
Formel automatisch "herunterziehen"
Betrifft: Formel automatisch "herunterziehen"
von: Chris
Geschrieben am: 01.10.2003 13:51:49
Hi,
suche irgendeine VBA-Funktion mit der man eine Formel (in Spalte B) automatisch "herunterziehen" kann (so wie mit der Maus). Und zwar soweit wie in Spalte A noch Werte stehen (do-Schleife?). Falls das irgendwie von Belang ist: bei der Formel handelt es sich um einen SVERWEIS.
Chris
Betrifft: AW: Formel automatisch "herunterziehen"
von: Erika
Geschrieben am: 01.10.2003 14:05:57
ich hab sowas ähnliches mit datumsprüfung gemacht...vielleicht hilfts...
For jx = 5 To 500
dtDatum = Cells(jx, 1).Value
If dtDatum <= Date Then
If Cells(jx, 2) = "" Then
Range(Cells(jx - 1, 2), Cells(jx - 1, 12)).Select
Selection.Copy
Range(Cells(jx, 2), Cells(jx, 12)).Select
ActiveSheet.Paste
Application.CutCopyMode = False
End If
End If
Next jx
Betrifft: AW: Formel automatisch "herunterziehen"
von: Claus Ohlendorf
Geschrieben am: 01.10.2003 14:12:55
Hmmm... weiss die Funktion nicht, aber Du kannst doch ein Makro aufzeichnen in dem Du ueber "Bearbeiten" - "Ausfüllen" Deine Ausfuellerei machst, dann kannst DU Dir die Funktion im Makroeditor anschauen und die Zielzeile sicher auch per Variable definieren...
Claus
Betrifft: jetzt klappts
von: Chris
Geschrieben am: 01.10.2003 14:51:45
Danke für die Antworten. Hab das mit dem Recorder probiert. Der Befehl lautet ganz simpel: Selection.FillDown
Danke euch beiden.
Chris
Betrifft: AW: Formel automatisch "herunterziehen"
von: Hajo_Zi
Geschrieben am: 01.10.2003 16:43:06
ahllo Chris
das geht ganz ohne VBA. Gehe auf die rechte untere Ecke in der die Formel steht, es entsteht ein schwarzes Kreuz und Doppelklick und die Formel wird bis zu letzten gefüllten Zeile der Spalte davor ausgefüllt.
Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
http://home.media-n.de/ziplies/