Zrušení tisku při nepřítomnosti záznamů v sestavě

Poznámka: Snažíme se pro vás co nejrychleji zajistit aktuální obsah nápovědy ve vašem jazyce. Tato stránka byla přeložena automaticky a může obsahovat gramatické chyby nebo nepřesnosti. Naším cílem je to, aby pro vás byl její obsah užitečný. Mohli byste nám prosím dát ve spodní části této stránky vědět, jestli vám informace v článku pomohly? Pokud byste se rádi podívali na jeho anglickou verzi, najdete ji tady.

Ve výchozím nastavení můžete tisknout sestavy, které neobsahují žádné záznamy. Tento problém vyřešíte pomocí makra nebo kódu jazyka Microsoft Visual Basic for Applications (VBA) ke zjištění absence záznamů v sestavě a zrušení operace tisku. Postup v tomto článku vysvětluje, jak se oba postupy používají.

V tomto článku

Zrušení tisku pomocí makra

Zrušení tisku pomocí kódu jazyka VBA

Možná budete chtít zrušit tisk sestavy, když neobsahuje žádné záznamy. Pokud třeba zahájíte prodej nového produktu, bude pravděpodobně existovat období, ve kterém jste ještě zaregistrováni nějaké prodeje. Měli byste proto zvážit možnost, že některé sestavy nemusí obsahovat žádné podrobné záznamy a že agregační funkce, například funkce Count , nemusí mít nic k počítání. Chcete-li takový výskyt řádně zpracovat, můžete vytvořit makro, které tiskovou úlohu zruší. Můžete taky přidat několik řádků s kódem jazyka VBA pečlivě umístěným. VBA je programovací jazyk, který Access používá.

Do sestavy se nedají přidat žádné události data , přidejte buď makro nebo kód jazyka VBA. Access spouští při každém spuštění sestavy, která neobsahuje žádné záznamy, událost bez dat . Makro a kód VBA popsané v tomto článku zobrazí příslušnou zprávu a zruší tisk sestavy, pokud tato sestava neobsahuje žádná data. Když do procedury události bez dat přidáte makro nebo kód jazyka VBA, spustí se makro nebo kód jazyka VBA vždy, když otevřete sestavu, která neobsahuje žádné záznamy. Když kliknete na OK a zavřete tak upozornění, makro taky zavře prázdnou sestavu. Po přidání makra nebo kódu jazyka VBA do sestavy se prázdná sestava neotevře, když se pokusíte ji zobrazit v zobrazení sestavy nebo v zobrazení rozložení – můžete ji ale otevřít v návrhovém zobrazení.

Zrušení tisku pomocí makra

Makro popsané v této části zobrazuje zprávu s upozorněním, když se pokusíte vytisknout prázdnou sestavu. Když zavřete okno zprávy kliknutím na OK , makro automaticky zruší operaci tisku. Pokud nezahrnete zprávu s upozorněním, zobrazí se při pokusu o tisk sestavy něco, co by se mohlo stát, že uživatelé sestavy Zaměňujte.

