Jak vymazat oblast tisku přes více listů najednou v aplikaci Excel?
V některých případech můžeme nastavit oblast tisku v listu pro tisk, ale pokud existuje více listů s různými oblastmi tisku, jak mohu vymazat všechny oblasti tisku prostřednictvím více listů najednou v aplikaci Excel? Ruční mazání jeden po druhém je pomalý způsob, existuje nějaký rychlý způsob?
Vyčistěte oblast tisku v celém sešitu pomocí VBA
Vyčistěte oblast tisku na více listech pomocí funkce Kopírovat stránku
Vyčistěte oblast tisku v celém sešitu pomocí VBA
Zde je kód makra, který dokáže vymazat všechny tiskové oblasti v celém sešitu.
1. lis Alt + F11 klávesy pro povolení Microsoft Visual Basic pro aplikace okno.
2. V Projekt - VBAProject v podokně poklepejte Tato pracovní kniha a zkopírujte pod VBA a vložte je do pravého prázdného skriptu. Viz snímek obrazovky:
VBA: Vymazání oblasti tisku celého sešitu
Sub ClearPrintArea()
'UpdatebyExtendoffice20171229
Dim xSheet As Worksheet
For Each xSheet In Worksheets
xSheet.PageSetup.PrintArea = ""
Next
End Sub
3. lis F5 pro spuštění kódu, pak byly všechny oblasti tisku v sešitu odstraněny.
Vyčistěte oblast tisku na více listech pomocí funkce Kopírovat stránku
Pokud máte Kutools pro Excel, jeho obslužný program Copy Page Setup vám také může udělat laskavost při čištění více oblastí tisku přes listy.
Po instalaci Kutools pro Excel, prosím, postupujte takto:(Zdarma ke stažení Kutools pro Excel nyní!)
1. Vyberte jeden list, například náhodné heslo listu, a poté klikněte Rozvržení stránky > Oblast tisku > Vymazat oblast tisku. Viz snímek obrazovky:
2. Pak klikněte na tlačítko Kutools Plus > Tisk > Kopírovat nastavení stránky.
3. Pak v Kopírovat nastavení stránky dialog,
v Kopírovat do sekce, všechny listy kromě aktuálního listu jsou uvedeny, zaškrtněte prosím listy, ze kterých chcete vymazat oblast tisku;
pak jděte do možnosti , pod List seznam, zkontrolujte Oblast tisku pouze možnost. Viz screenshot:
4. cvaknutí Ok. Nyní jsou oblasti tisku z vybraných listů odstraněny.
Demonstrace
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!