Determine Regional Settings Through VBA

[ktwclark]

Hi

I'm looking for an easy way to determine the Regional Settings within Excel. I'm looking to determine the short date format. Any ideas?

Thanks

 

[PeterMoran]

Hi,

You need to check out the International property in the VBA Help.

This is sample code that I use downunder to ensure that the Regional settings are the way I want them:

' Check that the date format is d-m-y - NOT m-d-y (problems!!)
If Application.International(xlMDY) = True Then
Message = "The Windows date format is 'mm-dd-yy' instead of 'dd-mm-yy'. " & (Chr(13)) & _
"Please go to Control Panel and change Regional Settings to " & (Chr(13)) & _
"** English(Australian) ** and then restart Excel."
Title = "Windows Date Format"
MyValue = MsgBox(Message, , Title)
End
End If

I hope this helps.

Regards,

Peter Moran

 

[ktwclark]

I'm looking to determine the short date format. The code you've supplied determines the country setting.

 

[ktwclark]

xlDateOrder is the one I'm looking for. Thanks, though, cause you pointed me in the right direction.