Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datum per Button erhöhen

Datum per Button erhöhen
11.07.2005 15:26:32
Christian
Hallo!
Ich hab leider gar keine VBA Kentnisse, und will einen Button erzeugen, der wenn ich darauf klicke mir den nächsten Tag automatisch in die nächste freie Zeile schreibt.
Es soll also folgendermaßen aussehen.
Ich schreibe in die Zelle A5 ein Datum z.B. 1.1.2005, klicke auf den Button und hab in A6 den 2.1.2005. Weiterer klick ergibt 3.1.2005 in A7.....
Wer kann mir bitte helfen?
Danke für jede Hilfe!
Viele Grüße
Christian

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum per Button erhöhen
11.07.2005 15:31:20
DMoser
wenn du in eine Zelle das datum eingibst und dann runterziehst wird automatisch ein tag dazu addiert
AW: Datum per Button erhöhen
11.07.2005 15:37:04
UweD
Hallo
so?

Private Sub CommandButton1_Click()
Dim LR%, Sp%
Sp = 1 'Spalte A
Columns(1).NumberFormat = "DD.MM.YYYY"
LR = Cells(Rows.Count, Sp).End(xlUp).Row 'letzte Zeile der Spalte a
Cells(LR + 1, Sp) = Cells(LR, Sp) + 1
End Sub

https://www.herber.de/bbs/user/24631.xls
Gruß UweD
(Rückmeldung wäre schön)
Erledigt: Datum per Button erhöhen
11.07.2005 15:46:03
Christian
Hallo UweD!
Danke vielmals genau, dass hab ich gebraucht!!! Funktioniert tadellos!
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige