Million thanks for the details. Unfortunately I can not use your method. Most of our PCs in manufacturing line, are set not to connect to internet (by IT) to prevent data breach and Leakage of corporate information.I use 2 functions: Translate & TranslateXL
Both work in a similar way & can translate from a Latin character set language to a Unicode character set language such as Arabic, Japanese etc
Each sets up a URL to use Google Translate & grabs the output string then processes it
However, only the TranslateXL function can handle translation from a Unicode character set, so I normally use that
An Excel instance is used as an intermediary to setup the encoded URL needed to run the translation
I bypass the locale issue by entering the text in e.g. English & translating each section in code first
For example
Code:Private Sub cmdUnicode_Click() On Error GoTo Err_Handler Dim intID As Integer, strP As String, strT As String, strD As String strP = TranslateXL("Enter a Record ID between 1 and 27", "En", strLang) 'prompt strT = TranslateXL("Select Record ID", "En", strLang) 'title strD = TranslateXL("Record Number", "En", strLang) 'default value 'UnicodeInputBox works correctly for non-Latin character set 'The 9000 & 5000 are x & y positions- omit to centre on the screen 'get the return value intID = UnicodeInputBox(strP, strT, strD, 9000, 5000) 'use to move to specified record DoCmd.GoToRecord , , acGoTo, intID Exit_Handler: Exit Sub Err_Handler: If Err = 13 Then Exit Sub 'user made no entry or pressed cancel MsgBox "Error " & Err.Number & " in cmdUnicodeInputBox_Click procedure: " & Err.Description Resume Exit_Handler End Sub
strLang is the code for the language being translated into e.g. ko, ja etc & is set elsewhere
I think I will stick to pre-translated table method.
I really appreciate your time.
Thank you.