[Tasos]

Καλησπέρα Σαράντο.
Πριν γεμίζουν τα πεδία αυτόματα όπως αναφέρεις, θα πρέπει να προσθέσεις κώδικα που να ελέγχει αν το προιον προς καταχώρηση υπάρχει ήδη στην υποφόρμα.


Αυτό μπορείς να το επιτύχεις με την εντολή Dlookup().
Παράδειγμα:

If Dlookup("Πεδίο_Barcode", "Πίνακας_της_Υποφόρμας", "Πεδίο_Barcode = '" & Τρέχον_Barcode & "'") Then
    
       'Εύρεση της συγκεκριμένης εγγραφής και αύξηση του πεδίου ποσότητας κατά 1 μονάδα
       'Πήγαινε σε νέα εγγραφή

Else

       'Αυτόματη Καταχώρηση τιμών στα πεδία
       'Πήγαινε σε νέα εγγραφή

End If

Σε ποιο συμβάν του ActiveX του Scanner ( υποθέτω ότι υπάρχουν συμβάντα ) θα βάλεις τον κώδικα,
δεν μπορώ φυσικά να το ξέρω αφού ούτε τη βάση σου γνωρίζω ούτε και το Activex που σχετίζεται με το Scanner.

Φιλικά

Τάσος