VBA_For-Next Schleife ist fehlerhaft
Dirk
habe da noch ein Problem mit einer Schleife.
Nachstehender CODE soll im TB Eingaben Zeile 1 nach einem Wert aus TB Ausgabe A1 suchen.
Macht er auch, nur zeigt er mir immer erst die msgBox an (nichts gefunden) und wenn ich die dann x-mal bestätige, kommt dann auch irgendwann mal (m)ein gewünschtes Ergebnis :-)
...
With wsA
For i = 1 To letzteSpalteE
Set suchSpalte = wsE.Columns(i).Find(.Cells(1, 1).Value, lookat:=xlWhole)
If Not suchSpalte Is Nothing Then
Spalte = suchSpalte.Column
Else
MsgBox ("nichts gefunden")
End If
Next
End With
....
Was mach ich hier falsch?!
Kann mir bitte jemand helfen?!
Vielen Dank für deine Zeit!
Gruß Dirk