Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Autoausfüllen bis letzte Zeile

Autoausfüllen bis letzte Zeile
30.12.2005 10:02:09
Jürgen
Hallo Excel-Forum,
habe ein hoffentlich nicht zu komplizierte Frage:
Generiere per Makro eine Tabelle. Egal wie lang die Tabelle ist, definitiv ist immer die Spalte B1 bis BXXX gefüllt. In Spalte C soll eine Formel (z.B. WENN DANN). Mit welchem Makrobefehl kann ich die letze Zeile bestimmen und dann sagen fülle mir von C2 bis letzte Zeile CXXX mit der Formel (Autoausfüllen).
Bin für jede Hilfe dankbar.
Gruß Jürgen
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autoausfüllen bis letzte Zeile
ransi
hallo jürgen
das geht z.B. so:
Public

Sub test()
Dim letzte As Long
letzte = Range("B65536").End(xlUp).Row
Range("C2:C" & letzte).FormulaLocal = "=wenn(a2>1;a2;0)"
End Sub

ransi
AW: Autoausfüllen bis letzte Zeile
30.12.2005 10:34:48
Jürgen
Ich danke Dir ransi,
funktioniert mit Deiner Formel Prima. Kannst Du mir mit meiner vielleicht noch helfen?
Anstatt WENN DANN benuzte ich folgende:
=WENN(M2 "größer" 0;LINKS(M2;SUCHEN(" ";M2));"")
größer ist nicht ausgeschrieben aber das Zeichen bekam ich irgendwie nicht ins Forum gestellt
Wenn ich diese durch Deine ersetzte will er das nicht so.
Hoffe Du hast eine Idee, was ich falsch mache.
Besten Dank Jürgen
Anzeige
AW: Autoausfüllen bis letzte Zeile
30.12.2005 10:46:02
Martina
=WENN(M2 &gt 0;LINKS(M2;SUCHEN("" "";M2));"""")
AW: Autoausfüllen bis letzte Zeile
30.12.2005 11:57:23
Jürgen
Vielen Dank Martina,
hat wunderbar geklappt.
Frage mich nur, wo mein Fehler lag? An den Leerzeichen?
Besten Gruß Jürgen
AW: Autoausfüllen bis letzte Zeile
30.12.2005 12:03:23
Martina
hi Jürgen,
nix leerzeichen
sondern doppelte anführungszeichen !
mfg
Martina
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Autoausfüllen bis zur letzten Zeile in Excel


Schritt-für-Schritt-Anleitung

Um in Excel eine Formel bis zur letzten gefüllten Zeile automatisch auszufüllen, kannst Du ein Makro verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne den Visual Basic for Applications (VBA) Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu:

    • Klicke im Menü auf Einfügen und wähle Modul.
  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub AutoAusfüllenBisLetzteZeile()
       Dim letzte As Long
       letzte = Range("B65536").End(xlUp).Row
       Range("C2:C" & letzte).FormulaLocal = "=WENN(A2>1;A2;0)"
    End Sub
  4. Passe die Formel an:

    • Wenn Du eine andere Formel verwenden möchtest, ersetze =WENN(A2>1;A2;0) durch Deine gewünschte Formel.
  5. Führe das Makro aus:

    • Gehe zurück zu Excel, drücke ALT + F8, wähle das Makro AutoAusfüllenBisLetzteZeile und klicke auf Ausführen.

Häufige Fehler und Lösungen

  • Formel wird nicht übernommen:

    • Stelle sicher, dass die Zellreferenzen in Deiner Formel korrekt sind. Bei der Verwendung von WENN ist das korrekte Format wichtig.
  • Doppelte Anführungszeichen:

    • Wenn Du in einer Formel ein Zeichen nicht eingeben kannst, überprüfe, ob Du doppelte Anführungszeichen ("") richtig verwendest, wie im Beispiel von Martina.

Alternative Methoden

Neben der Verwendung von VBA kannst Du auch die AutoAusfüllen-Funktion in Excel verwenden:

  1. Schreibe die Formel in die erste Zelle (z.B. C2).
  2. Klicke auf die untere rechte Ecke der Zelle (das kleine Quadrat) und ziehe es nach unten bis zur letzten gefüllten Zeile.
  3. Excel erkennt automatisch die letzte Zeile und füllt die Formel entsprechend aus.

Praktische Beispiele

Angenommen, Du möchtest die folgende Formel in Spalte C basierend auf Spalte M verwenden:

=WENN(M2>0;LINKS(M2;SUCHEN(" ";M2));"")

Hier ist die Vorgehensweise:

  1. Setze die Formel in C2.
  2. Nutze das Makro oder die AutoAusfüllen-Funktion, um die Formel bis zur letzten Zeile zu übertragen.

Tipps für Profis

  • Verwendung von dynamischen Bereichsnamen:

    • Anstatt feste Zellbezüge zu verwenden, kannst Du auch dynamische Bereichsnamen definieren, um die letzte Zeile automatisch zu erkennen.
  • Fehlerüberprüfung:

    • Füge Fehlerüberprüfungsmechanismen in Deine Formeln ein, um sicherzustellen, dass sie auch bei leeren Zellen funktionieren.

FAQ: Häufige Fragen

1. Wie finde ich die letzte gefüllte Zeile in einer anderen Spalte? Um die letzte gefüllte Zeile in einer anderen Spalte zu finden, ändere den Bereich im VBA-Code entsprechend, z.B. letzte = Range("D65536").End(xlUp).Row.

2. Kann ich mehrere Spalten gleichzeitig ausfüllen? Ja, Du kannst das Makro anpassen, um mehrere Spalten gleichzeitig auszufüllen, indem Du die entsprechenden Bereiche im Code angibst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige