UF ComboBox über Tag Eigenschaften zurück setzen
23.07.2018 10:19:42
Lisa
Ich habe in einer Userform die alle mit Namen bezeichnet sind. z.B. cboFixum,cboMax..
Nun möchte ich die ComboBoxen über die Tag.Eigenschaft zurück setzen um nicht alle Namen zu schreiben.
Mein Versuch (der garnicht funktioniert)
Private Sub CommandButton5_Click()
Dim Cont As Control
Dim arr As Variant
arr = Array(2, 11, 22, 24, 27)
For Each Cont In Me.Controls
Select Case TypeName(Cont)
Case "ComboBox"
If Cont.Tag = (arr) Then Cont.ListIndex = -1
End Select
Next
End Sub
Gruß
Lisa