Office: Combobox mit Werten füllen

Hallo,

ich habe eine Combobox über die Symbolleiste 'Steuerungstoolbox' eingefügt und möchte dies nun mit 6 Werten befüllen.
Hab mich zwar in der Hilfe umgesehen, aber nichts geeignetes gefunden.
Ich benötige auch keine userform dafür, sondern nur die Combobox.

Ich mag einwenig auf der Leitung stehen, aber ich komm nicht drauf....

danke schonmal

:)

 

Davon ausgehend das deine ComboBox ComboBox1 heisst, dann

Code:

Um den Inhalt einmal vollständig zu löschen, dann

Code:

Muss aber "per Hand" ausgeführt werden. Eine sinnvolle Aktion wird dir da sicherlich noch einfallen!!! *wink.gif*


Wenn mir mal jemand sagen könnte wo und wie man die Werte unter den Eigenschaften eintragen kann, wäre ich sehr dankbar! *confused.gif*

 

Hallo,
um die Werte anders einzutragen :

klicke doppelt im entwurfsmodus auf die Kombobox
der VB-Editor öffnet sich dann
dann gibst du folgendes ein:
Private Sub ComboBox1_Change()
Me.ComboBox1.AddItem "Wert1"
Me.ComboBox1.AddItem "Wert 2"

End Sub

Dann klickst ud in der Symbolleiste Formular auf das Schloss und du kannst die Werte auswählen,

Meintest du das so???

 

Hi yellowsweetsun!

Leider nicht so ganz. Dein Code ist ja fast wie meiner. Läuft auch auf AddItem hinaus.

Problem bei dir ist, das jedesmal, wenn ich was in die ComboBox eintrage, also sie ändere, die Werte neu eingetragen werden. Und das sogar bei jedem Tastendruck. Das sagt ja der Prozedurname ComboBox1_Change. Kann also nicht des Rätzels Lösung sein. Auch wenn die ComboBox jetzt gefüllt wird! *wink.gif*

Gibt es nicht die Möglichkeit Standardwerte direkt in das Eigenschaftsfenster einzugeben? Ich habe nämlich keine Ahnung wo AddItem die Daten eigentlich hinschreibt. Deswegen muss ich immer den Umweg über ein Makro machen. Funktioniert zwar auch, aber vielleicht gibts da einen einfacheren Weg den ich noch nicht kenne. Bei den Formularfeldern geht das ja auch!

 

Hallo,

markiere die Combobox im Entwurfsmodus, wechsle in den vba-Editor (Alt + F11), klicke links im Projektmanager ThisDocument doppelt an, und gib nachfolgenden Code ein:

Private Sub Document_New()
Me.ComboBox1.AddItem "Text1"
Me.ComboBox1.AddItem "Text2"
Me.ComboBox1.AddItem "Text3"
Me.ComboBox1.AddItem "Text4"
End Sub

Dann als Dokumentvorlage (*.dot) abspeichern. Jetzt wird bei jedem neuen Dokument, welches anhand dieser Vorlage erstellt wird, beim Aufruf die Combobox gefüllt.