Centar za edukaciju-BiH

Predmet:Re: CountIf u accessu?

---

Nece ti to biti dovoljno da radi kako valja ali eto:
Private Sub PresigSA_AfterUpdate()
If [PresigSA].Value = "01" Then
DoCmd.GoToControl "sig01"
me.napomena=me.sig01
End If
If [sig01].Value = "01" Then
[sig01] = ""
End If
End Sub

---

Predmet:Re: CountIf u accessu?

---

Napravio sam obrnuti postupak... prilikom presigniranja

If [PresigSA].Value = "01" Then
DoCmd.GoToControl "sig01"
[sig01] = cls
End If

Private Sub PresigNA_AfterUpdate()
If [PresigNA].Value = "01" Then
DoCmd.GoToControl "sig01"
[sig01] = "01"
End If

Nije mi jasno kako ali radi i ova cls umjesto ""

Imam sad jednu nejasnocu koju nikako ne mogu da dokucim
"Pamti mi" sve kod koga je sta bilo signirano prije presigniranja i prikazuje u analitici iako u tabeli nema vise te vrijednosti on je racuna kao da ima.
Uklonio sam cak i indeksiranje sa ovih polja ali i dalje negdje "pamti" te vrijednosti...

Slicice prilozenih slika:

Predmet:Re: CountIf u accessu?

---

Rijesio sam i ovu "nejasnocu"... samo sam povezao 2 upita 1<--->1. Onaj koji mi je "vadio" podatke iz tabele i drugi koji je pratio samo kolonu "PresigSA" i kolonu PresigNA.

Count je "cudo" od komande

Sada sam jos ugradio i grafikon ispod tako da je sve to sad i lijepo "nasminkano"

Predmet:Re: CountIf u accessu?

---

Ja sam ti poceo nesto raditi.
Znaci nemoram dalje,
mada cisto sumnjam da ce te to zadovoljiti na duze staze.
Uocio sam nekoliko manjkavosti tvoje app.
Prvo sistematizacija radnih mjesta koja ti nazivas sig01 do 11.
Ukoliko se tu nesto bude mijenjalo morat ces mijenjati i strukturu.
Ima gresaka i na formi napr. kod koga se nalazi orginal, stavio si opcoine tastere umjesto tekst ili combo box pa ako bi se povecao broj radnih mjesta morao bi sve to dizajnirati na formi.
Ima jos toga ali eto.
Pokusao te i zidar ubijediti ali eto nije islo.
Sve u svemu bitno je da si ti zadovoljan.

---

Predmet:Re: CountIf u accessu?

---

"Ja sam to ipak odradio na svom projektu uz malo "maste" i "nabadanja" u pisanju procedura i na kraju sam dobio ono sto mi treba."
Ako je tako, onda je sve OK, nema sta da se doda ili oduzme. Ako budes imao problema na duzi rok, moraces da prepravis bazu onako kako to pravila relacione teorije nalazu. To nije ni slicno onome kako radi Excel i to ce biti tesko, ali sta se mora nije tesko.

Srecan rad :-)

Predmet:Re: CountIf u accessu?

---

Povlacim ono sto sam napisao o Countif... ipak je sama bila nemocna.
Morao sam ipak ukljuciti sum.

To u upitu izgleda ovako:
Signirano na 01: Sum(IIf([tblOsnovna.sig01]="01";1;0))

Ovo mi sada daje 100% ono sto sam zelio.

Ako analiziras moje prethodne postove shvatit ces sta sam mislio sa ono "malo maste".

Jednostavno je:
Umjesto da komplikujem sa brojanjem u signirano i presignirano ja sam samo napravio obrnuti postupak. Pa ako je nešto presignirano brise se iz tabele gdje je bilo signirano, odnosno vraca se onome drugom kome je presignirano tako da sada imam sve sto mi treba u jednoj tabeli... ne trebaju mi relacije.

A za buducu upotrebu (ako kad zatreba) ono kod koga je bio ranije akt to ostaje zabiljezeno u koloni "PresigSA".

Nadam se da sam dobro opisao postupak jer sam jos uvijek odusevljen kako ga je jednostavno bilo napraviti iako mi je nekoliko dana izgledalo previse komplikovano da sam cak skoro odustao od ovoga.

Pozdrav!

Predmet:Re: CountIf u accessu?

---

Drugar!
Hvala tebi u svakom slucaju "do nebesa" sto bi nas narod rekao...
Svaka primjedba i sugestija je dobro dosla.

Sto se tice sistematizacije radnih mjesta, nisam je pravio, nametnuta mi je takva i cisto sumnjam u narednih 20 godina da ce biti ista drugacije jer se na isti nacin radi i 15 godina unazad.

Da su nam firme podlozne promjenama (mislim na drustvene) pa makar i nagore bilo bi bolje od ove jednolicnosti.

Dakle, ako ima jos kakvih manjkavosti a vjerujem da ima i ne sumnjam u tvoj majstorski sud o tome... samo ih iznesi a ja cu sa ovim svojim skromnim znanjem nastojati da ih uklonim.

Ja licno ih trenutno ne vidim ..vjerovatno zato sto se previse vremena druzim sa ovom aplikacijom ali sam shvatio da ako covjek ima maste zaista samo nebo je granica...

Pozdrav!