[es] - dva kriterijuma u dlookup funkciji

SLOJ.1973

Član broj: 130198
Poruke: 871
*.mediaworksit.net.

+41 Profil

^{19.03.2008. u 22:08 - pre 196 meseci}

Pozdrav svima.Kako da u funkciji dlookup postavim dva kriterijuma za dobijanje željenog rezultata? Recimo imam tabelu tbl cene u kojoj imam polja šifra,naziv,cena,broj cenovnika,datum cenovnika.Kako da dodelim nekom polju (recimo polje cena) na podformi glavne forme vrednost koja se dobija recimo za šifru artikla čija je cena iz cenovnika broj ,koji je ukucan u unbound text polju na samoj podformi.Nadam se da sam bio jasan.Pokušao sam sa sledećim kodom ,ali ništa:

Code:
Dim strFilter As String
                                  Dim strFilter2 as String
                  strFilter = "šifra= " & Me![artikal]
                   strFilter2="broj cenovnika"= & Me!cenovniktext ' polje na podformi u koji se ukucava broj cenovnika koji se želi primeniti.
      Me!cenaf = DLookup("cena", "[tblcene-datum]", strFilter AND strFilter2)

U brejk modu za strFilter dobijam rezultat recimo 10,za strFilter2 recimo 2 ,ali mi za Me!cenaf daje rezultat 0,a treba recimo 45.To je cena iz cenovnika broj 2 za šifru 10.U čemu je problem?

Jednog dana...

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 06:03 - pre 196 meseci}

Sintaksa je u pitanju. Bilo bi dobro da okačiš primer, pa da neko može da proba.

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
195.252.103.*

+41 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 06:52 - pre 196 meseci}

Evo uprošćenog primera.

Jednog dana...

Prikačeni fajlovi

dlookup.mdb - 312k

Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
*.bilokalnik.hr.

+8 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 08:00 - pre 196 meseci}

Kriva ti je sintaksa

----> AND
i moraš obratiti pažnju koji je tip podataka , ako je string onda metneš u uvjet apostrof '
i kod naziva tablica nije preporucljivo koristiti - bolje je _

Dim strFilter As String
Dim strFilter2 as String
strFilter = "šifra= " & Me![artikal]
strFilter2="broj cenovnika"= & Me!cenovniktext ' polje na podformi u koji se ukucava broj cenovnika koji se želi primeniti.
Me!cenaf = DLookup("cena", "[tblcene-datum]", strFilter AND strFilter2)

ja bi to ovako napisao

Me!cenaf = DLookup("cena", "[tblcene-datum]", "sifra='" & Me![artikal] & "' AND broj cenovnka='" & Me!cenovniktext & "'" )

Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
195.252.103.*

+41 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 09:43 - pre 196 meseci}

U primeru ( Dlookup.MDB) sam napisao kod koji treba da radi,ali neće.Prepoznaje artikal i broj cenovnika ali vraća vrednost 0 Tj poruku Type mysmatch.Mislim da je u pitanji tip podataka za polja artikal (Number) i za broj cenovnika (Number).U kodu kad napišem da je strFilter As String i strFilter2 As String,filter prepoznaje broj cenovnika i artikal,a ako stavim da su strFilter i strFilter2 tipa Integer onda vraća vrednost 0 odmah na početku koda : strFilter = "artikal=" & Me. artikal.A kod koji je Trtko dole napisao ne radi.

Jednog dana...

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 13:18 - pre 196 meseci}

Polje na formi sa kojeg vučeš broj cenovnika se zove Combo10, a ne cenovniktext. Ako nekog, kome je ime Milisav, pozoveš sa: "Žiko vrati mi broj cenovnika", hoće li se to dogoditi? I poskidaj apostrofe ako su numerici u pitanju.

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
195.252.103.*

+41 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 13:32 - pre 196 meseci}

Ako ste otvorili primer,videćete da je u kodu tako i napisano: "broj cenovnika=" & Me.Combo10,ali opet neće da radi.

Jednog dana...

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 14:01 - pre 196 meseci}

Vidim to u kodu. Ono što sam napisao odnosilo se na kod u postu i komentar da Trtkov kod ne radi. Malo sam se našalio u vezi pogrešnih naziva. Ne zameri. Ti možda uspevaš da dođeš do : "......Prepoznaje artikal i broj cenovnika ali vraća vrednost 0 Tj poruku Type mysmatch." Ja ni dotle ne mogu da dođem jer po izlasku iz polja artikal na formi dobijam sledeću poruku sa slike.

.

Verovatno je nešto loše "sečen" fajla kad je pravljen primer.Nešto fali, a ne znam šta.

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 15:43 - pre 196 meseci}

Greška »Data type mismatch in criteria expression« pri izvođenju DLookup funkcije ukazuje da je sva prilika da
ne može da se upoređuju numerički tipovi vrednosti ili polja (kao što je šifra u mom primeru) te stoga upotrebi funkciju CStr( ) kao u primeru:

DLookUp("[naziv]", "rb_artikli'', "CStr([sifra])='" & CStr(Me![sifra]) & "'")

Dakle probaj Trtkovu varijantu ali sa ispravnim nazivima sa forme i pretvaranjem numerika u stringove sa CStr().
Rado bih proverio na tvom primeru ali primer kod mene ne radi.
I savet. Šifre kao što su Artikal i broj cenovnika nemoj da definišeš sa Double već sa Long Integer. Double nije ceo broj, već je predviđen za računanje sa duplom tačnošću.

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
*.mediaworksit.net.

+41 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 20:09 - pre 196 meseci}

Sve sam probao,ali jednostavno ne ide.Kada u funkciji dlookup postavim samo jedan kriterijum:dlookup("cena","tblcenedatum", "šifraartikal=" & Me.artikal) funkcija radi,ali kad pokušam i sa drugim kriterijumom,jednostavno NEĆE!!!Evo Getsbi novi primer,nadam se da ćeš moći da ga otvoriš i da mi pomogneš.Pozdrav.

Jednog dana...

Prikačeni fajlovi

dlooup2.mdb - 216k

Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
*.mediaworksit.net.

+41 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 20:44 - pre 196 meseci}

Evo ga kod koji radi NAPOKON:Me.fcena = DLookup("cena", "[tblcenedatum]", "šifraartikla= " & Me![artikal] & "And brojcenovnika= " & Me!Combo8).Hvala svima.

Jednog dana...

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: dva kriterijuma u dlookup funkciji

^{20.03.2008. u 20:50 - pre 196 meseci}

Drago mi je da je proradilo jer kod mene i ovaj drugi fajl ima istu grešku koju sam poslao na slici.
Taman sam hteo da ti pošaljem samo ovaj red koda koji je u skladu sa onim što sam gore pominjao da se nekad upoređivanje numeričkih vrednosti mora uraditi sa CStr() funkcijom ne bi li se zaobišla greška »Data type mismatch in criteria expression« pri izvođenju DLookup funkcije.

Me.fcena = DLookup("cena", "tblcenedatum", "CStr(sifraartikla)='" & CStr(Me![artikal]) & "' AND Cstr(brojcenovnka)='" & CStr(Me!Combo8) & "'")

Poboljšanju situacije je doprinelo verovatno i upotreba Long Integer umesto Double na poljima iz uslova.
Polje fcena u tabeli prepravi sa Long Integer na Currency ili Number Single.

_{[Ovu poruku je menjao Getsbi dana 20.03.2008. u 22:17 GMT+1]}

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Odgovor na temu