ich habe im Netzwerk ein Berechungsprogramm unter VBA entwickelt. Dies läuft dort auch wunderbar. Nachdem jetzt unsere Aussendienstler mit Laptop ausgestattet wurden habe ich dieses Programm dorthin kopiert. Allerdings bricht es bei der Eingabe von Werten mit dem Hinweis: "Projekt oder Bibliothek nicht auffindbar" in folgendem Modul ab und bleibt bei "Chr(KeyAscii)" hängen:
Private Sub EingabePrüfen(ByVal KeyAscii As MSForms.ReturnInteger, strBisher As String)
Select Case Chr(KeyAscii)
Case "0" To "9"
Case Chr(vbKeyBack)
Case ",", "."
If InStr(strBisher, ",") <> 0 Then
KeyAscii = 0
Else
KeyAscii = 44
End If
Case Else
KeyAscii = 0
End Select
End Sub
Was fehlt hier und wie kann ich das nachbessern. Bin für jeden Tip dankbar.
Liebe Grüße
Anna