drop down box

  • Thread starter Thread starter litoquez
  • Start date Start date
L

litoquez

I am doing this for the first time. I got as far as creating the macro
for a combo box to have it appear on the slide so someone could click
on the drop down arrow and have a list of categories appear from which
they could select one. But when I view the slide the box is empty.
Can anyone walk me through this? Here is my macro:

Private Sub ComboBox1_DropButtonClick()
Sub FillBox()
With Slide6.ComboBox1
End Sub
..AddItem "Information Technology"
..AddItem "Working Capital"
..AddItem "Financial Reporting"
..AddItem "Control & Compliance"
..AddItem "Internal & External Audit"
..AddItem "Forecasting & Budgeting"
..ListIndex = 0
End With
End Sub
 
Well, let's see:

With Slide6.ComboBox1
End Sub
'other stuff here'

Doesn't look like the other stuff (AddItem) will happen!
 
You're right Bill, my bad on pasting the macro. Excluding the
inadvertent End Sub it still doesn't work for me.
 
This works here. Note that you have to be in slide show view:

Private Sub ComboBox1_DropButtonClick()
With Me.ComboBox1
.AddItem "Information Technology"
.AddItem "Working Capital"
.AddItem "Financial Reporting"
.AddItem "Control & Compliance"
.AddItem "Internal & External Audit"
.AddItem "Forecasting & Budgeting"
.ListIndex = 0
End With
End Sub
 
Back
Top