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

[mdragon]

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

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

[nasos23]

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

Private Sub Completed_BeforeUpdate(Cancel As Integer)
Dim x As String
x = DCount("Completed", "TblTaskStepsByClient", _
"Completed=0 and ClientTaskID=" & Me.IdClientTask & "")
If x > 0 Then
MsgBox IIf(x > 1, "Δεν έχουν ολοκληρωθεί " & x & " βήματα!", _
"Δεν έχει ολοκληρωθεί " & x & " βήμα!"), vbInformation, "Προσοχή!!"
     Me.Undo
       Cancel = True
    End If
End Sub

[mdragon]

Να 'σαι καλά Νάσο.
Δουλεύει τέλεια