Werte in mehreren Zellen suchen
03.12.2003 12:18:47
dominik
Call Dif_Ermitteln
i = 11 + dif
Do Until Sheets("Daten").Cells(i, 1).Value = "Versuchs-Nr.:" And Sheets("Daten").Cells(i, 2).Value = Messung1Box Or i > 1000
i = i + 1
Loop
Cells(5, 2) = i
Excel leifert mir 1001 als Wert für i, obwohl die Zahl in den Zellen steht!
Dank und Gruß!