Find the current user language

Question

How can I tell the current user language in a vba program?

I need this to show a form in an appropriate language.

Answer 1

Select Case Application.International(xlApplicationInternational.xlCountryCode) 
   Case 1: Call MsgBox("English") 
   Case 33: Call MsgBox("French") 
   Case 49: Call MsgBox("German") 
   Case 81: Call MsgBox("Japanese") 
End Select 

Straight out of here: https://bettersolutions.com/vba/macros/region-language.htm

Relevant Documentation: https://docs.microsoft.com/en-us/office/vba/api/excel.xlapplicationinternational