Hallo,
ich habe ein Makro geschrieben, das mit einer Userform arbeitet, in der in einer ComboBox werte aus Spalte A stehen:
Private Sub UserForm_Initialize()
Dim x As Long
Dim y As Long
For x = 5 To Worksheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
With UserForm1.ComboBox1
.AddItem Worksheets("Tabelle1").Cells(x, 1).Value
End With
With UserForm1.ComboBox2
.AddItem Worksheets("Tabelle1").Cells(x, 2).Value
End With
Next x
Das funktioniert auch. Dann gibt es ein Makro, dass wenn der Wert in der ComboBox dem Wert in Spalte A entspricht, aus geführt werden soll:
For x = 5 To Worksheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
If UserForm1.ComboBox1 = Worksheets("Tabelle1").Cells(x, 1).Value Then
....
Leider gibt wird die If-Bed immer als falsch geshen, obwohl die Werte ja logischer Weise gleich sind.
Woran kann das liegen, Formatierung?
Besten Dank