Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

problem mit verarbeitung von Datum in sheet

Betrifft: problem mit verarbeitung von Datum in sheet von: ray
Geschrieben am: 02.09.2004 08:18:48

Hallo, ich hab obiges Probl

In meiner Tabelle sind in spalte 16 datum eingetragen z. B. 01.01.03. Die spalte ist als datum formatiert.

In einem sub will ich die daten verarbeiten, was mir nicht gelingt.
die tabelle wird zeile für zeile abgearbeitet und wenn das datum anders ist als ZtRv dann soll was passieren. Ich definiere:


ZtRv = Format(TextBox1 & "." & TextBox2 & "." & TextBox3, "dd.mm.yyyy")

später im Modul:
If Format(Worksheets("" & mL).Cells(x, 16).Value, "dd.mm.yyyy") <= ZtRv ...


Problem ist nur, daß die aus der Tabelle ausgelesenen Daten oder das ZtRv Datum nicht verglichen werden können. Eins der Beiden schein doch keine Datum zu sein.

Was kann ich tun?

Viele Grüße aus Hamburg, blauer Himmel 11 Grad
Ray

  


Betrifft: AW: problem mit verarbeitung von Datum in sheet von: Harald Kapp
Geschrieben am: 02.09.2004 08:27:05

Hallo Ray,
DIM ZtRv as Date.

Dann kannst Du direkt mit einem Datum arbeiten:

ZtRv = dateserial(Textbox3, Textbox2, Textbox1) '(yy,mm,dd)
if Cells(x,16).value <= ZtRv Then ...

Gruß Harald


  


Betrifft: AW: problem mit verarbeitung von Datum in sheet von: ray
Geschrieben am: 02.09.2004 09:10:49

Hallo Harald,

suuuuper genau was ich brauchte. Hab gestern einen halben Tag !!! nach der lösung gesucht und durch Dich in 10 minuten erledigt...

Danke und Gruß aus Hamburg

Ray


 

Beiträge aus den Excel-Beispielen zum Thema "problem mit verarbeitung von Datum in sheet"