Microsoft Office Access
uređuje Branislav Mihaljev, MVP

Opseg stranice izveštaja

Nivo:
NIVO 2 - Među ovim prilozima se nalaze preporuke koje se uglavnom odnose na bolje snalaženje i efikasniji rad: dodatni trikovi koji će biti svakom od pomoći i koji upućuju na prag napredne upotrebe programa.

NAPOMENA: ovaj prilog je izmenjen 22. januara 2008. na osnovu napomene kolege Miroljuba Zahorjanskog o grešci u rešenju. Posetiocima sajta se izvinjavamo, a kolegi Zahorjanskom se zahvaljujemo na angažovanju.

Kada kreirate izveštaj koji sadrži veliki broj informacija, korisniku možete olakšati pronalaženje određene informacije tako što ćete u zaglavlju ili podnožju svake stranice izveštaja prikazati opseg koji je prikazan na njoj. Sličan primer možete pronaći u rečnicima, gde se u zaglavlju stranice nalazi početna reč, a često i završna reč na stranici ili u telefonskim imenicima, gde se prvo i poslednje prezime na stranici prikazuju u posebnom polju.

U Accessu možete napraviti prikazivanje ovakvih podataka, ali jedno upozorenje: veoma je komplikovano to učiniti u zaglavlju. Naime, Access formatira stranice izveštaja od vrha nadole, pa kada u pripremi stigne do dna stranice, tek onda možete da pročitate podatak - a tada je kasno da se vraćate u zaglavlje jer je ono već napravljeno. Ovakvo rešenje je postojalo u bazi primera Solutions.mdb koji se isporučivao uz Access 95 i 97; za novije verzije potražite datoteku pod nazivom Solutions9.mdb. Trik je u tome da se izveštaj formatira u dva prolaza: u prvom prolazu se zabeleže prve i poslednje vrednosti podataka izveštaja, a zatim se u drugom prolazu zabeleženi podaci čitaju tokom formatiranja početka stranice izveštaja i kombinuju sa prvom vrednošću izveštaja. To rešenje je komplikovano i vremenski zahtevno; zato ćem ose zadržati na jednostavnijem rešenju u kome ćete tražene podatke prikazivati u podnožju izveštaja. Sa stanovišta upotrebljivosti, korisnicima će biti svejedno da li se granični podaci nalaze na vrhu ili pri dnu stranice.

Pošto se stranica izveštaja, kako smo već rekli, formira od vrha nadole, potrebno je da najpre zabeležite prvu vrednost koju će program upotrebiti na stranici. Ideja je da zabeležite ovu vrednost u promenljivu i kasnije je upotrebite u podnožju. Zgodan način da to učinite je da sačuvate prvu vrednost u promenljivoj čija vrednost se menja po početku formatiranja stranice, dok u času kada formiranja podnožja bude završeno prikažete prvu i poslednju vrednost na stranici izveštaja.

Otvorite postojeći izveštaj ili napravite novi. Ukoliko se podnožje i zaglavlje ne vide, uključite ih. Kliknite na zaglavlje izveštaja i odaberite događaj OnFormat. U ovom događaju postavite narednu programsku liniju:

strRange = [strStartName] & " - " & [txtPolje]

Kada ste već tu, definište promenljivu strStartName sa:

Dim strStartName As String

Ovu komandu upišite odmah ispod sekcije deklaracije, kao npr:

Option Compare Database
Option Explicit

Dim strStartName As String

U podnožju izveštaja postavite drugo nevezano polje pod nazivom txtRange. Kliknite na sekciju Page Footer i odaberite događaj OnFormat. Dodajte sledeći programski red:

strRange = [strStartName] & " - " & [txtPolje]

Dodatno formatirajte ovo polje promenom atributa fonta, tako da bude usklađeno sa ostatkom izveštaja.

Kompletan listing programa:

Option Compare Database
Option Explicit

Dim strStartName As String

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
    strRange = [strStartName] & " - " & [IME]
End Sub

Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
    strStartName = IME
End Sub