merhaba hayırlı geceler
formül=Private Sub Form_BeforeUpdate(Cancel As Integer)
If ([FailiMechul] = "1" And [Aydinlatilan] = "1") Or ([Aydinlatilan] = "1" And [FailiMechul] = "1") Or ([Aydinlatilan] = "1" And [FailiMechul] = "1") Then
MsgBox ("Aydinlatilan - FailiMechul ; suçun niteliğine göre bu alanların sadece birisi için =1 değerini verebilirsiniz."), vbExclamation,
Cancel = True
End If
End Sub
sorum şu: alanların boş geçmesi halinde hiç bir uyarı vermiyor. tablodan ise [gerekli] bölümüne evet diyemiyorum nedeni ise mutlaka her iki satır alanlarında biri dolu ve biri boş olmak zorundadır. [her iki alanda boş geçtiğinde alanlardan en az birini doldurmalısınız diye bir ileti vermesini ve yeni kayda gitmemesini istiyorum] yardımlarınızı bekliyorum teşekkürler

Ek Dosyalar

Aydınlatılan+Faili Meçhul.rar(94.39 KB)