Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.04.2025 15:55:51
2x WENN Formel in einer Zelle
29.04.2025 14:56:21
Wenn oder VBA?
29.04.2025 13:03:33
Löschen von Zeilen
29.04.2025 11:32:32
Private Sub macht Probleme
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
128to132
128to132
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wert um 1 erhöhen

Forumthread: Wert um 1 erhöhen

Wert um 1 erhöhen
16.06.2002 13:23:51
Jens
Hallo Excelfreunde
ich möchte per Makro unter der letzten gefüllten Zelle in Spalte 1 den Wert der letzten Zelle um 1 erhöht einfügen. Wie mache ich das?
Vielen Dank im Voraus Jens
Anzeige

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

Kategorie
Automatisierung
Tags
#letzte zelle #makro #werte
Relevante Fragen
Anzeige
Betreff
Datum
Anwender
Anzeige
Re: Wert um 1 erhöhen
16.06.2002 14:04:44
Ramses
Hallo Jens,

Dieses Makro in ein Modul kopieren und ausführen


Re: Wert um 1 erhöhen
16.06.2002 14:10:26
stonee
Hey jens,

probier mal so:
funktioniert fuer Spalte A und erstes Sheet des Workbooks

--------------------------------------------------
Dim currentcell As Variant
Dim tempcell As Variant

Set currentcell = Sheets(1).Range("A1")

While Not IsEmpty(currentcell)

Set tempcell = currentcell.Offset(1, 0)
Set currentcell = tempcell

Wend

tempcell = currentcell.Offset(-1, 0)
currentcell.Value = tempcell + 1
--------------------------------------------------

gruss,
stonee

Anzeige
Re: Wert um 1 erhöhen
16.06.2002 14:19:42
stonee
hey ramses,

wieder was gelernt in excel, mit dieser end property!

Re: Wert um 1 erhöhen
16.06.2002 15:17:39
Ramses
Jeder programmiert eben auf seine Weise :-))
Wichtig ist nur das Ergebnis.

Gruss Rainer

Forumthreads zu verwandten Themen

Erstellungsdatum bzw. Änderungsdatum in Zelle
di

Hi Forum!
ich habe eine Tabelle mit Adressen (Liste) und möchte gerne beim hinzufügen eines neuen Datensatz beziehungsweise bei Änderung, das aktuelle Datum mit Uhrzeit und Benutzername automatisch in die vordefinierte Zelle eintragen lassen.
Beispiel:
RegistriertAm RegistriertVon G...
01.09.2008 13:22:00
Thread-ID: 1006414
10 Beiträge
Schleife nächste Zelle +1
Michael

Hallo!
Wie schaff ich es in die letzte zelle zu gehen und den wert + 1 in die nächste zelle zu schreiben,
Muss ich dann mit offset arbeiten?
Mein Code!
Gruß Michael
Sub zeileLetztePlusEins() Dim zeile As Integer Dim zeileMax As Integer Dim WertZeile As Long With Sheets("...
02.02.2009 09:39:26
Thread-ID: 1046079
7 Beiträge
OHNE VBA Wert aus Zelle +71
Tom

Hallo zusammen,
kann mir jemand sagen ob es die Möglichkeit gibt über eine Formel beim runter ziehen eines Zellbezugs den Wert des Bezugs um 71 Spaltenb zu verschieben?
Beispiel:
Tabelle1 hat in der A1 Zelle einen Wert, in der A72 Zelle wieder einen und nach weiteren 71 Zeilen wiede...
17.06.2009 00:09:09
Thread-ID: 1082093
5 Beiträge
Autofilter: 1 Kriterium für 2 Spalten
Stefan

Guten Morgen,
kann mir jemand bei folgender Frage helfen ?
Ich habe 2 Spalten, die mit Werten gefüllt sind. Nun habe ich mit dem Textfeld aus der Steuerelemente-Toolbox ein Suchfeld erschaffen. Sobald hier ein Suchbegriff eingegeben wird, sollen die beiden Spalten durchsucht und die Erg...
22.10.2009 10:51:27
Thread-ID: 1111254
5 Beiträge
Zählen "U" Summe übertragen aus Zelle CR10
Steffi

Hallo Zusammen,
Sitze mal wieder da und bekomme es nicht gebacken.
In Zelle CR10 wird Bereich =ZÄHLENWENN(C10:CN10;"U") überprüft auf "U" und werden gezählt.
In Zelle CR31 wird Bereich =ZÄHLENWENN(C31:CO31;"U") überprüft auf "U" und werden gezählt.
So weit gut, nun soll folgende...
06.02.2010 20:59:44
Thread-ID: 1136466
3 Beiträge
Letzte belegte Zelle + 1
Walter

Hallo zusammen,
habe mal diese Makrozeilen erhalten.
Dim rngFind As Range
Set rngFind = Sheets("Haus").Columns(4).Find(What:="Whg1")
ActiveSheet.Cells(rngFind.Row, 1).Select
Ich möchte das jetzt ändern, komm leider nicht drauf auf such die letzte belegte Zelle
+ 1 d...
03.03.2010 15:26:55
Thread-ID: 1143032
3 Beiträge
Anzeige
Erhöhung einer Zahl um 1 in TextBox
Josef

Hallo!
Ich habe in einem Arbeitsblatt mehrere Datensätze stehen.
Beispiel:
411143272000922000000001300
411143272000922000010141100
4111432720009220000203D0104
4111432720009220000303D0104
4111432720009220000403D0104
4111432720009...
13.04.2010 10:10:40
Thread-ID: 1151362
5 Beiträge
Addition: Zelle A1 + B1; Ergebnis in Zelle B1; Nac
reiner

Hallo Leute,
vor 2 Tagen hatte ich einen Beitrag unter der gleichen Überschrift an dieses Forum gesandt.
Hajo_Zi gab mir den Rat: unter Optionen Iteration 1 zu aktivieren. Das habe ich getan, die Berechnung funktionierte auch.
Allerdings habe ich erst danach festgestellt dass zu dem...
08.05.2010 11:08:09
Thread-ID: 1156186
8 Beiträge
Änderungsdatum in Zelle
Kempkens Ralf

Kann man mit einer Formel in einer Zelle das Änderungsdatum (lezte Änderungen) und das Datum der erstmaligen Erstellung einer Datei anzeigen lassen?

28.04.2002 10:24:01
Thread-ID: 116948
2 Beiträge
Datum in Zahl umwandeln (1.6.2009 -> 2009,5)
Grabner

Hi,
ist es möglich ein Datum wie z.B. den 1.6.2009 in eine Zahl wie 2009,5 umzuwandeln? Gibt es dafür eine Funktion?
Grüße
Franz
26.01.2011 15:39:56
Thread-ID: 1197454
7 Beiträge
Jahreszahl um 1 erhöhen
Chris

Hallo Leutz,
ich möchte per Formel folgendes lösen. Immer wenn der Monat 7 in Zelle A1 erreicht ist, soll sich die Jahreszahl in A2 um eins erhöhen. Letztere soll sich also jedes Jahr am 01.7 um den Wert eins erhöhen. Ich habs mit =Wenn(A1=7;a2+1) probiert. Leider tuts sich gar nichts. Hat...
09.07.2011 14:19:10
Thread-ID: 1221488
3 Beiträge
Zellwert um 1 erhöhen
Walter

Hallo Excelfreunde,
Ich möchte den Zellwert(A1) 2500, per Mausklick oder einem Tastendruck um 1 erhöhen.
Danke für Euere Hilfe.
Gruß
Rentner Walter
17.05.2012 13:53:49
Thread-ID: 1263866
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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