كيف امنع التكرار بشرطين مع العلم اذا حذفت الشرط الثاني تشتغل و لو تركت الرشطين بتفشل
الرجاء المساعدة
If IsNull(Me.NICHE) Then Exit Sub
If DCount("ID", "ADHERENTS", "NICHE = """ & Me.NICHE & """ + NUMERO_REGION = """ & Me.NUMERO_REGION & """") <> 0 Then
MsgBox "Cet ajout ferait doublon !", vbCritical
Cancel = True
End If