Vytvoření makra

  1. V navigačním podokně klikněte pravým tlačítkem myši na sestavu, kterou chcete změnit, a klikněte na příkaz návrhové zobrazení.

  2. Na kartě Návrh ve skupině Zobrazit nebo skrýt klikněte na Seznam vlastností.

    – nebo –

    V závislosti na místním a jazykovém nastavení poKlepejte na pole v pravém horním nebo pravém rohu sestavy.

  3. Klikněte na kartu událost a v poli vlastnosti neobsahovat data klikněte na Tlačítko Tvůrce .

    Zobrazí se dialogové okno zvolit tvůrce .

  4. Klikněte na Tvůrce makera potom klikněte na OK.

    Spustí se Návrhář maker a zobrazí se prázdné makro.

  5. V rozevíracím seznamu akcí makra v okně návrh makra vyberte v seznamu možnost MessageBox .

  6. v okně zprávy zadejte text pro upozornění.

    Můžete například zadat toto: neexistují žádné záznamy, které by se daly ohlásit.

  7. Volitelně můžete změnit hodnotu argumentu ve pípnutí od Ano na ne a v seznamu typ vyberte typ ikony, která se má objevit ve vaší výstraze.

  8. Do pole název zadejte název upozornění.

    Můžete například zadat žádné záznamy.

  9. Vyberte rozevírací seznam akcí makra pod akcí MessageBox a pak vyberte ZrušitUdálost.

  10. Na kartě Návrh klikněte ve skupině Zavřít na tlačítko Uložit.

  11. Na kartě Návrh, ve skupině Zavřít, klikněte na příkaz Zavřít. Pokud se zobrazí výstražná zpráva s dotazem, jestli chcete uložit změny makra a vlastnosti sestavy, klikněte na Ano, zavřete sestavu, uložte změny, pokud se zobrazí výzva, a pokračujte dalšími kroky pro jejich otestování.

Testování makra

  • V navigačním podokně klikněte pravým tlačítkem myši na sestavu obsahující makro a klikněte na příkaz Tisk. V závislosti na zvolené možnosti se zobrazí zpráva s upozorněním.

    Když kliknutím na OK zprávu zavřete, akce ZrušitUdálost zastaví operaci tisku. Protože jste zadali žádnou jinou událost (třeba otevření sestavy pro zobrazení), bude sestava ukončena.

Začátek stránky

Zrušení tisku pomocí kódu jazyka VBA

Kód jazyka VBA, který je zde popsaný, funguje podobně jako makro popsané v předchozí části – zobrazí zprávu s upozorněním, když otevřete prázdnou sestavu, a po zavření výstražné zprávy zrušíte operaci tisku.

Přidání kódu jazyka VBA

  1. V navigačním podokně klikněte pravým tlačítkem myši na sestavu, kterou chcete změnit, a klikněte na příkaz návrhové zobrazení.

    Poznámka: K dokončení tohoto postupu použijte sestavu, která neobsahuje žádné záznamy.

  2. Na kartě Návrh ve skupině Zobrazit nebo skrýt klikněte na Seznam vlastností.

    – nebo –

    V závislosti na místním a jazykovém nastavení poKlepejte na pole v pravém horním nebo pravém rohu sestavy.

  3. Klikněte na kartu událost a v poli vlastnosti neobsahovat data klikněte na Tlačítko Tvůrce .

    Zobrazí se dialogové okno zvolit tvůrce .

  4. Klikněte na Tvůrce kódua potom klikněte na OK.

    Spustí se Editor jazyka Visual Basic a zobrazí se prázdná událostní procedura.

  5. V editoru jazyka Visual Basic zadejte následující kód tak, aby se postup Report_NoData přesně líbí takto:

    Private Sub Report_NoData (Cancel As Integer)
    MsgBox "There are no records to report", vbExclamation, "No Records"
    Cancel = True
    End Sub
  6. Až skončíte, klikněte na soubora potom klikněte na Uložit.

  7. Klikněte na soubora potom na Zavřít a návrat do Microsoft Accessu.

  8. Zavřete otevřenou sestavu a kliknutím na Ano potvrďte uložení.

  9. V navigačním podokně klikněte pravým tlačítkem na sestavu, kterou jste právě změnili, a klikněte na Tisk. V závislosti na zvolené možnosti se zobrazí zpráva s upozorněním.

V proceduře Report_NoData se pomocí funkce OknoSeZprávou zobrazí zpráva žádné záznamy, které by se nezobrazovaly zprávy, a tlačítko OK . Když kliknete na OK, řádek Cancel = pravda v proceduře určuje přístup a zruší sestavu. Cancel je argument, který se automaticky předává proceduře události a při skončení události je vždy zaškrtnutý v Accessu.

Začátek stránky

Rozšiřte své dovednosti s Office
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor. Vypadá to, že bude užitečné, když vás spojíme s některým z našich agentů z podpory Office.

×