zwei comboboxen auslesen
22.04.2009 19:14:52
Dee
Ich habe zwei Kategorien mit ComboBoxen (Deutschland, Amerika), welche bei unregelmäßige Nummer tragen
Deutschland (ComboBox 2/6/7/10/13)
Amerika (ComboBox 5/8/9/11/12)
Beide können jeweils mit yes und no belegt sein. Ich möchte mir jetzt die einzelnen Fälle in einem Textfeld darstellen lassen. Hier ist was ich bisher habe:
Dim i As Integer
Dim j As Integer
j = [5,8,9,11,12]
For i = 0 To 5
If ComboBox2 = ComboBox6 = ComboBox7 = ComboBox10 = ComboBox13 = "yes" Then
If ComboBoxj = "no" Then i = i + 1
End If
Next i
Worksheets("Tabelle1").Shapes("Textfeld 1").TextFrame.Characters.Text = "Deutschland ist alles _
ja und Amerika hat" & i & "no's"
End With
Leider funktioniert es nicht richtig. Ausserdem würde ich mir gerne anzeigen lassen, wenn Deutschland 1,2,3,4,5 mal no's hat und Amerika 1,2,3,4 bis zu 5 mal No. Ich denke die Schwierigkeit liegt auch darin, dass die ComboBoxen nicht in Zahlenfolge gelistet sind?
Viele Grüße, Dee