Public Sub LangGetSet(source As Integer) 'scroll through Language sheet and check against ID passed in If source = 1 Then If language = "English" Then language = "French" 'set date format of Period_End_Date to French (i.e. 20 Mai 2011) ElseIf language = "French" Then language = "English" 'set date format of Period_End_Date to English (i.e 20 May 2011) End If End If End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
11 Experts available now in Live!