Hi,

I've made a userform. The data entered is then saved into a combobox.
The data in the combobox is saved to a worksheet using the following code:


Private Sub knop_cmdAdd_Click()

    Hide                                                                                    
    With Sheets("database").Cells(1, 1)
        .CurrentRegion.Offset(1).ClearContents                                             
        .Offset(1).Resize(keus.ListCount, UBound(keus.List, 2) + 1) = keus.List     

    End With
          
    ActiveWorkbook.Save                                                               
End Sub
In the Userform are some textboxes with a format dd/mm/yyyy. When i save the data in the combobox it saves as dd/mm/yyyy (but i'm not sure)
When I add the data from the combobox to the worksheet the dates that start with day 1 till 12 change into mm/dd/yyyy.

I want to add something to my cmdAdd sub that saves everything with regional settings, not American.
I've tried serveral things that i've found on the web but nothing seems to work.

Can anybody give me a solution?