Get the language for non unicode programs with VBA

[nd0911]

Hello,

Is it possible to get with VBA code the language (or a some kind of representative number of that language) that are configure for the "non unicode programs" in the control panel>Region>Administrative ?

 

[James006]

Hi,

Getting the System's CodePage is a very smart solution !!!

With CreateObject("WScript.Shell")               
        CodePage = .RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage\OEMCP")
End With