maand en dag draaien om bij schrijven naar cel

[Rens80]

Hoi,

Ik heb een userform met combobox gemaakt waarop een datum moet worden ingevoerd. Deze datum moet vervolgens worden weggeschreven naar een cel. Als dit proces heeft gedraaid staan de maand en dag omgedraaid.

Ik gebruik de volgende twee codes in VBA:

Private Sub UserForm_Initialize()
    ComboBox1.List = [index(text(date(year(today()),1,4)-weekday(date(year(today()),1,4),2)+row(1:3650),"dd-mm-yyyy"),)]
End Sub

Sheets("VB (2)").Range("BY6") = ComboBox1.Value

Iemand een idee waar het mis gaat?

Alvast bedankt voor de hulp

gr

 

[HSV]

Sheets("VB (2)").Range("BY6") =[COLOR=#ff0000] Cdate([/COLOR]ComboBox1.Value[COLOR=#ff0000])[/COLOR]

 

[edmoor]

Iemand een idee waar het mis gaat?

Het gaat niet mis, het werkt zoals het hoort.
VBA werkt altijd met Amerikaanse datum notatie mm/dd/yyyy

Zie #2 hoe dit op NL wijze naar je werkblad te schrijven.

 

[Rens80]

Het werkt!

Super bedankt