On Error Funktioniert nicht!
23.01.2009 08:11:00
gangstergamer1
Ich habe ein Textdokument welches ich in Excel einlese und dort weiterverarbeite.
Allerdings steht in der Spalte die ich auslese ab und zu "=-----MASSFLOW", damit hat VBA wohl so
seine schwirigkeiten, deswegen habe ich "On Error GoTo jump" eingebaut. Funktionierte auch super bis auf einmal wieder der Fehler in der IF abfrage auftrat: "Laufzeitfehler13 Typen unverträglich".
Wie kann es sein das die Abfrage mal funktioniert und mal nicht? Jemand eine Idee vllt? der Quelltext ist unten gepostet:
Do Until cells(Row,Col) = ""
On Error GoTo jump
If Cells(Row, Col) = "R0" Or Cells(Row, Col) = "R1" Or Cells(Row, Col) = "R2" Or Cells(Row, Col) = "R(M)" Then
Row = Row + 2
Exit Do
End If
jump:
Row = Row + 1
Loop