(23/03/2014, 18:25)arif1971 yazdı: ART NO" GİRİLDİĞİ ZAMAN "KART SERİ NO" HÜCRESİNDEKİ KAYIT İLE AYNI KAYIT VAR İSE BANA UYARIDA BULUNMASINI İSTİYORUM.

UĞRAŞDIM FAKAT BİR TÜRLÜ YAPAMADIM, YARDIMLARINIZ İÇİN ÇOK TEŞEKKÜR EDERİM. SEVGİ VE SAYGILARIMLA.

Sorunuzda "kaydı engellesin" diye bir ibare göremedim.

KART_NO.SetFocus

kodunun hemen üstüne

KART_NO=""

kodu eklerseniz yazdığınız mükerrer kartno verisi silinir, yeniden doğrusunu yazarsınız. Başka türlü kod eklersek daha önce girdiğiniz tüm veriler silinir. Bu şekilde sadece Kart no alanını temizliyoruz.


Kodun tamamı aşağıdaki gibi olmalı

If Me.KART_NO = Dlookup ("[KART NO]", "TELEFON KAYIT", "[KART NO]=" & "'" & Me.KART_NO & "'") Then

MsgBox ("kartno daha önce girilmiş")

KART_NO = ""

KART_NO.SetFocus

End If



End Sub