Hi Forum,
I need your help.
I have got a ComboBox with 2 entries “conforms” and “not tested” and die Values are Russian words. The goal is to select the words in English and get the Russian words as output.
Code at the moment:
Code:
PrivateSubDocument_ContentControlOnExit(ByValContentControl AsContentControl, Cancel AsBoolean)
Dimrng AsRange
Dimbm AsBookmark
Dimbmt AsBookmark
If(ContentControl.Type = wdContentControlComboBox) Then
Setrng = ContentControl.Range
Setbm = rng.Bookmarks(1)
Setbmt = ActiveDocument.Bookmarks(bm & "tgt")
ElseIf(ContentControl.Type = wdContentControlText) Then
EndIf
EndSub
Bmt stands for the Combobox/Textfield – Textmark.
Now I got 2 problems.
On the one hand, I believe that I have to solve that problem by using a second ComboBox, cause I can’t work with Russian letters in VBA. On the other hand: How can I get the Indexchoice from the first ComboBox in a second one? Look at the image for more information.