Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
900to904
900to904
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formel X mal wiederholen

Forumthread: Formel X mal wiederholen

Formel X mal wiederholen
24.08.2007 10:54:00
Robert
Hallo,
ich möchte eine Formel in Zeilen so oft wiederholen, wie ich in einer variablen Tabelle gefüllte Zeilen habe. Ne Ahnung, wie ich das steuern kann?
Evtl. eine "Loop-Funktion"?
Danke für eure Hilfe,
Robert

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel X mal wiederholen
24.08.2007 11:02:49
Hajo_Zi
Hallo Robert,
gehe an die rechte untere Ecke der Zelle, ein Kreuz entsteht und Doppelklick.

AW: Formel X mal wiederholen
24.08.2007 11:05:52
Beate
Hallo Robert,
nachstehender Code befüllt Spalte A bis zur letzten befüllten Zeile in Spalte B (Spalte B =2 im Code) mit einer kleinen Beispielformel:
Sub Test()
    Range("A1:A" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=ROW()*5"
End Sub
Gruß,
Beate

Anzeige
AW: Formel X mal wiederholen
24.08.2007 11:44:48
Robert
Hallo Beate,
ich möchte ab der Zelle C10 die Formeln so weit runterkopieren, wie Spalte B befüllt ist. Passt der Befehl so:
Range("C10:C" & Cells(65536, 2).End(xlUp).Row).FormulaR1C -1 = "=ROW()*5"
Danke für deine Hilfe,
Robert

AW: Formel X mal wiederholen
24.08.2007 12:13:55
Beate
Hallo Robert,
Du hast da ein überflüssiges -1 in den Code reingebastelt. So ist es richtig:
Sub Test()
    Range("C10:C" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=ROW()*5"
End Sub
Gruß,
Beate

Anzeige
AW: Formel X mal wiederholen
24.08.2007 13:20:48
Robert
Hi Beate,
warum funktioniert das mit meiner Formel nicht?
Range("C10:C" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=IF(AJ10=0;C9;AJ10)"
Oh mann, ich werde dieses VBA nie verstehen! :(
Grüße,
Robert

FormulaR1C1
24.08.2007 14:11:00
Beate
Hallo Robert,
ändere so:
Sub Test()
    Range("C10:C" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=IF(RC[33]=0,R[-1]C,RC[33])"
End Sub
Guckst Du: Formeln in Zellen schreiben und achte insbesondere auf FormulaR1C1
Gruß,
Beate

Anzeige
PS
24.08.2007 14:16:22
Beate
Es geht auch so, also ändere deine Strichpunkte in Punkte und verzichte auf R1C1:
Sub Test()
    Range("C10:C" & Cells(65536, 2).End(xlUp).Row).Formula = "=If(AJ10=0,C9,AJ10)"
End Sub

Anzeige
AW: PS
24.08.2007 15:11:08
Robert
Hi Beate,
hat alles super geklappt! Vielen lieben Dank für die Hilfe!!! :)
Grüße,
Robert
;

Forumthreads zu verwandten Themen

maximale Textlänge in Excelzellen
Holger Blüthmann

Gibt es eine Beschränkung für die Textlänge in Excelzellen und wenn ja, wieviele Zeichen sind erlaubt?Vielen Dank.Holger Blüthmann

27.05.2002 09:25:47
Thread-ID: 123851
3 Beiträge
Makro in Tabelle 2 in nächster Zeile wiederholen
Florian

Hallo miteinander,
in Tabellenblatt 1 sollten in der Zeile 3 die gewünschten Daten eingegeben werden.
Nach Klick auf den Button "Quittung" sollte es diese Daten korrekt im Tabellenblatt einfügen! Dies funktioniert! Mein Wunsch wäre nun dass wenn man eine neue "Daten" in Tabellenblatt 1...
19.05.2017 10:43:07
Thread-ID: 1559325
6 Beiträge
Zelle auswählen und x mal nach unten kopieren VBA
Fritz

Hallo Experten,

noch eine weitere kurze Frage:
ich möchte die letzte gefüllte Zelle in Spalte N x mal nach unten kopieren, wobei x von Spalte B angegeben wird.
Deutlicher:
in Spalte B sind neue Einträge. in Spalte N entsprechend weniger. jetzt lese ich die letzte Zelle aus Spal...
31.07.2003 14:42:23
Thread-ID: 288175
4 Beiträge
Ausgabe entspr. Zelle eines Maximalwerts
Basti

Hallo,
also ich habe ich Spalte E5-E14 Werte. Ich möchte per SVERWEIS oder wie auch immer den Namen der entsprechenden Person in A5-A14 ausgeben, die in der E-Spalte den größten Wert hat!
Wie mach ich das?
Danke im Voraus!!!
01.01.1970 00:00:00
Thread-ID: 402024
3 Beiträge
Zellen mit maximal 35 Zeichen
Uli

Hallo,
ich benötige Hilfe zu folgendem Problem:
Ich möchte Zellen mit Text auf maximal 35 Zeichen festlegen. Sofern eine Zelle mit einem längeren Text existiert, soll dieser Text auf 35 Zeichen gekürzt werden.
Vielen Dank im Voraus.
Uli
14.09.2005 11:52:42
Thread-ID: 666992
6 Beiträge
Anzeige
Werte in einzelnen Zellen x mal vorkommen, dann...
Hugo

Hallo!
Kann man diese beiden im Screenshot zu sehenden Anforderungen realisieren; wenn ja wie?
Zellen I2 bis I8 sind als nicht durchgängig zu behandeln, da z.Bsp. in I3 ein gleicher Wert wie das Suchkriterium stehn kann, aber dann nicht mit ausgewertet werden soll.
Die Formeln müsse...
29.05.2008 02:13:37
Thread-ID: 981276
13 Beiträge
Anzeige
Datenüberprüfung Zelle (Hexadezimal)
Michael
Hallo,
ich suche nach einer Datenüberprüfung (Zelle) in der 16 stellige RFID-Tag's eingetragen werden! Hierbei handelt es sich um eine 16 stellige Hexadezimalzahl (16 Ziffern - 0-9 oder A-F). Wie lässt sich dies am elegantesten lösen? Es soll ein Fehler angezeigt werden wenn die Zahl mehr bzw. w...
05.07.2021 16:37:41
Thread-ID: 1837895
4 Beiträge
Alle Zeichen aus einer Zelle aber maximal 20 übernehmen
Franca
Hallo liebe Excelfreunde,

ich hoffe hier kann mir jemand helfen. Ich weiß nämlich nicht wie ich dafür eine Formel hinkriegen soll.

Ich habe in der ersten Zelle einen Namen mit Leerzeichen, Komma etc. der sehr lang sein kann, danach kommt immer eine Nummer die mit 95M anfängt
<...
02.03.2024 10:19:41
Thread-ID: 1967796
3 Beiträge
Zellen x-mal kombinieren und duplizieren - Lagerplätze
Max
Hallo Zusammen,

wir verzweifeln aktuell an der Erstellung von Lagerplätzen für unser neues Lager.

Hier eine Datei die erklärt, was genau wir brauchen:
https://www.herber.de/bbs/user/171994.xlsx


Wir wollen verschiedene Werte miteinander kombinieren, sodass jede Kom...
04.09.2024 18:08:34
Thread-ID: 1990102
4 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Formel X in Excel wiederholen

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und gehe zu dem Arbeitsblatt, in dem Du die Formel wiederholen möchtest.

  2. Gehe zur Zelle, ab der Du die Formel wiederholen willst (zum Beispiel C10).

  3. Verwende den folgenden VBA-Code, um die Formel in den gewünschten Bereich zu kopieren:

    Sub Test()
   Range("C10:C" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=IF(RC[33]=0,R[-1]C,RC[33])"
End Sub

    Dieser Befehl wiederholt die Formel in der Spalte C basierend auf den gefüllten Zeilen in Spalte B.

  4. Führe das Makro aus, um die Formel in den Zellen zu wiederholen, bis der Wert in Spalte B erreicht ist.

  5. Für eine manuelle Wiederholung der Formel: Markiere die Zelle mit der Formel, gehe an die rechte untere Ecke der Zelle, bis ein Kreuz erscheint, und ziehe die Zelle nach unten. Ein Doppelklick auf das Kreuz kopiert die Formel bis zur letzten gefüllten Zeile.

Häufige Fehler und Lösungen

  • Problem: Die Formel wird nicht korrekt in die Zielzelle kopiert.

    • Lösung: Stelle sicher, dass Du die richtige Syntax verwendest. Der Code sollte ohne zusätzliche Zeichen wie "-1" vor der Formel geschrieben werden.

  • Problem: Der Bereich wird nicht richtig festgelegt.

    • Lösung: Überprüfe, ob die Zelle, von der aus Du die Formel kopieren möchtest, korrekt definiert ist.

  • Problem: Die Formel funktioniert nicht wie erwartet.

    • Lösung: Achte darauf, die richtigen Zellbezüge zu verwenden, z.B. =IF(AJ10=0,C9,AJ10) statt =IF(AJ10=0;C9;AJ10).

Alternative Methoden

  1. Excel-Funktion verwenden: Du kannst auch die Funktion =WENN() benutzen, um Bedingungen in Zellen zu überprüfen und die Formel entsprechend zu wiederholen.

  2. Shortcut verwenden: Nutze den Excel Shortcut Strg + D, um die Formel in der darüberliegenden Zelle nach unten zu kopieren.

  3. Zelleninhalt wiederholen: Verwende die Funktion =C10, um den Inhalt einer Zelle in eine andere zu kopieren oder zu wiederholen.

Praktische Beispiele

  • Beispiel 1: Wenn Du die Formel =ROW()*5 in Spalte A hast und sie bis zur letzten gefüllten Zeile in Spalte B wiederholen möchtest, kannst Du den VBA-Code anpassen:

    Sub Test()
   Range("A1:A" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=ROW()*5"
End Sub

  • Beispiel 2: Um eine dynamische Formel in Spalte C zu setzen, die von Werten in Spalte A abhängt, kannst Du Folgendes verwenden:

    Sub Test()
   Range("C10:C" & Cells(65536, 2).End(xlUp).Row).Formula = "=IF(AJ10=0,C9,AJ10)"
End Sub

Tipps für Profis

  • Nutze die FormulaR1C1-Methode, um Formeln flexibler zu gestalten und automatische Anpassungen bei der Kopie zu ermöglichen.
  • Halte Deinen VBA-Code sauber und benutze Kommentare, um die Funktionalität zu erklären.
  • Experimentiere mit Excel Shortcuts, um Deine Arbeitsweise zu optimieren und die Effizienz zu steigern.

FAQ: Häufige Fragen

1. Wie kann ich eine Formel in Excel wiederholen, bis ein bestimmter Wert erreicht ist?
Du kannst VBA verwenden, um den Bereich dynamisch zu setzen und die Formel in den gefüllten Zellen zu wiederholen.

2. Gibt es einen Excel-Befehl, um eine Formel schnell zu wiederholen?
Ja, Du kannst den Shortcut Strg + D verwenden, um die Formel der darüberliegenden Zelle zu wiederholen.

3. Was ist der Unterschied zwischen FormulaR1C1 und der normalen Formel?
FormulaR1C1 verwendet relative Bezüge, die beim Kopieren der Formel automatisch angepasst werden, was die Arbeit mit dynamischen Daten erleichtert.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige