UserForm werkt met mm-dd-yyyy en het Excel sheet met dd-mm-yyyy.

[Roy71]

Hallo,

In mijn UserForm worden een paar datums weggeschreven naar mijn Excel tabel.
10-04-2020 in het UserForm word 10-04-2020 in de tabel.
Als ik het UserForm weer laad om gegevens aan te passen haalt hij de gegevens weer uit de tabel.
10-04-2020 in de tabel word nu 04-10-2020 op het UserForm
Als ik hem nu opsla word 10 april 4 oktober.
De volgende keer als ik hem open word 04-10-2020 weer 10-04-2020.
De UserForm werkt met mm-dd-yyyy en het Excel sheet met dd-mm-yyyy.
De UserForm ziet dat wel als hij de gegevens ophaalt maar niet als hij ze weg schrijft.
Weet iemand hoe ik dit kan aanpassen?

 

[edmoor]

Schrijf een datum uit de Userform naar je tabel met: Range("A1").Value = CDate(Textbox1.Text)

 

[Roy71]

Bedankt voor de oplossing, heb het uitgeprobeerd en het werkt goed!
Nu loop ik alleen tegen het probleem aan dat ik een foutmelding krijg al ik geen datum in vul.

 

[edmoor]

Controleer dan voor het weg schrijven of het wel een datum is:
https://www.techonthenet.com/excel/formulas/isdate.php

Dus:

If IsDate(TextBox1.Text) Then Range("A1").Value = CDate(Textbox1.Text)