Background:
I have several financial forms in Arabic and I need to translate the Financial labels to English.
Google Translate was not specific enough; so I decided to use my own dictionary.
VBA has this powerful Dictionary Object.
The problem(s):
1. VBA Editor does not like Arabic characters ( I changed Editor Format in options to Courier New (Arabic))
2. So, I decided to use a worksheet range to create the Dictionary. Excel sheet is happy with Arabic Characters
3. I cannot debug or use MsgBox ...I got ??? when I try to access the key content ( Arabic characters)
That was problem one
Problem Two:
How do I use a function in the worksheet to key in Arabic Key to get the translated English word
The function will work with an active range of Arabic words
Your help will be greatly appreciated; especially with problem TWO
I have several financial forms in Arabic and I need to translate the Financial labels to English.
Google Translate was not specific enough; so I decided to use my own dictionary.
VBA has this powerful Dictionary Object.
The problem(s):
1. VBA Editor does not like Arabic characters ( I changed Editor Format in options to Courier New (Arabic))
2. So, I decided to use a worksheet range to create the Dictionary. Excel sheet is happy with Arabic Characters
Code:
Public Sub created()
With CreateObject("scripting.dictionary")
.Add "range", Sheet1.Range("A4:B12")
MsgBox .Item("range").Rows.Count
End With
End Sub
That was problem one
Problem Two:
How do I use a function in the worksheet to key in Arabic Key to get the translated English word
The function will work with an active range of Arabic words
Your help will be greatly appreciated; especially with problem TWO