If MetinKutusuAdi = Dlookup ("[AlanAdi]", "[TabloAdi]", "[AlanAdi]= Forms![FormAdi]!MetinKutusuAdi") Then
MsgBox "Bu Kayıt Zaten Var", vbOKOnly, "UYARI..."
Undo
MetinKutusuAdi.SetFocus
Else
End If
çok başarılı , paylaşım için teşekkürler tam aradığım kod
