Russian ComboBox Value

KKChris · #1 02-17-2014, 03:11 AM

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.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
combobox issue	Deepa Shrestha	Word	0	07-29-2013 09:47 PM
Typing in Russian	shekala	Outlook	0	11-12-2012 05:57 PM
ComboBox ListIndex = -1 even though it does NOT = -1	Joe Patrick	Word VBA	0	08-03-2011 08:34 AM
Code to export value from ComboBox	ilkks	Word VBA	7	05-25-2011 04:06 AM
Combobox manipulation	vsempoux	Word VBA	3	10-31-2009 08:58 AM