Ich habe plötzlich einen Laufzeitfehler "9" nach Eingabe einer Zahl. Dieser tritt aber nicht bei jeder Zahl auf. Habe bereits alle Formatierungen durchgeschaut.
Habe eine Userform, wo ich eine nur Vorgangsnummer eintrage über:
Private Sub OK_Click()
Dim X As Integer
Z = ActiveWorkbook.Sheets(1).UsedRange.Rows.Count
X = Vorgangsnummer
temp = 0
For i = 2 To Z
If ActiveWorkbook.Sheets(1).Cells(i, 1) = X Then
temp = 1
Exit For
End If
Next
If temp = 1 Then
Unload Me
zeile = i
Userform1.Show
Else
MsgBox "Vorgang nicht gefunden!", vbExclamation
Vorgangsnummer = ""
End If
End Sub
Die Vorgangsnummer wird gesucht und an Userform1 übergeben, wo weitere Daten aus der Tabelle drinstehen. Auf einmal habe ich bei einigen Vorgangsnummern diesen Laufzeitfehler welcher bei Userform1.Show (fett markiert) angezeigt wird bzw. die Übergabe stoppt, jedoch nicht bei allen. Habe bereits die Zeilen aus der Tabelle kontrolliert und wie gesagt auch alle gleich formatiert. Keine Änderung! Einige lassen sich aufrufen und in Userform1 einlesen, bei manchen erscheint ein dieser Laufzeitfehler.
Wo kann der Fehler liegen?
Viele Grüße
Micha