Dim a

a=[forms]![FinDokument]![DokumentID]
SELECT * FROM tblFinDokumentStav WHERE tblFinDokumentStav.DokumentIDz=a;

E sad ovo ide ovako ako je DokumentIDz brojcano polje a ako je string onda ide:

a="'" & [forms]![FinDokument]![DokumentID] & "'"

Problem nije u VBA kodu vec u Queries dizajnu
Kada u polje Criteria upisem = @ParametarSaForme
SELECT DokumentStavID, DokumentIDz, Konto, DugovniPotrazni FROM dbo.tblFinDokumentStav WHERE (DokumentIDz = @ParametarSaForme)
Upit radi tako sto otvara dijalog boks za unos parametra ParametarSaForme, ali kada "= @ParametarSaForme" hocu da zamenim sa "= Forms!FinDokument!DokumentID)"
SELECT DokumentStavID, DokumentIDz, Konto, DugovniPotrazni FROM dbo.tblFinDokumentStav WHERE (DokumentIDz = Forms!FinDokument!DokumentID)
uvek mi javlja gresku "Data type error in expression". Polje DokumentID je int.

Uf izvini ja sam pogrijesio SQL string treba da izgleda ovako:
"SELECT * FROM tblFinDokumentStav WHERE tblFinDokumentStav.DokumentIDz=" & a