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

Forumthread: Wert einer Zelle um 1 erhöhen

Wert einer Zelle um 1 erhöhen
Alex
Hallo VBA Gemeinde,
ich bin auf der Suche ....
den Zellenwert nach vorheriger Angabe von Wiederholungen um eins zu erhöhen.
Beispiel:
A1:_____ B1:
12345___10
12346
12347
...
12355
... ich habe schon ein wenig versucht aber die Wiederholung in der nächten Zelle... tja da verließen sie Ihn.
Vielen Dank für jegliche Hilfe
Alex
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wert einer Zelle um 1 erhöhen
18.08.2010 07:40:53
JogyB
Hallo Alex,
"Excel gut"? Dann sollte man an sowas definitiv nicht scheitern.
=WENN(A1<>"";WENN(A1-A$1<B$1;A1+1;"");"")
oder
=WENN(ZEILE(A1)<=B$1;A1+1;"")
(Hinweis: Auch wenn der Startwert nicht in der ersten Zeile steht, musst Du trotzdem mit ZEILE(A1) anfangen)
Die kommen beide in Zeile A2 und dann beliebig runterkopieren.
Gruß, Jogy
Anzeige
AW: Wert einer Zelle um 1 erhöhen
18.08.2010 08:50:03
Alex
Danke Jogy,
für deinen Vorschlag... mit =Wenn Funktionen bin ich vertraut.
Nur sollen, das habe ich nicht richtig zum Ausdruck gebracht... sich die Zellen automatisch füllen.
Ich möcht über eine Userform in Word die Eingaben:
Nr.:
Anzahl:
in Exel übergeben.
Hier wird die Nr so oft um eins erhöht wie in der Anzahl eingeben.
Anschliessend wird ein Seriendruck gestartet.
Die Exeldatei wird dabei nicht geöffnent.
Ich denke jetzt hat man eine bessere Vorstellung.
Anzeige
AW: Wert einer Zelle um 1 erhöhen
18.08.2010 09:01:21
Alex
so jetzt aber schnell....
ich habs kappiert...
Danke nochmal
weiterer Vorschlag ...
18.08.2010 07:59:42
Matthias
Hallo Alex
In A1 steht 12345
In D1 die Anzahl der Wiederholungen z.B. 10
Formel für A2:
=WENN(ZEILE()
und soweit runterkopieren, wie Du es benötigst
Bsp.
https://www.herber.de/bbs/user/71113.xls
Gruß Matthias
Anzeige
AW: weiterer Vorschlag ...
18.08.2010 08:59:43
Alex
Vielen Dank Matthias
ich stelle fest das mir noch einige Türen in Excel zu öffnen sind.
... das funktionier super.
... und sieht dabei so einfach aus!
da war unnötiger Kram drin ...
19.08.2010 08:11:13
Matthias
Hallo
betrifft meine Bsp.Datei
in A2
=WENN(ZEILE()+1;"")

das reicht schon so (und runterkopieren) ;o)
Gruß Matthias
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Wert einer Zelle um 1 erhöhen in Excel


Schritt-für-Schritt-Anleitung

Um den Wert einer Zelle in Excel um 1 zu erhöhen, kannst Du die folgende Formel verwenden. Angenommen, der Startwert befindet sich in Zelle A1:

  1. In Zelle A2 fügst Du die folgende Formel ein:
    =WENN(A1<>"";A1+1;"")
  2. Runterkopieren: Ziehe das Ausfüllkästchen in der rechten unteren Ecke von Zelle A2 nach unten, um die Formel auf die nächsten Zellen anzuwenden. So erhöhst Du den Zellenwert um 1.

Wenn Du den Zellenwert abhängig von einer Anzahl in einer anderen Zelle erhöhen möchtest (z. B. D1), kannst Du diese Formel verwenden:

=WENN(ZEILE(A1)-1<D1;A1+ZEILE(A1)-1;"")

Diese Formel berücksichtigt die Anzahl der Wiederholungen, die Du in D1 eingegeben hast.


Häufige Fehler und Lösungen

  • Formel gibt Fehler zurück: Stelle sicher, dass in der Zelle, von der Du ausgehend den Wert erhöhen möchtest, ein Wert steht. Leere Zellen führen zu Fehlern.
  • Automatische Wiederholung funktioniert nicht: Überprüfe, ob die Formel korrekt in der ersten Zelle eingegeben ist und ob sie korrekt nach unten kopiert wurde.
  • Zelle bleibt leer: Dies passiert, wenn die Bedingung in der Formel nicht erfüllt ist. Achte darauf, dass die Zelle, die Du erhöhen möchtest, nicht leer ist.

Alternative Methoden

  1. VBA-Makro: Wenn Du die Werte automatisch erhöhen möchtest, ohne die Excel-Datei zu öffnen, kannst Du ein einfaches VBA-Skript verwenden. Hier ein Beispiel:

    Sub ZählerErhöhen()
       Dim i As Integer
       Dim Startwert As Integer
       Dim Anzahl As Integer
    
       Startwert = 12345
       Anzahl = 10
    
       For i = 0 To Anzahl - 1
           Cells(i + 1, 1).Value = Startwert + i
       Next i
    End Sub
  2. Tabelle nutzen: Erstelle eine Tabelle, in der Du die Werte mit der Funktion "Autoausfüllen" schnell erhöhen kannst.


Praktische Beispiele

  • Beispiel 1: Wenn Du in Zelle A1 den Wert 12345 hast und in D1 10 eingibst, wird durch die oben genannten Formeln von A2 bis A11 die folgende Liste erstellt:

    12346
    12347
    12348
    12349
    12350
    12351
    12352
    12353
    12354
    12355
  • Beispiel 2: Wenn Du mit VBA arbeitest, kannst Du durch das Ausführen des Makros schnell eine Liste von Werten generieren, ohne die Excel-Datei zu öffnen.


Tipps für Profis

  • Verwende benannte Bereiche: Wenn Du oft mit ähnlichen Formeln arbeitest, kannst Du benannte Bereiche nutzen, um die Lesbarkeit zu verbessern.
  • Bedingte Formatierung: Nutze die bedingte Formatierung, um die Zellen hervorzuheben, die erhöht wurden.
  • Datenvalidierung: Stelle sicher, dass Eingaben in Zellen, die Du erweiterst, den richtigen Datentyp haben, um Fehler zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich eine Zelle um 1 erhöhen, ohne eine Formel zu verwenden?
Du kannst die Zelle einfach markieren und die Pfeiltaste nach oben drücken, während Du die Strg-Taste gedrückt hältst. Dies erhöht den Wert um 1.

2. Kann ich eine ganze Spalte um 1 erhöhen?
Ja, Du kannst die Formel einfach in die gesamte Spalte ziehen, um die Werte in der Spalte um 1 zu erhöhen. Alternativ kannst Du auch ein VBA-Skript benutzen, um die gesamte Spalte automatisch zu erhöhen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige