Predmet:Re: Pomoć oko procedure
Uspio sam riješiti problem.
***dodao sam ovu provjeru***
If Not IsNull (DLookup("[Stanje]", "[Q_Stanje]", _
"[Skladiste] Not Like forms![frmOtpremnica].[Skladiste] And [sifra] = forms![frmOtpremnica]![frmOtpremnicaSub].form!Sifra")) Then
stanje_na_drugom_skladistu = DLookup("[Stanje]", "[Q_Stanje]", _
"[Skladiste] Not Like forms![frmOtpremnica].[Skladiste] And [sifra] = forms![frmOtpremnica]![frmOtpremnicaSub].form!Sifra")
MsgBox " Prva poruka"
Else
MsgBox "Druga Poruka"
End If
Pozdrav