Otkazivanje štampanja izveštaja u slučaju da ne sadrži nijedan zapis

Napomena:  Želimo da vam što pre pružimo najnoviji sadržaj pomoći čim na vašem jeziku. Ova stranica je prevedena automatski i može da sadrži gramatičke greške ili netačnosti. Naš cilj je da ovaj sadržaj bude koristan. Možete li nam na dnu ove stranice saopštiti da li su vam informacije bile od koristi? Ovo je članak na engleskom jeziku za brzu referencu.

Podrazumevana postavka je da možete štampati izveštaje koji ne sadrže nijedan zapis. Da biste rešili ovaj problem, možete koristiti makro ili Microsoft Visual Basic for Applications (VBA) kôd pomoću kojih možete da otkrijete nepostojanje zapisa u izveštaju, a zatim da otkažete operaciju štampanja. Koraci u ovom članku objašnjavaju način korišćenja obe tehnike.

Izaberite jednu od sledećih mogućnosti:

Korišćenje makroa za otkazivanje štampanja

Koristite VBA kôd da biste otkazali štampanje

Verovatno ćete želeti da otkažete štampanje izveštaja ako ne sadrži nijedan zapis. Na primer, ako počinjete sa prodajom novog proizvoda, verovatno će postojati period vremena pre nego što budete registrovali neku prodaju. Zbog toga bi trebalo da uzmete u obzir i mogućnost da neki od izveštaja neće sadržati nikakve detaljne zapise i da agregatne funkcije poput funkcije Count neće imati šta da broje. Kreiranjem makroa koji će otkazati proces štampanja možete elegantno da rešite ovaj problem. Takođe, za postizanje istog rezultata možete da dodate nekoliko redova pažljivo postavljenog VBA kôda. VBA je programski jezik koji Microsoft Office Access 2007 koristi.

Dodajte makro ili VBA kôd za izveštaj Na bez Data proceduri događaja. Office Access 2007 aktivira događaj Na nema podataka svaki put kada pokrenete izveštaj koji sadrži nijedan zapis. Makro i VBA kôd opisane u ovom članku prikazuju odgovarajuću poruku i Otkazivanje štampanja izveštaja kada izveštaj ne sadrži nikakve podatke. Kada dodate makro ili VBA kôd proceduru događaja Na nema podataka , makro ili VBA kôd se pokreće svaki put kada otvorite izveštaj koji sadrži nijedan zapis. Kada kliknete na dugme u redu da biste zatvorili poruku obaveštenja, makro zatvara prazan izveštaj. Kada dodate makro ili VBA kôd u izveštaju, prazan izveštaj će otvoriti kada pokušate da biste ga prikazali u prikazu izveštaja ili prikazu rasporeda – ali možete da otvorite izveštaj u prikazu dizajna.

Upotreba makroa za otkazivanje štampanja

Kada pokušate da odštampate prazan izveštaj, makro koji je opisan u ovom odeljku prikazuje poruku obaveštenja. Kada kliknete na dugme U redu da biste zatvorili okvir za poruke, makro automatski otkazuje operaciju štampanja. Ako makro ne sadrži poruku obaveštenja, izgledaće kao da se ništa ne dešava prilikom pokušaja štampanja izveštaja – što će verovatno zbuniti korisnike tog izveštaja.

Kreiranje makroa

  1. U oknu za navigaciju kliknite desnim tasterom miša na izveštaj koji želite da promenite, a zatim izaberite stavku Prikaz dizajna.

  2. Na kartici Dizajn, u grupi Prikaži/sakrij izaberite stavku List sa svojstvima.

    –ili–

    Dvaput kliknite na okvir u gornjem levom ili desnom uglu izveštaja, u zavisnosti od regionalnih i jezičkih postavki.

  3. Izaberite karticu događaj , a u polje za svojstvo Na nema podataka , kliknite na dugme Dugme „Graditelj“ .

    Pojaviće se dijalog Odabiranje izrade.

  4. Izaberite stavku Izrada makroa, a zatim kliknite na dugme U redu.

    Pokrenuće se dizajner makroa i prikazaće prazan makro.

  5. U prvom redu makroa kliknite na polje u koloni Radnja i sa liste izaberite stavku MsgBox.

  6. U grupi Argumenti za radnju u donjem delu dizajnera makroa, u okvir Poruka upišite tekst poruke obaveštenja.

    Na primer, možete uneti na sledeći način: postoje zapisi za izveštaj.

  7. Opcionalno, možete da promenite vrednost argumenta u polju Zvučni signal sa Da na Ne i sa liste Tip izabrati tip ikone za koju želite da se pojavi u poruci obaveštenja.

  8. U polje Naslov upišite naslov poruke obaveštenja.

    Na primer, možete uneti Nema zapisa.

    Promene će se pojaviti u gornjem delu dizajnera makroa – u koloni Argument pored radnje MsgBox.

  9. U gornjem delu dizajnera makroa, kliknite na sledeću ćeliju u koloni Radnja (ćeliju koja se nalazi direktno ispod stavke MsgBox), a zatim izaberite stavku CancelEvent.

    Makro bi trebalo ovako da izgleda, iako možete koristiti drugačiji tekst u argumentima:

    Primer makroa koji otkazuje operaciju štampanja

  10. Na kartici Dizajn , u grupi Zatvori , izaberite stavku Sačuvaj kao, a zatim koristite dijalog Sačuvaj kao da date ime makroa.

  11. Zatvorite makro. Kliknite na dugme Da ako se pojavi poruka obaveštenja i upita vas da li želite da sačuvate promene makroa i svojstva izveštaja, a zatim nastavite sa sledećim koracima da biste testirali makro.

