Herbers Excel-Forum - das Archiv

Datum + 3 Tage ausgeben

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
TextBox
Bild

Betrifft: Datum + 3 Tage ausgeben
von: ray

Geschrieben am: 22.04.2005 13:32:17
Hallo.
in tb4 steht das datum 31.01.05
in tb6 soll stehen 03.02.05
mein code:
Me.TextBox6.Text = Me.TextBox4.Value + 3
Mein ergebnis:
31022008
Da ist doch was falsch... Wer weiß, wie es richtig geht?
viele Grüße aus Hamburg mit schlechtem Wetter und Kopfschmerzen...
ray
Bild

Betrifft: AW: Datum + 3 Tage ausgeben
von: Christoph Scheidiger
Geschrieben am: 22.04.2005 13:52:22
Hoi ray
Meiner Meinung nach sollte das so aussehen:
Me.TextBox6.Text = Format(DateAdd("d",3,Format(Me.TextBox4.Value,"dd.mm.yy"),"dd.mm.yy")
Gruss Christoph
Bild

Betrifft: gibt syntayErr
von: ray
Geschrieben am: 22.04.2005 14:52:59
Hallo und danke,
leider läuft der code so nicht. Die idee ist super, was mag falsch sein?
gruß ray
Bild

Betrifft: AW: gibt syntayErr
von: ingoG
Geschrieben am: 22.04.2005 15:03:56
Hallo Ray,
was hälst Du von
Me.TextBox6.Text = Format(CDate(Me.TextBox4.Value) + 3, "DD.MM.YYYY")
Gruß Ingo
Bild

Betrifft: AW: gibt Syntax-Error
von: Luc:-?
Geschrieben am: 22.04.2005 15:05:45
Hallo Ray,
in der Textbox wird dein Datum offensichtlich so benutzt wie es ist und nicht zwischen nationalen Formen unterschieden (oder das muss extra eingestellt wdn). Wenn du dein Datum anderslang schreibst, wird es wohl richtig wdn.
Gruß Luc :-?
Bild

Betrifft: ok, ich chk das. Vielen Dank ersteinmal. Gruß oT
von: ray
Geschrieben am: 22.04.2005 15:14:22
d
Bild

Betrifft: AW: Datum + 3 Tage ausgeben
von: Hajo_Zi

Geschrieben am: 22.04.2005 13:53:33
Hallo ray,
ich habe es nicht geprüft aber ich vermute mal es ist richtig. Für Excel ist das Datum ein nuemrischer Wert.
Cdate(Textbox4+3)

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.



"Wer Rechtschreibfehler findet, darf sie behalten!"
 Bild
Excel-Beispiele zum Thema "Datum + 3 Tage ausgeben"
Wert in Tabelle suchen und in UserForm ausgeben Adresstabelle in UserForm einlesen und in Adressfeld ausgeben
Namen in Abhängigkeit einer Punktewertung ausgeben Datum suchen und Adresse der Fundzelle ausgeben
Datum über Zehnertastatur im Modus 1-1 als TT.MM.JJJJ ausgeben Werte in UserForm-ComboBox einlesen und ausgeben
Wert in zweiter Tabelle suchen und als Kommentar ausgeben Wert in ComboBox einlesen, suchen, editieren, ausgeben
Adressblöcke umformen und in neue Tabelle ausgeben Text in Textdateien suchen und Fundzeilen in Tabelle ausgeben