Možda: Tools -> Options ->Edit/Find ->Confirm.
Ako ne pomaže, probaj ovako.
Code:
Private Sub sifrapartnera_NotInList(NewData As String, Response As Integer)
Response = acDataErrContinue ' Sprecava poruku od accessa
MsgBox "Niste dobro ukucali ime poslovnog partnera <" & NewData & ">.", _
vbCritical, "Paznja"
End Sub
I'll know what I want, when I see it.