ComboBox and UserForm_Initialize

[Guest]

I am trying to implement a comboBox using the controls menu. I have writtem a
UserForm_Initialize routine but it seems not to execute. When I click on the
drop down all I get is a blank dropdown space with the down arrow. The drop
down menu is not populated (initialized), However if I use the debugger to
step through the UserForm_Initialze routine all works fine the comboBox is
populated and I can make different selections. What gives? When/How is the
UserForm_Initialize routine executed? How can I force the routine to be
executed ? Or is there something else I need to do?

-Thanks in advance

 

[Doug Robbins - Word MVP]

How are you calling the UserForm?

Is it really a UserForm or have you inserted controls directly into the
document from the View>Toolbars>Control Toolbox?

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Guest]

I used the View>Toolbars>Control Toolbox. After adding the ComboBox I right
clicked , then view code. Which placed me into Visual Basic. I added the
UserForm_Initialize code as shown in the VBA help example.

Which contains:

Private Sub UserForm_Initialize ()

ComboBox1.AddItem "Above Left"
ComboBox1.AddItem "Above Center"
ComboBox1.AddItem "Above Right"
ComboBox1.AddItem "Below Left"
ComboBox1.AddItem "Below Center"
ComboBox1.AddItem "Below Right"
ComboBox1.AddItem "Centered"

'Use drop-down list
ComboBox1.Style = fmStyleDropDownCombo

'Combo box values are ListIndex values
ComboBox1.BoundColumn = 0

'Set combo box to first entry
ComboBox1.ListIndex = 0
End Sub



I also added the ComboBox1_Change and _Click code into the same window
(titled the same name as my word doc - This Document). The _Change code works
but the Dropdown List is not populated.

Should I place the Initialization code elsewhere ?

-Scott

 

[Doug Robbins - Word MVP]

A document in which you place a combobox from the controls menu is not a
userform. As a result, there is no userform initialize event that can be
used to populate your combobox.

While I would never use a combobox of that type in a document, if you want
to, you can get it populated by the use of code such as the following in the
This Document module

Private Sub ComboBox1_GotFocus()
Dim i As Long
For i = ComboBox1.ListCount - 1 To 0 Step -1
ComboBox1.RemoveItem (i)
Next i
ComboBox1.AddItem "Above Left"
ComboBox1.AddItem "Above Center"
ComboBox1.AddItem "Above Right"
ComboBox1.AddItem "Below Left"
ComboBox1.AddItem "Below Center"
ComboBox1.AddItem "Below Right"
ComboBox1.AddItem "Centered"
End Sub


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

 

[Guest]

Thanks for your help! I'll give that a try today!

I'm using the ComboBox because I would like to have choices of some rather
long strings to be placed into a comment area on my form. These strings are
larger than the 50 chars that are standard in the Dropdown form type. Any
other
suggestions ?

-Thanks

 

[Doug Robbins - Word MVP]

I would use a userform. See the article "How to create a Userform" at:

http://word.mvps.org/FAQs/Userforms/CreateAUserForm.htm

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP