onay1
onay2
onay3
Yaptım ama olmuyor

If Me.Onay1.Value = "0" Or Me.Onay1.Value = "0" Or Me.Onay1.Value = "0" Then
MsgBox (" kategorilende seçim yapmadınız lütfen seçim yapınız....")
Else
If Me.Onay1 = 0 And Me.Onay2 = 0 And Me.Onay3 = 0 Then
MsgBox ("kategorilerde seçim yapmadınız lütfen seçim yapınız....")
Else
YAPILACAKLAR
End If
if Onay1=0 or Onay2=0 or Onay3=0 then
MsgBox ("kategorilerde seçim yapmadınız lütfen seçim yapınız....")
else
'En az biri seçilmişse YAPILACAKLAR
end if
If Onay1 = 0 And Onay2 = 0 And Onay3 = 0 Then
MsgBox ("kategorilerde seçim yapmadınız lütfen seçim yapınız....")
Else
Enaz Biri seçilmişse YAPILACAKLAR
End If