If Bedingung - tut nicht
06.09.2007 05:01:00
Ralf
Ich würde gern eine eigentlich recht simple if then Bedingung ausführen, leider will diese aber nicht wie ich.
If Left(Worksheets(1).Cells(m, n), 1) Left(Worksheets(3).Cells(o, p), 1) And _
Right(Worksheets(1).Cells(m, n), 1) Right(Worksheets(3).Cells(o, p), 1) Then
Worksheets(3).Cells(o, 29) = 4
Es werden vier-stellige Zahlen verglichen, sobald erste und letzte Ziffer NICHT übereinstimmen, soll in die gleiche Zeile, Spalte 29 auf Blatt 3 eine "4" geschrieben werden.
Warum auch immer, es schreibt auch eine "4" hinein, wenn die letzten Ziffern übereinstimmen, was sie ja nicht sollen. :(
Hat jemand eine Idee?
Anzeige