Hallo Ihr,
könnt ihr mir bei folgendem einen guten Rat geben:
If (Val(Left(Range("A" & lZeile).Value, 3)) > 699 _
And Val(Left(Range("A" & lZeile).Value, 3)) 740 _
And Val(Mid(Range("A" & lZeile).Value, 8, 3)) "128" _
And Val(Mid(Range("A" & lZeile).Value, 8, 3)) "126" _
And Val(Mid(Range("A" & lZeile).Value, 8, 1)) _
Das Makro liest die ersten drei Zeichen als Wert aus, ist der Wert zwischen 700 und 739 .... ;
jetzt sollen zusätzliche Wert (753 und 759) ausgelesen werden, aber keine dazwischen und keine danach!
Wie kann ich das lösen.
Herzlichen Dank für Eure Mühe im Voraus.
Arend