Thread: [Solved] Date Format for days 01-12 are americanized
View Single Post
 
Old 09-08-2015, 01:33 PM
NoSparks NoSparks is offline Windows 7 64bit Office 2010 64bit
Excel Hobbyist
  
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 842
NoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of light
Default
Glad you got the situation rectified.

For what it's worth, I think the root of the problem is actually in the CommandButton1_Click procedure of the ufPrograms userform.
Commenting out the second formatting line allowed everything to display dd/mm/yyyy as desired and on my machine and I have Regional Settings Short Date set as M/d/yyyy.

Code:
Private Sub CommandButton1_Click()
    Me.pDate.Value = Format(CalendarForm.GetDate, "dd/mm/yyyy")
    'Me.pDate.Value = Format(Me.pDate.Value, Text)
End Sub
Reply With Quote