Probleem met datum wegschrijven

[henkievermeer]

Hallo,

Ik heb veel geprobeerd om dit zelf op te lossen door veel op het forum te zoeken en dingen te proberen, maar helaas nog geen resultaat.
Ik wil via een userform een datum in een tabblad zetten, maar het blijft maar de Amerikaanse notitie.
Als ik dus 1-5-2016 in vul wordt het in het tabblad 5-1-2016, terwijl het 1-5-2016 moet zijn.

Ik heb het bestandje erg ingekort. Dit bestandje heb ik van het form gehaald en ik heb er veel aan aangepast.
Wie heeft voor mij een oplossing om de datum goed weg te scheren.
Alvast bedankt.
Henkie

 

[edmoor]

VBA gebruikt altijd de Amerikaanse notatie. Maak er dus eens dit van:
Format(txtKeuringsDatum.Text, "DD-MM-YYYY")

 

[henkievermeer]

Edmoor,
Dat heb ik ook geprobeerd, maar toch wordt de datum niet goed weggeschreven.

Dit heb ik er in staan.
MyRange.Range("H" & c.Row) = Format(txtKeuringsDatum.Text, "DD-MM-YYYY")

 

[edmoor]

Maak er dan dit van:
DateValue(txtKeuringsDatum.Text)

 

[henkievermeer]

Edmoor,

Werkt perfect! Bedankt.