[ Φόρμες ] Σύνδεση δύο υποφορμών

[mdragon]

Καλημέρα σε όλη την παρέα,
Επανέρχομαι με ένα παλιότερο ερώτημα προς τελειοποίηση του.
Έχω μία φόρμα στην οποία έχω συνδέσει δύο υποφόρμες.
Στον αριστερό πίνακα είναι τα έργα και στον δεξιό οι εργασίες των αντίστοιχων έργων.
Στα έργα όπως και στις εργασίες υπάρχει το πεδίο Ολοκλήρωση.
Πώς μπορώ να καταφέρω να μην με αφήνει να ξετικάρω το πεδίο Ολοκήρωση (εργασίας στην δεξιά φόρμα) όταν η ολοκλήρωση του αριστερού πίνακα είναι επιλεγμένη.



Ανεβάζω δείγμα της βάσης ώστε να καταλάβετε καλύτερα αυτό που θέλω να περιγράψω

[nasos23]

Καλημέρα Μάρω.
Δοκίμασε:

Private Sub Completed_BeforeUpdate(Cancel As Integer)

   If DLookup("Completed", "TblClientTasks", "Completed<>null and" _
   & " IdClientTask = " & Me.ClientTaskID & "") = True Then

    MsgBox "Δεν μπορείτε να κάνετε αλλαγές αν δεν αποεπιλέξετε " _
    & "το πεδίο Ολοκλήρωση της φόρμας Έργα!!", vbInformation, "Προσοχή!!"
     Me.Undo
       Cancel = True
    
 End If

End Sub

[mdragon]

Να ΄σαι καλά Νάσο μου.