Nach If Anweisung in For Schleife den nächsten Zäh
18.05.2016 21:16:42
Oisse
ich habe folgendes Problem.
Während einer for each Schleife möchte ich eine If Anweisung einsetzen, die für jede Zeile gilt.
Nämlich:
For Each rng_Row In Selection.Rows
If wks_Art.Cells(rng_Row.Row, 4) = "ABC" Then
MsgBox "In Zeile " & rng_Row.Row & "befindet sich ein Artikel der ABC" & Chr(10) & "Der _
Artikel wird deshalb nicht aufgenommen", , "Achtung! Falscher Artikel"
End If
Allerdings möchte ich nicht nur die MsgBox haben, sondern für diesen Artikel gilt der nachfolgende Code nicht. Es soll die nächste Zeile geprüft werden und ich möchte die For Schleife auch nicht verlassen.
Wenn sich kein Artikel von "ABC" darin befindet, soll im Code weiter gemacht werden.
Wie bitte kann ich das realisieren.
Besten Dank schon mal
Gruß
Oisse