Možda ne bi bilo loše da skinuti artikl, odnosno čekirano polje bude vidljivo u subformi pa ako je pogrešno biran proizvod samo ga dečekira i ponovo bude u combo box-u.
Za dupli izbor artikla napisati neki kod dupliranja uz MsgBox.
code:
Private Sub Sifra_BeforeUpdate(Cancel As Integer)
Dim rs As Recordset
Set rs = Form.RecordsetClone
If rs.RecordCount > 0 Then
rs.MoveFirst
Do While Not rs.EOF
If rs!Sifra = Me.Sifra.Value Then
MsgBox "Artikl je ranije biran!", vbInformation, "Obaveštenje"
Me.Undo
End If
rs.MoveNext
Loop
End If
Set rs = Nothing
End Sub
Teško je biti direktor a još teže ne biti!?