combo box in word

wperry · #1 03-21-2012, 01:07 PM

I am creating a new tab in word 2010 for custom templates
My xml file is working great and adds 5 buttons on the tab inserted after the info tab. Beside each button I have a combo box that has 9 items
can anyone tell me how I can make my button onAction event open a

OpenFileDialog() based on the cbo selection??
Here is the code I am trying

Code:

Sub OnAction(ByVal control As IRibbonControl)
Dim myStream As Stream = Nothing
Dim openFileDialog1 As New OpenFileDialog()
If "cbo01" = "item01" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxxxxx
ElseIf "cbo1" = "item02" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxx
ElseIf "cbo1" = "item03" Then
  openFileDialog1.InitialDirectory = \\xxxxxx
ElseIf "cbo1" = "item04" Then
  openFileDialog1.InitialDirectory = \\xxxxxxx
ElseIf "cbo1" = "item05" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxxx
ElseIf "cbo1" = "item06" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxxx
ElseIf "cbo1" = "item07" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxxx
ElseIf "cbo1" = "item08" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxx
ElseIf "cbo1" = "item09" Then
  openFileDialog1.InitialDirectory = \\xxxxxxxx
End If
openFileDialog1.ShowDialog()
End Sub

TIA

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Combo Box in VB Forms help	Cbrehm	Excel Programming	5	05-13-2011 03:08 AM
Combo Box populate from range	ioustinos	Excel	1	09-01-2010 09:18 AM
Combo Box in whole column	ioustinos	Excel	1	09-01-2010 01:24 AM
VB Code.. COmbo boxes	DrewB	Word VBA	4	06-10-2009 05:31 AM
Hide a combo box	DrewB	Word	3	06-08-2009 11:29 PM