Predvolene môžete tlačiť zostavy, ktoré neobsahujú žiadne záznamy. Na vyriešenie tohto problému môžete použiť makro alebo kód programu Microsoft Visual Basic for Applications (VBA) na zistenie absencie záznamov v zostave a potom zrušiť operáciu tlače. Kroky v tomto článku vysvetľujú, ako používať obe techniky.
Čo vás zaujíma?
Ak zostava neobsahuje žiadne záznamy, pravdepodobne budete chcieť zrušiť tlač. Ak napríklad začínate predávať nový produkt, pravdepodobne bude určitý čas, počas ktorého ste ešte nezaregistrovali žiadny predaj. Mali by ste preto zvážiť možnosť, že niektoré zostavy nemusia obsahovať žiadne podrobné záznamy a že agregačné funkcie, ako je napríklad funkcia Count , nemusia mať čo spočítať. Ak chcete s takýmto výskytom pracovať elegantne, môžete vytvoriť makro, ktoré zruší tlačovú úlohu. Môžete tiež pridať niekoľko riadkov starostlivo umiestneného kódu VBA, aby ste urobili to isté. VBA je programovací jazyk, ktorý Access používa.
Makro alebo kód VBA pridáte do procedúry spúšťanej udalosťou On No Dav zostave. Access spustí udalosť On No Data vždy, keď spustíte zostavu, ktorá neobsahuje žiadne záznamy. Makro a kód VBA popísané v tomto článku zobrazujú príslušné hlásenie a zrušia tlač zostavy, keď zostava neobsahuje žiadne údaje. Keď do procedúry spúšťanej udalosťou On No Data pridáte makro alebo kód VBA, makro alebo kód VBA sa spustí vždy, keď otvoríte zostavu, ktorá neobsahuje žiadne záznamy. Keď kliknete na tlačidlo OK a zavriete niektorú z upozornení, makro zavrie aj prázdnu zostavu. Keď do zostavy pridáte makro alebo kód VBA, prázdna zostava sa neotvorí, keď sa ju pokúsite zobraziť v zobrazení zostavy alebo zobrazení rozloženia, ale zostavu môžete otvoriť v návrhovom zobrazení.
Zrušenie tlače pomocou makra
Makro popísané v tejto časti zobrazí pri pokuse o tlač prázdnej zostavy upozornenie. Keď kliknutím na tlačidlo OK zavriete okno s hlásením, makro automaticky zruší operáciu tlače. Ak nezahrniete upozorňujúci odkaz, pri pokuse o tlač zostavy sa zobrazí, akoby sa nič nestalo – čo by pravdepodobne zmiasť používateľov zostavy.
Vytvorenie makra
-
Na navigačnej table kliknite pravým tlačidlom myši na zostavu, ktorú chcete zmeniť, a potom kliknite na položku Návrhové zobrazenie.
-
Na karte Návrh kliknite v skupine Zobraziť alebo skryť na položku Hárok vlastností.
- alebo -
V závislosti od miestnych a jazykových nastavení dvakrát kliknite na pole v ľavom alebo pravom hornom rohu zostavy.
-
Kliknite na kartu Udalosť a v poli vlastnosti Bez údajov kliknite na položku
Zobrazí sa dialógové okno Výber zostavovača .
-
Kliknite na položku Zostavovač makier a potom na tlačidlo OK.
Návrhár makier spustí a zobrazí prázdne makro.
-
V rozbaľovacom zozname akcií makier v okne návrhu makra vyberte v zozname položku Okno hlásení .
-
do poľa Správa zadajte text správy s upozornením.
Môžete napríklad zadať nasledovné: Neexistujú žiadne záznamy na vytváranie zostáv.
-
Voliteľne môžete zmeniť hodnotu argumentu v poli Zvukový signál z možnosti Áno na Nie a v zozname Typ vyberte typ ikony, ktorá sa má zobraziť v správe s upozornením.
-
Do poľa Názov zadajte názov správy s upozornením.
Môžete napríklad zadať žiadne záznamy.
-
Vyberte rozbaľovací zoznam akcií makra pod akciou OknoZáznamov a potom vyberte položku ZrušiťUdalosť.
-
Na karte Návrh kliknite v skupine Zavrieť na položku Uložiť.
-
Na karte Návrh v skupine Zavrieť kliknite na položku Zavrieť. Ak sa zobrazí výstražné hlásenie s otázkou, či chcete uložiť zmeny makra a vlastnosti zostavy, kliknite na tlačidlo Áno, zavrite zostavu, po zobrazení výzvy uložte zmeny a pokračujte v ďalších krokoch na jej otestovanie.
Testovanie makra
-
Na navigačnej table kliknite pravým tlačidlom myši na zostavu obsahujúcu makro a kliknite na položku Tlačiť. V závislosti od možností, ktoré ste vybrali, Access zobrazí upozornenie.
Keď kliknutím na tlačidlo OK zavriete správu, akcia ZrušiťUdalosť zastaví operáciu tlače. Keďže ste nezadali žiadnu inú udalosť (napríklad otvorenie zostavy na zobrazenie), zostava sa zavrie.
Zrušenie tlače pomocou kódu VBA
Kód VBA popísaný v tejto časti funguje podobne ako makro popísané v predchádzajúcej časti – pri otvorení prázdnej zostavy sa zobrazí upozorňujúca správa a operácia tlače sa zruší po zatvorení upozorňujúcieho hlásenia.
Pridanie kódu VBA
-
Na navigačnej table kliknite pravým tlačidlom myši na zostavu, ktorú chcete zmeniť, a potom kliknite na položku Návrhové zobrazenie.
Poznámka: Na dokončenie tohto postupu použite zostavu, ktorá neobsahuje žiadne záznamy.
-
Na karte Návrh kliknite v skupine Zobraziť alebo skryť na položku Hárok vlastností.
- alebo -
V závislosti od miestnych a jazykových nastavení dvakrát kliknite na pole v ľavom alebo pravom hornom rohu zostavy.
-
Kliknite na kartu Udalosť a v poli vlastnosti Bez údajov kliknite na položku
Zobrazí sa dialógové okno Výber zostavovača .
-
Kliknite na položku Zostavovač kódov a potom kliknite na tlačidlo OK.
Spustí sa editor jazyka Visual Basic a zobrazí sa prázdna procedúra spúšťaná udalosťou.
-
Do editora jazyka Visual Basic zadajte nasledujúci kód, aby Report_NoData procedúra po dokončení vyzerala presne takto:
Private Sub Report_NoData (Cancel As Integer)
MsgBox "There are no records to report", vbExclamation, "No Records"
Cancel = True
End Sub -
Po dokončení kliknite na položku Súbor a potom na tlačidlo Uložiť.
-
Kliknite na položku Súbor a potom na položku Zavrieť a vrátiť sa do programu Microsoft Access.
-
Zatvorte otvorenú zostavu a kliknutím na tlačidlo Áno potvrďte uloženie.
-
Na navigačnej table kliknite pravým tlačidlom myši na zostavu, ktorú ste práve zmenili, a kliknite na položku Tlačiť. V závislosti od možností, ktoré ste vybrali, Access zobrazí upozornenie.
Procedúra Report_NoData používa funkciu MsgBox na zobrazenie položky Neexistujú žiadne záznamy na hlásenie správy a tlačidlo OK . Keď kliknete na tlačidlo OK, riadok Zrušiť = True v postupe inštruuje Access, aby zrušil zostavu. Zrušiť je argument, ktorý sa automaticky odovzdáva do procedúry spúšťanej udalosťou a Access ju vždy kontroluje po dokončení procedúry spúšťanej udalosťou.
