Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1368to1372
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Formel runterziehen bis Zelle leer.

Formel runterziehen bis Zelle leer.
30.06.2014 13:18:09
Arif
Hallo Community,
als absoluter VBA Neuling bin ich gerade dabei ein Makro aufzubauen, den größten Teil füge ich mir per Makro Recorder zusammen, jedoch stehe ich nun vor einem Problem bei dem ich einfach keine Lösung finde.
Rein theoretisch erscheint es mir als ein recht simpler Vorgang, die Umsetzung jedoch bereit mir Kopfzerbrechen.
Folgende Thematik:
Ich habe 6 Spalten( A-F), in den ersten 3(A-C) stehen Formeln.
Die Spalten A-C sollen nun "runtergezogen" werden, jedoch logischer Weise nur solange, wie in der Zelle "D" etwas enthalten ist.
Per Recorder setzt mir der Code die aktuelle Zeilenanzahl, er prüft also nichts sondern setzt einfach pauschal die aktelle Zahl.Da die Zeilenanzahl von Tag zu Tag variieren kann ist das unpraktisch.Ich hoffe ich habe das Problem einigermaßen verständlich rübergebracht.
Mit freundlichen Grüßen
Anbei eine Beispieldatei.

Die Datei https://www.herber.de/bbs/user/91330.xls wurde aus Datenschutzgründen gelöscht


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel runterziehen bis Zelle leer.
30.06.2014 13:44:28
fcs
Hallo Arif,
funktioniert etwa wie folgt.
Gruß
Franz
Sub Makro1()
Dim ZeileLetzte As Long
With ActiveSheet
'letzte Zeile in Spalte D
ZeileLetzte = .Cells(.Rows.Count, 4).End(xlUp).Row
'Bereich A2:C2 bis zur letzten Zeile füllen
If ZeileLetzte > 2 Then
.Range(Cells(2, 1), .Cells(ZeileLetzte, 3)).FillDown
End If
End With
End Sub

AW: Formel runterziehen bis Zelle leer.
30.06.2014 13:51:10
Arif
Funktioniert in der Testdatei einwandfrei, ich werde später versuchen es auf das Projekt zu übertragen.
Vielen, vielen Dank.
Anzeige

321 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige