ich habe auf einer Userform eine ComboBox mit dem Code:
Private Sub ComboBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim tmp, dte As Date
tmp = Split(ComboBox2)
With DTPicker_Eintritt
If tmp(1) Like "Tag*" Then
dte = DateSerial(.Year, .Month, .Day + tmp(0))
Else
dte = DateSerial(.Year, .Month + tmp(0), .Day)
End If
End With
Ende_Probezeit = dte
End Sub
Wenn ich die ComboBox verlasse ohne einen Wert auszuwählen kommt Laufzeitfehler 9 "Index außerhalb des gültigen Bereichs". Wie kann ich diesen Fehler abfangen? Gruß Rapter