[nasos23]

Καλησπέρα Ηλία.
Κατέβασα την βάση και φαίνεται να δουλεύει μια χαρά (ήδη έχω δημιουργήσει τρεις εγγραφές 101,102,103 χωρίς κανένα πρόβλημα).
Όσον αφορά το μήνυμα λάθους π.χ. για το πεδίο Ποσότητα1 μπορεί να διορθωθεί ως εξής:

Private Sub Ποσότητα1_AfterUpdate()
If IsNull(Υλικό1.Column(2)) Or Υλικό1.Column(2) = "" Then
Exit Sub
Else
Me.ΚόστοςΥλικού1 = Υλικό1.Column(2) * Ποσότητα1
End If
synolikoKostos
End Sub

Αντίστοιχες διορθώσεις και στα υπόλοιπα πεδία Ποσότητα.
Δες το συνημμένο αρχείο