Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Formel für bestimmte Range

Forumthread: Formel für bestimmte Range

Formel für bestimmte Range
Gunnar
Hallo Zusammen,
ich hab mal wieder ein Problem, bei dessen Lösung ich auf eure kompetente Hilfe hoffe.
Der folgende Code hat mir schon reichlich geholfen, allerdings bekomme ich es nicht hin, ihn per VBA nur in eine begrenzte Anzahl Zellen schreiben zu lassen. Also ich möchte erreichen, dass ich eine vordefinierte Formel z.B. in A4:A? eintrage. Dabei soll die Anzahl der Zeilen in die die Formel in Spalte A eingetragen wird in Abhängigkeit des Wertes der Zelle B9 stehen. (z.B. A4 = Beginn; A120 = Ende, weil in B9 eine 120 steht.
Sub ziehmichrunter()
Dim iRow As Integer
iRow = Cells(Rows.Count, 1).End(xlUp).Row '1 ist Spalte A
Range("A4").Formula = "=A3+1"
Range("A4:A" & iRow).FillDown
End Sub

Ich hoffe, ich hab mich verständlich ausgedrückt.
Vielen Dank im Voraus und viele Grüße
Gunnar
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Formel für bestimmte Range
26.08.2009 13:05:06
Helmut
Hallo Gunnar
Sub ziehmichrunter()
Range("A4").Formula = "=A3+1"
Range("A4:A" & Range("B9").Value).FillDown
End Sub
Gruß
Helmut
AW: Formel für bestimmte Range
26.08.2009 13:05:40
Rudi
Hallo,
Sub FormelRein()
Range(cells(4, 1),cells(cells(9, 2),1)).formular1c1:="=R[-1]C+1"
End Sub
Gruß
Rudi
Anzeige
Range("A4:A" & [B9].Value).Formula = "=A3+1"
26.08.2009 13:09:19
NoNet
Hallo gunnar,
die Formel kann man auch direkt eintragen :
Sub FormelDirektEintragen()
Range("A4:A" & [B9].Value).Formula = "=A3+1"
End Sub
Gruß, NoNet
AW: Formel für bestimmte Range
26.08.2009 13:23:43
Gunnar
Vielen Dank an alle drei fleißigen Helfer.
Das ging ja wieder blitzschnell und funktioniert super.
Gruß
Gunnar
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Formel für bestimmte Range in Excel


Schritt-für-Schritt-Anleitung

Um eine Excel-Formel in einem bestimmten Bereich zu berechnen, kannst du den folgenden VBA-Code verwenden. Dieser Code trägt die Formel =A3+1 in die Zellen A4 bis zur Anzahl, die in Zelle B9 angegeben ist, ein.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Gehe zu Einfügen > Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden Code in das Modul ein:

    Sub ziehmichrunter()
       Range("A4").Formula = "=A3+1"
       Range("A4:A" & Range("B9").Value).FillDown
    End Sub
  4. Schließe den VBA-Editor und kehre zu Excel zurück.

  5. Stelle sicher, dass in Zelle B9 eine Zahl steht, die die Anzahl der zu befüllenden Zellen angibt.

  6. Führe das Makro ziehmichrunter aus, um die Formel in den gewünschten Bereich einzutragen.


Häufige Fehler und Lösungen

  • Fehler: "Laufzeitfehler 1004: Anwendung oder Objekt definiert Fehler".

    • Lösung: Stelle sicher, dass der Wert in B9 eine gültige Zahl ist und dass Zelle A3 einen Wert oder eine Formel enthält, auf die verwiesen werden kann.
  • Fehler: Die Formel wird nicht korrekt ausgefüllt.

    • Lösung: Überprüfe den Bereich in der Range-Funktion und stelle sicher, dass du Range("B9").Value korrekt verwendest.

Alternative Methoden

Wenn du keine VBA-Lösung verwenden möchtest, kannst du die Formel auch manuell in die Zellen eintragen.

  1. Gehe zu Zelle A4 und gib =A3+1 ein.
  2. Ziehe die untere rechte Ecke der Zelle A4 nach unten, um die Formel auf die gewünschte Anzahl von Zellen zu kopieren.

Alternativ kannst du auch die Funktion =A3 + ROW()-3 verwenden, um die Werte dynamisch zu berechnen, ohne VBA zu nutzen.


Praktische Beispiele

Hier ist ein praktisches Beispiel, um die range in excel zu nutzen:

Angenommen, in Zelle B9 steht die Zahl 10. Der Code:

Sub ziehmichrunter()
    Range("A4").Formula = "=A3+1"
    Range("A4:A" & Range("B9").Value).FillDown
End Sub

würde die Zellen A4 bis A13 mit den Werten 1 bis 10 füllen, vorausgesetzt, A3 hat den Wert 0.


Tipps für Profis

  • Du kannst die Range-Funktion noch weiter anpassen, um verschiedene Formeln oder Bereichsreferenzen zu verwenden.
  • Wenn du häufig mit dynamischen Bereichen arbeitest, erwäge, benannte Bereiche in Excel zu verwenden. So kannst du die range excel einfacher verwalten.
  • Nutze die Debug.Print-Funktion im VBA, um Zwischenwerte während der Ausführung zu überprüfen und Fehler schneller zu identifizieren.

FAQ: Häufige Fragen

1. Wie kann ich die Formel in eine andere Spalte eintragen?
Ändere einfach die Spaltennummer in der Range-Funktion, z.B. Range("B4").Formula = "=B3+1".

2. Kann ich das Skript anpassen, um mehrere Formeln gleichzeitig einzutragen?
Ja, du kannst mehrere Formeln in verschiedenen Bereichen angeben, indem du mehrere Range-Befehle im Skript hinzufügst.

3. Was passiert, wenn der Wert in B9 kleiner als 4 ist?
In diesem Fall wird das Makro versuchen, einen Bereich zu erstellen, der nicht existiert. Achte darauf, dass B9 immer einen Wert größer als 3 hat.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige