Obsah
Jedním z nejdůležitějších a nejpoužívanějších úkolů, se kterými se setkáváme při práci s VBA v Excelu je tisk potřebných dat. Dnes vám v tomto článku ukážu, jak můžete tisknout data v Excelu. VBA s vhodnými příklady a ilustracemi.
Stáhnout cvičebnici
Stáhněte si tento cvičební sešit a procvičujte si při čtení tohoto článku.
VBA Print.xlsmKroky pro tisk dat pomocí aplikace Excel VBA
Mám zde datovou sadu se souborem Názvy, typy a Ceny některých knih z knihkupectví Martin Bookstore.
Dnes se naučíme, jak můžeme tuto sadu dat vytisknout pomocí VBA .
Krok 1: Otevření editoru VBA pro tisk v aplikaci Excel
Tisk ALT+F11 na klávesnici. Otevře se okno Visual Basic Redaktor.
Přečtěte si více: Jak nastavit oblast tisku v aplikaci Excel (5 metod)
Krok 2: Vložení nového modulu pro tisk v aplikaci Excel
Přejděte na Vložte možnost v VBA na panelu nástrojů. Klikněte na Vložit> Modul otevřít nový modul.
Související obsah: Jak tisknout mřížky v aplikaci Excel (2 způsoby)
Krok 3: Zadání kódu VBA pro tisk v aplikaci Excel
Nový modul s názvem Modul1 Otevře se okno. Zadejte následující VBA kód tam.
⧭ Kód VBA:
Sub VBA_Print() ActiveWorkbook.ActiveSheet.PrintOut kopie:=1 End Sub 
⧭ Poznámky:
- Zde chci vytisknout aktivní list mého sešitu. Chcete-li vytisknout jakýkoli jiný list, napište název listu přímo do kódu.
Chcete-li například vytisknout pracovní list s názvem List1 , použít:
ActiveWorkbook.Worksheets("Sheet1").PrintOut kopie:=1
- Tisknout můžete i ze sešitu, který není aktivní. Chcete-li například vytisknout List1 ze sešitu s názvem Pracovní sešit1 , použít:
Sešit("Sešit1").Pracovní listy("List1").PrintOut kopie:=1
- Zde tiskneme pouze jednu kopii pracovního listu. Pokud chcete tisknout více než jednu kopii, změňte parametr kopie odpovídajícím způsobem.
- Pokud chcete vytisknout více pracovních listů a při tisku je seřadit, je tu pro vás také možnost. PrintOut funkce VBA má vlastnost nazvanou Sloučit . Nastavte ji tak, aby byla Pravda .
ActiveWorkbook.ActiveSheet.PrintOut kopie:=10, Collate:=True
Související obsah: Excel VBA: Jak dynamicky nastavit oblast tisku (7 způsobů)
Podobné čtení:
- Tlačítko aplikace Excel pro tisk konkrétních listů (ve snadných krocích)
- Jak tisknout vodorovně v aplikaci Excel (4 metody)
- Tisk více listů aplikace Excel do jednoho souboru PDF pomocí VBA (6 kritérií)
- Tisk nadpisů v aplikaci Excel je zakázán, jak jej povolit?
- Jak vytisknout list aplikace Excel ve formátu A4 (4 způsoby)
Krok 4: Spuštění kódu VBA pro tisk v aplikaci Excel
Po zadání VBA kód správně, spusťte Makro kliknutím na Spustit možnost v VBA panel nástrojů.
Související obsah: Excel VBA: Nastavení oblasti tisku pro více rozsahů (5 příkladů)
Krok 5: Konečný výstup: Tisk pomocí VBA
Pokud se vám podaří kód úspěšně zapsat a spustit, na tiskárně se vytiskne pracovní list a objeví se malé okno, jako je toto.
Související obsah: Excel VBA: Tisk rozsahu buněk (5 snadných metod)
Na co nezapomenout
Zde jsme použili PrintOut funkce VBA . Další funkce je v VBA s názvem PrintPreview , který zobrazí náhled dat před tiskem.
Syntaxe PrintPreview je stejná jako funkce PrintOut stačí použít funkci TiskPrview místo PrintOut .
ActiveWorkbook.ActiveSheet.PrintPreview
Před tiskem se zobrazí náhled pracovního listu.
Závěr
To je metoda, pomocí které můžete vytisknout jakákoli data z pracovního listu aplikace Excel pomocí VBA Máte nějaké dotazy? Neváhejte se nás zeptat. A nezapomeňte navštívit naše stránky. ExcelWIKI pro další příspěvky a aktualizace.
