Hi,
kann mir jemand sagen, warum folgendes nicht funktioniert:
for s = 1 to 30
Select Case Sheets("test").Cells(s, 3).value
Case "Wert 1"
MsgBox("Wert 1 ist in Zeile" & s)
Case "Wert 2"
MsgBox("Wert 2 ist in Zeile" & s)
End Select
next s
Die Schleife soll die Zeilen 1 bis 30 in der Spalte 3 auf die Einträge "Wert 1" und "Wert 2" hin überprüfen, aber obwohl in Zeile 7 und 28 diese Einträge stehen, bekomme ich keine Meldung!
Die Einträge stimmen komplett mit dem Quellcode-String überein, d.h. keine "versteckten" Blanks!
Bemerkung: Ich will KEINE IF-Anweisung weil der Orginalcode viel mehr Bedingungen abfragt!
Dank im Vorraus!