πάτημα κουμπιού και εμφάνιση μηνυμάτων
 

καλημέρα σας
Ζητώ την βοήθειά σας στο εξής:

Φανταστείτε μια φόρμα με 3 απαραίτητα πεδία σε κάθε εγγραφή και έστω ότι είμαστε σε ΝΕΑ εγγραφή.
Στην εγγραφή υπάρχει κουμπί που με το κλικ ανοίγει έκθεση (συνδεδεμένα πεδία)
(Άρα θα πρέπει η εγγραφή να είναι ολοκληρωμένη!)

Πως θα γράψω σε vba τα ακόλουθα:

Αν η εγγραφή είναι παντελώς άδεια να βγεί μήνυμα1
Αν δεν είναι παντελώς άδεια αλλά κάποιο απ' τα 3 λείπει να βγεί μήνυμα2 που να λέει ποιο λείπει.
Αν έχουν ενημερωθεί και τα 3 πεδία τότε να τρέξει ο κώδικας.

Γειά σου Χρήστο
Δες μια εκδοχή στην συνημμένη βάση

Στέλιο πράγματι κάνει αυτό που ζήτησα, σ' ευχαριστώ.
Θέλω να σε ρωτήσω κάτι.
Στο event πριν την ενημέρωση τρέχω το ακόλουθο που μου λέει ποιο πεδίο είναι κενό:

Dim strMissingInfo As Variant
Dim strMsg As Variant
If IsNull(Me.1) Then
Cancel = True
strMissingInfo = strMissingInfo & " κενό 1"
End If
If IsNull(Me.2) Then
Cancel = True
strMissingInfo = strMissingInfo & " κενό 2"
End If
If IsNull(Me.3) Then
Cancel = True
strMissingInfo = strMissingInfo & " κενό 3"
End If
If Len(strMissingInfo) > 0 Then
strMsg = "Καταχωρήστε: " & strMissingInfo
MsgBox strMsg, vbExclamation, "ΠΡΟΣΟΧΗ"
End If




Υπάρχει τρόπος στον κώδικα του κουμπιού να καλέσουμε τον προηγούμενο έλεγχο?

Με μπέρδεψες. Θές να χρησιμοποιήσεις και τις δύο μεθόδους? Δεν δουλεύει αυτή που χρησιμοποιείς?

Δεν θέλω να σε μπερδέψω!

να αντικαταστήσω ένα κομμάτι του δικού σου κώδικα με τον δικό μου θέλω.

Πάντως όταν ζητώ (στο κουμπί) Me.Dirty=false (ώστε να προκαλέσω το συμβάν πριν την ενημέρωση) δουλευει μεν (βγαίνει μήνυμα για το ποιά πεδία λείπουν) αλλά βγάζει μήνυμα λάθους 3021 (δεν υπάρχει τρέχουσα εγγραφή)

Αυτό το μήνυμα λάθους μπορώ να το καθαρίσω (να μην βγεί!);

Χρήστο
Δεν μπορώ να αναπαράγω το σφάλμα που αναφέρεις. Και με την δική σου μέθοδο δουλεύει εξίσου σωστά. Αν μπορείς ανέβασε κάποιο παράδειγμα.
Έχεις εξετάσει την εκδοχή να ορίσεις στα πεδία του πίνακα "απαιτείται" ώστε να σε προειδοποιεί η βάση όταν κάποιο πεδίο είναι κενό? Εκτός και υπάρχουν εγγραφές που κάποιο πεδίο είναι κενό.

Στέλιο θα το μελετήσω ...
Σ' ευχαριστώ :)

Καληνύχτα Χρήστο
Σίγουρα το πρωί που θα μπουν οι guru του forum θα δώσουν λύση που η προτασή μου θα φαντάζει απλοϊκή