Testiranje makroa

  • U oknu za navigaciju kliknite desnim tasterom miša na izveštaj koji sadrži makro i izaberite stavku Odštampaj. U zavisnosti od opcija koje ste odabrali, trebalo bi da se pojavi poruka obaveštenja slična ovoj:

    Okvir za poruku koji se pojavljuje kada izveštaj ne sadrži nijedan zapis

    Kada kliknete na dugme U redu da biste zatvorili poruku, radnja CancelEvent zaustavlja operaciju štampanja. Izveštaj će se zatvoriti pošto niste odredili nijedan drugi događaj (na primer, otvaranje izveštaja radi prikazivanja).

Vrh stranice

Upotreba VBA kôda za otkazivanje štampanja

VBA kôd koji je ovde opisan funkcioniše na sličan način kao makro opisan u prethodnom odeljku – prikazuje poruku obaveštenja kada otvorite prazan izveštaj, a zatim otkazuje operaciju štampanja kada zatvorite poruku obaveštenja.

Dodavanje VBA kôda

  1. U oknu za navigaciju kliknite desnim tasterom miša na izveštaj koji želite da promenite, a zatim izaberite stavku Prikaz dizajna.

    Napomena: Da biste dovršili ovaj postupak koristite izveštaj koji sadrži nijedan zapis.

  2. Na kartici Dizajn, u grupi Prikaži/sakrij izaberite stavku List sa svojstvima.

    –ili–

    Dvaput kliknite na okvir u gornjem levom ili desnom uglu izveštaja, u zavisnosti od regionalnih i jezičkih postavki.

  3. Izaberite karticu događaj , a u polje za svojstvo Na nema podataka , kliknite na dugme Dugme „Graditelj“ .

    Pojaviće se dijalog Odabiranje izrade.

  4. Izaberite stavku Izrada koda, a zatim kliknite na dugme U redu.

    Pokrenuće se Visual Basic Editor i prikazaće praznu proceduru događaja.

  5. Upišite sledeći kôd u Visual Basic Editor tako da, kada završite, procedura „Report_NoData“ izgleda upravo ovako:

    Private Sub Report_NoData (Cancel As Integer)
    MsgBox "There are no records to report", vbExclamation, "No Records"
    Cancel = True
    End Sub
  6. Kada završite, kliknite na karticu datoteka, a zatim kliknite na dugme Sačuvaj.

  7. Kliknite na karticu datoteka, a zatim kliknite na dugme Zatvori i vratili se na Microsoft Office Access.

  8. Zatvorite otvorene izveštaj, a zatim kliknite na dugme da da biste potvrdili operaciju čuvanja.

  9. U oknu za navigaciju kliknite desnim tasterom miša na izveštaj koji ste upravo promenili i izaberite stavku Odštampaj. Videćete poruku sličnu sledećoj:

Okvir za poruku koji se pojavljuje kada izveštaj ne sadrži nijedan zapis

Procedura „Report_NoData“ koristi funkciju MsgBox za prikazivanje poruke Ne postoje zapisi za izveštaj i dugmeta U redu. Kada kliknete na dugme U redu, linija koda „Cancel=True“ u proceduri upućuje Access da otkaže izveštaj. Cancel je argument koji se automatski prosleđuje proceduri događaja i Access ga uvek proverava kada se procedura događaja dovrši.

Vrh stranice

Razvijte Office veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Office Insider korisnicima

Da li su vam ove informacije koristile?

Hvala vam na povratnim informacijama!

Hvala za povratne informacije! Zvuči da će biti od pomoći ako vas povežemo sa našim agentima Office podrške.

×