[RESOLVED] VB6/VBA - populate combo box in powerpoint presentation

[Giftx]

Hello everyone,
I have a powerpoint presentation. On one of my slides, I would like to add a combo box. I would like to populate the combox box with some values.

Question1:
Where and how do I put in the vb or vba code in designing this presentation?

Question2:
How do I go about populating this combo box with my values?

Note: I want this combox box to be operational when I run the presentation.
This is a new gig for me, so a clear explanation will be much appreciated.
Thanks.
GiftX.

[Hack]

Where will the values becoming from? Are you using a database?

[RobDog888]

Just drop a combobox on to your slide and use code like below to popuate it with your desired items.. It will be functional during playback.

Option Explicit

Sub LoadMe()
    ComboBox1.AddItem "Test1"
    ComboBox1.AddItem "Test2"
    ComboBox1.AddItem "Test3"
    ComboBox1.AddItem "Test4"
    ComboBox1.ListRows = 4
End Sub

Private Sub ComboBox1_GotFocus()
    If ComboBox1.ListCount = 0 Then
        LoadMe
    End If
End Sub

[Giftx]

Thanks guys. All your codes worked for me.
Have a great weekend you all.
GiftX.

[alfaN0va]

Just drop a combobox on to your slide and use code like below to popuate it with your desired items.. It will be functional during playback.

Option Explicit

Sub LoadMe()
    ComboBox1.AddItem "Test1"
    ComboBox1.AddItem "Test2"
    ComboBox1.AddItem "Test3"
    ComboBox1.AddItem "Test4"
    ComboBox1.ListRows = 4
End Sub

Private Sub ComboBox1_GotFocus()
    If ComboBox1.ListCount = 0 Then
        LoadMe
    End If
End Sub

Very old post But I want to ask again. How can we change this code to work during edit mode? Codes are working during presentation mode only.