S
Simon
Hi
I currently design a Word letter template for our
Administration Department.
It contains a UserForm which pops up when you open the
DOT file. The UserForm has several fields which you can
complete and as soon as you hit the okay button all the
content is populated into the document (Linked with
bookmarks).
On of the fields in the UserForm is a ComboBox where I
would like to select a person. This works and I can
select the person, but when I select another person the
list doubles the content and if I select another person
again the list triples.
Can you see any mistake in my code?
-------------------------------------------------
Private Sub ComboBox1_DropButtonClick()
Dim Von, Mitarbeiter
Mitarbeiter = Array("A", "B", "C", "D")
For Each Von In Mitarbeiter
ComboBox1.AddItem Von
Next
ComboBox1.ListRows = 0
End Sub
I currently design a Word letter template for our
Administration Department.
It contains a UserForm which pops up when you open the
DOT file. The UserForm has several fields which you can
complete and as soon as you hit the okay button all the
content is populated into the document (Linked with
bookmarks).
On of the fields in the UserForm is a ComboBox where I
would like to select a person. This works and I can
select the person, but when I select another person the
list doubles the content and if I select another person
again the list triples.
Can you see any mistake in my code?
-------------------------------------------------
Private Sub ComboBox1_DropButtonClick()
Dim Von, Mitarbeiter
Mitarbeiter = Array("A", "B", "C", "D")
For Each Von In Mitarbeiter
ComboBox1.AddItem Von
Next
ComboBox1.ListRows = 0
End Sub