Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1240to1244
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
Inhaltsverzeichnis

Datum berechnen

Datum berechnen
Wolfgang
Hallo,
in der TextBox5 befindet sich ein Datum und in TextBox7 (jeweils auf einem UF) die Angabe in Monaten. Wie kann ich erreichen, dass in TextBox6 das errechnete Datum -TextBox5 + Dauer in Monaten- erscheint. Danke schon jetzt für die Rückmeldungen.
Gruß - Wolfgang

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datum berechnen
01.12.2011 13:06:07
Rudi
Hallo,
so:
Private Sub TextBox7_Change()
Dim dteTmp As Date
If IsDate(TextBox5) And IsNumeric(TextBox7) Then
dteTmp = CDate(TextBox5)
TextBox6 = DateSerial(Year(dteTmp), Month(dteTmp) + TextBox7, Day(dteTmp))
Else
TextBox6 = ""
End If
End Sub

Gruß
Rudi
Danke Rudi, klappt super!!
01.12.2011 16:03:05
Wolfgang
Hallo Rudi,
vielen herzlichen Dank für Deine schnelle Rückmeldung und Überlassung des Codes. Das klappt wunderbar und erleichtert mir erheblich die Arbeit. Hab nochmals meinen tiefen Dank dafür.
Gruß und einen schönen (verregneten) Tag noch!
Wolfgang
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige