Tento článek začíná stručným přehledem Excelu VBA a jeho použití při tisku. Excel VBA je výkonný a všestranný programovací jazyk, který lze použít k automatizaci tiskových úloh. Nabízí širokou škálu funkcí a vlastností, které lze využít k vytváření vlastních tiskových řešení.
Tato část vysvětluje, jak nastavit tiskárnu pro použití v aplikaci Excel VBA. Zabývá se různými způsoby konfigurace tiskáren a také tím, jak nastavit různá nastavení tiskárny.
Tato část vysvětluje, jak používat různé tiskové příkazy Excel VBA. Zahrnuje témata, jako je výběr tiskárny a tisk určitého rozsahu dat.
Tato část vysvětluje, jak vytvořit vlastní tiskovou úlohu v aplikaci Excel VBA. Zahrnuje témata, jako například jak vybrat velikost a orientaci papíru a jak přidat do tiskového výtisku záhlaví a zápatí.
Tato část vysvětluje, jak řešit běžné problémy s tiskem v aplikaci Excel VBA. Zahrnuje témata, jako například jak upravit rozvržení stránky, a také jak opravit chyby tisku.
Tato část vysvětluje, jak optimalizovat výkon tisku Excel VBA. Zahrnuje témata, jako například jak maximalizovat rychlost tisku a také jak snížit množství dat odesílaných do tiskárny.
Tato část vysvětluje, jak zabezpečit tiskové prostředí pomocí Excel VBA. Zahrnuje témata, jako je šifrování dat před jejich odesláním do tiskárny, a také způsob auditu a kontroly tiskových úloh.
Tento článek končí shrnutím témat probíraných v článku. Excel VBA nabízí výkonný a všestranný způsob automatizace tiskových úloh. Při správném nastavení a konfiguraci je možné vytvořit vlastní tisková řešení, která vyhovují vašim specifickým potřebám.
Příkaz tisk ve Visual Basicu umožňuje tisknout text nebo grafiku na tiskárnu připojenou k počítači. Chcete-li příkaz tisku použít, musíte nejprve otevřít objekt Tiskárna. To můžete provést pomocí metody OpenPrinter. Jakmile je objekt Printer otevřen, můžete použít příkaz print k tisku textu nebo grafiky.
Chcete-li vytisknout text, musíte použít metodu Tisk. Tato metoda přijímá dva argumenty: text, který se má vytisknout, a název písma, které se má použít. Například následující kód vytiskne text „Hello, world!“ písmem Arial:
Printer.Open
Printer.Print „Hello, world!“, „Arial“
Printer.Close
Chcete-li vytisknout grafiku, musíte použít metodu DrawImage. Tato metoda přijímá tři argumenty: obrázek, který chcete vytisknout, souřadnici x levého horního rohu obrázku a souřadnici y levého horního rohu obrázku. Například následující kód vytiskne obrázek „MyImage.jpg“ v levém horním rohu stránky:
Printer.Open
Printer.DrawImage „MyImage.jpg“, 0, 0
Printer.Close
Existuje několik různých způsobů, jak vytvořit tlačítko tisku v Excelu VBA. Jedním ze způsobů je použití ovládacích prvků ActiveX. Chcete-li to provést, přidejte nejprve do pracovního listu ovládací prvek ActiveX. Poté klikněte pravým tlačítkem myši na ovládací prvek a vyberte možnost Vlastnosti. V okně Vlastnosti vyberte kartu Události. Poklepejte na událost Kliknutí a zadejte následující kód:
Private Sub CommandButton1_Click()
ActiveSheet.PrintOut
End Sub
Dalším způsobem vytvoření tlačítka pro tisk je použití makra. Za tímto účelem nejprve otevřete Editor jazyka Visual Basic (VBE) stisknutím klávesové zkratky Alt+F11. Poté ve VBE vložte nový modul a vložte následující kód:
Sub PrintButton()
ActiveSheet.PrintOut
End Sub
Nakonec se vraťte na pracovní list a vložte tlačítko. Klepněte na tlačítko pravým tlačítkem myši a vyberte možnost Přiřadit makro. Vyberte makro PrintButton a klepněte na tlačítko OK.
1. Vyberte listy, které chcete vytisknout.
2. Na pásu karet klepněte na kartu Zobrazení.
3. Ve skupině Makra klepněte na tlačítko Makra. Zobrazí se dialogové okno Makro.
4. Klepněte na tlačítko PrintSelectedSheets a poté na tlačítko Run.
Chcete-li automatizovat oblast tisku v aplikaci Excel, musíte použít nástroj Oblast tisku. Tento nástroj umožňuje určit, které buňky chcete vytisknout, a můžete také uložit své tiskové oblasti, abyste je nemuseli stále znovu vybírat. Chcete-li použít nástroj Tisková oblast, postupujte podle následujících kroků:
1. Vyberte buňky, které chcete vytisknout.
2. Přejděte na kartu Rozložení stránky.
3. Ve skupině Nastavení stránky klikněte na tlačítko Tisknout oblast.
4. Klepněte na možnost Nastavit oblast tisku.
5. Chcete-li tiskovou oblast uložit, klikněte na kartu Soubor a poté na možnost Uložit jako.
6. V dialogovém okně Uložit jako klikněte na tlačítko Nástroje.
7. V dialogovém okně Nástroje klikněte na tlačítko Obecné možnosti.
8. V dialogovém okně Obecné možnosti zkontrolujte, zda je zaškrtnuto políčko Uložit oblasti tisku.
9. Klepnutím na tlačítko OK zavřete dialogové okno.
10. Klepnutím na tlačítko Uložit sešit uložte.
Existuje několik různých způsobů, jak ve VBA nastavit aktivní tiskárnu. Nejběžnějším způsobem je použití objektu Tiskárna. Například následující kód nastaví aktivní tiskárnu na první tiskárnu v seznamu:
K nastavení aktivní tiskárny můžete také použít metodu SetDefaultPrinter. Například následující kód by nastavil aktivní tiskárnu na tiskárnu s názvem „Moje tiskárna“:
SetDefaultPrinter „My Printer“
Nakonec můžete k nastavení aktivní tiskárny použít rozhraní API systému Windows. Například následující kód nastaví aktivní tiskárnu na tiskárnu s názvem „Moje tiskárna“:
(ByVal pszPrinter As String) As Boolean Dim Result As Boolean Výsledek = SetDefaultPrinter(„Moje tiskárna“)