V tomto článku se naučíme Jak vytisknout tabulku v aplikaci Excel.
Scénář:
Poté, co budete hotovi se svou tabulkou a budete potřebovat tištěnou stránku. Stačí vybrat buňku v rozsahu tabulky. A pak klikněte Soubor -> Tisk -> a v nabídce Tisk vyberte tlačítko Možnosti tabulky jaký oddíl. Ale Excel to jen vytiskne. Zde se dozvídáme, jak můžeme v aplikaci Excel vytisknout libovolnou tabulku.
Chcete -li uložit vybraný rozsah v aplikaci Excel (řekněme účtenku) jako PDF v aplikaci Excel pomocí VBA, použijte níže uvedenou syntaxi.
Genetický kód Dílčí SaveRangeAsPDF () Rozsah.ExportAsFixedFormat Typ: = xlTypePDF, Název souboru:= _ "C: \ Users \ název_souboru", Kvalita: = xlQualityStandard, _ IncludeDocProperties: = True, IgnorePrintAreas: = False, OpenAfterPublish: = True End Sub
Výše uvedený kód je obecný kód pro uložení pevného rozsahu jako dokument PDF. Když vaše makro záznamu při exportu aplikace Excel do formátu PDF, zobrazí se podobný kód.
Rozsah: Může to být pevný rozsah, dynamický rozsah nebo výběr. Musíte to definovat.
Název souboru: Toto je plně kvalifikovaný název pdf. Definujte jej jako řetězec.
Zbytek proměnných lze ponechat tak, jak jsou. Vysvětlil jsem je po příkladu.
Příklad: Vytiskněte účtenku aplikace Excel jako PDF pomocí VBA
Řekněme, že musíte pravidelně tisknout a odesílat účtenky v Excelu. V takovém případě byste to chtěli zautomatizovat. Nechtěli byste exportovat excel do formátu pdf znovu a znovu. Pokud k tomu stačí použít tlačítko, bylo by to užitečné, že?
Zde jsem navrhl tento formát účtenky. Chci jej vytisknout/uložit/exportovat jako pdf pomocí tlačítka "Vytvořit PDF".
Tato účtenka pokrývá rozsah „A2: L21“. Oblast tisku jsem již nastavil.
Chcete -li ušetřit na tomto rozsahu Excelu jako PDF, použijeme výše uvedený obecný kód VBA pro export listu Excelu do formátu PDF. Kód upravíme podle našich požadavků.
Dílčí PrintSelectionToPDF () Dim fakturaRng jako rozsah Dim pdfile jako řetězec 'Nastavení rozsahu pro tisk Set pdfile = "faktura" & "_" & Formát (Nyní (), "rrrrmmdd_hhmmss") & ".pdf" 'nastavení úplného kvalifikovaného názvu. Výsledné pdf bude uloženo tam, kde existuje hlavní soubor. pdfile = ThisWorkbook.Path & strfile fakturaRng.ExportAsFixedFormat Typ: = xlTypePDF, _ Název souboru: = pdfile, _ Kvalita: = xlQualityStandard, _ IncludeDocProperties: = True, _ IgnorePrintAreas: = False, _ OpenAfterPublish:
Použití kódu:
Zkopírujte výše uvedený kód do souboru s potvrzením otevřením editoru VBA (použijte Alt+F11). Upravte rozsah a cestu k souboru (pokud chcete) v kódu, který chcete vytisknout. Pracovní soubor si můžete stáhnout níže.
Uložte rozsah aplikace Excel jako PDF pomocí VBA
Vysvětlení:
Dim fakturaRng jako rozsah Dim pdfile jako řetězec
Kód je jednoduchý. Nejprve jsme vytvořili dvě proměnné. "InvoiceRng as Range" pro rozsah/list, který chceme uložit jako pdf. strFile pro plně kvalifikovaný název souboru výsledného PDF.
Nastavit fakturuRng = rozsah ("A1: L21")
Protože je náš rozsah tisku pevný, nastavili jsme rozsah faktur jako Rozsah („A1: L21“).
pdfile = "faktura" & "_" & Formát (Nyní (), "rrrrmmdd_hhmmss") & ".pdf" pdfile = ThisWorkbook.Path & strfile
Ve výše uvedených dvou řádcích nejprve soubor pojmenujeme časovým razítkem a poté přidáme na cestu k hlavnímu souboru. Výsledkem je, že soubor pdfile obsahuje plně kvalifikovaný název výsledného souboru PDF.
fakturaRng.ExportAsFixedFormat _ Typ: = xlTypePDF, _ Název souboru: = pdfile, _ Kvalita: = xlQualityStandard, _ IncludeDocProperties: = True, _ IgnorePrintAreas: = True, _ OpenAfterPublish: = False
Nakonec použijeme metodu ExpoortAsFixedFormat třídy Range k vytištění definovaného rozsahu aplikace Excel jako PDF. Typ definujeme jako xlTypePDF. Další možností je xlTypeXPS, který uloží vybraný rozsah jako soubor XPS.
Nastavili jsme název souboru jako pdfile, který obsahuje řetězec plně kvalifikovaného názvu souboru pdf. Zde můžete napsat napevno zakódovaný text nebo jej upravit podle svých potřeb.
Dále nastavíme kvalitu pdfile jako xlQualityStandard. Jako xlQualityMinimum máme další možnost.
Dále nastavíme IncludeDocProperties jako True. To znamená, že výsledný PDF bude mít vlastnosti dokumentu.
Poté nastavíme IgnorePrintAreas jako True. To znamená, že bude ignorovat všechny již nastavené oblasti tisku.
Nakonec jsme nastavili OpenAfterPublish jako False. To znamená, že soubor, který vytvoříte, se neotevře automaticky. Nastavil jsem to na nepravdu, protože pomocí smyčky vytvořím 100 souborů a nechci, aby se otevřely. Pokud chcete soubor otevřít po vytvoření pomocí Excelu, nastavte ho na True.
Využití tisku vybraného rozsahu jako pdf
Jedním ze základních použití je vytištění vybraného rozsahu pouhým kliknutím na jedno tlačítko. Nejvhodnější je však použít jej ve smyčce, kde potřebujete vytvořit více účtenek pro různé klienty. Vytvořte dílčí položku pro vyplňování dat a poté pomocí tohoto kódu vytiskněte vybraný rozsah ve smyčce.
Doufám, že tento článek o tom, jak vytisknout tabulku v aplikaci Excel, je vysvětlující. Další články o výpočtu hodnot a souvisejících vzorcích Excelu najdete zde. Pokud se vám naše blogy líbily, sdílejte je se svými přáteli na Facebooku. A také nás můžete sledovat na Twitteru a Facebooku. Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit, doplnit nebo inovovat naši práci a zlepšit ji pro vás. Napište nám na e -mail.
Tiskněte více výběrů na jeden list pomocí VBA v Microsoft Excelu | Vyberte více rozsahů a pomocí VBA vytiskněte každý rozsah na jiném listu.
Vytiskněte všechny sešity ve složce pomocí VBA v aplikaci Microsoft Excel | Pomocí tohoto kódu VBA vytiskněte a uložte každý excelový sešit do složky pomocí.
Rozdělte list aplikace Excel na více souborů podle sloupce pomocí VBA | Tento kód VBA rozdělil list Excelu na jedinečné hodnoty v zadaném sloupci. Stáhněte si pracovní soubor.
Vypněte varovné zprávy pomocí VBA v aplikaci Microsoft Excel 2016 | K vypnutí varovných zpráv, které přerušují běžící kód VBA, používáme třídu Application.
Přidat a uložit nový sešit pomocí jazyka VBA v aplikaci Microsoft Excel 2016 | K přidání a uložení sešitů pomocí jazyka VBA používáme třídu Workbooks. Workbooks.Add přidá nový sešit snadno, ale…
Oblíbené články:
Jak používat funkci IF v aplikaci Excel : Příkaz IF v aplikaci Excel zkontroluje podmínku a vrátí konkrétní hodnotu, pokud je podmínka PRAVDA, nebo vrátí jinou konkrétní hodnotu, pokud NEPRAVDA.
Jak používat funkci VLOOKUP v Excelu : Toto je jedna z nejpoužívanějších a nejoblíbenějších funkcí Excelu, která se používá k vyhledávání hodnot z různých rozsahů a listů.
Jak používat funkci SUMIF v aplikaci Excel : Toto je další základní funkce řídicího panelu. To vám pomůže shrnout hodnoty za konkrétních podmínek.
Jak používat funkci COUNTIF v aplikaci Excel : Pomocí této úžasné funkce spočítejte hodnoty s podmínkami. K počítání konkrétních hodnot nemusíte data filtrovat. Funkce Countif je nezbytná pro přípravu řídicího panelu.