VBA in PowerPoint - ComboBox mit Werten füllen
15.06.2018 15:33:31
Daniel
Hoffentlich kann mir hier jemand helfen, auch wenn es um PowerPoint und nicht um Excel geht.
Für eine Präsentation brauche ich eine ComboBox auf einem Slide.
Das ist alles kein Problem - auch nicht die Berechnungen, Formeln, Umsetzungen und Eintragen der Ergebnisse.
Was mich stört ist, dass ich die ComboBox nur extrem umständlich befüllen kann.
Im Moment sieht es so aus:
Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
ComboBox1.Clear
Me.ComboBox1.AddItem "Text-1"
Me.ComboBox1.AddItem "Text-2"
Me.ComboBox1.AddItem "Text-3"
End Sub
Das klappt - aber ich muss jedesmal erst die Präsentation starten, einmal den Button klicken, die Präsentation abbrechen und kann dann erst mit den Werten arbeiten.
"ComboBox1.Clear" ist nötig, weil die ComboBox sonst bei jedem folgendem Klick alle frei Zeilen erneut einließt.
In Excel stehen mir da viele Wege offen wie ich das machen kann - aber ich finde keinen Weg in PowerPoint.
- Zellbezüge fallen aus.
- Befüllen bei Start einer UF fällt aus
- Befüllen bei Start der Mappe fällt aus
- Befüllen bei aktivieren des Slides hab ich ehrlich gesagt noch nicht probiert (muss erstmal schauen wie ich den ansprechen kann)
Hat jemand eine Idee, wie ich das weniger umständlich hin bekomme?
Und wie gesagt:
Ich weiß das es nicht Excel ist - wäre aber dennoch sehr froh, wenn hier jemand ist der mir da weiter helfen kann.
Danke schon im voraus.
Daniel