Kutools for Excel Excel? Er en hendig Excel-tillegg, og dens Kopier Sideoppsett funksjonen kan hjelpe deg raskt sette utskriftsområde til flere regneark.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Få den nå
en. Velg utskriftsområde i en av regnearket, og klikk deretter Page Layout > Utskriftsområde > Still utskriftsområde. Se skjermbilde:
to. Klikk Enterprise > Skrive Verktøy > Kopier Sideoppsett. Se skjermbilde:
tre. I Kopier Dialogboksen Sideoppsett, sjekk regnearkene du vil angi utskriftsområdet på i mellomtiden, og klikk deretter kategorien Ark, og sjekk Print området bare i Page setup delen. Se skjermbilde:
4. Klikk deretter på OK for å lukke dialogboksen, og klikk på Ja i det kommende Kutools for Excel advarsel dialogboksen deretter sjekket regneark er satt med samme utskriftsområder på en gang.
Klikk her for flere detaljer om Copy Page Setup.
Sett samme utskriftsområde til flere regneark med VBA
Hvis du er interessert i VBA, kan du prøve følgende VBA.
1. Velg et område du vil angi som utskriftsområde i en av regneark og trykk ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
2. Klikk Module > Sett inn for å sette inn en modul vindu, og kopier under VBA inn i vinduet
VBA:.. Sett print området i hele arbeidsboken
Sub SetGlobalPrintArea () 'Updateby20140827Dim xWs Som WorksheetDim WorkRng Som RangeSet WorkRng = Application.SelectionFor Hver xWs I Application.ActiveWorkbook.Worksheets xWs.PageSetup.PrintArea = WorkRng.AddressNextEnd Sub3. Klikk Kjør for å kjøre VBA, og deretter alle regnearkene i arbeidsboken vil bli satt med de samme utskriftsområder
. Tips:
Hvis du ønsker å sette utskriftsområde i utvalgte regneark, kan du gjøre som følger:
1. Velg et område du vil angi det som utskriftsområdet og deretter velge regnearkene ved å trykke Ctrl tastene du trenger, og trykk ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications vinduet.
2. Klikk Module > Sett inn for å sette inn en modul vindu, og kopier under VBA inn i vinduet
VBA:.. Sett utskriftsområde i utvalgte regneark
Sub SetSelectWsPrintArea () 'Updateby20140827Dim xWs Som WorksheetDim WorkRng Som RangeSet WorkRng = Application.SelectionFor Hver xWs I Application.ActiveWindow.SelectedSheets xWs.PageSetup.PrintArea = WorkRng.AddressNextEnd Sub
Datamaskin læring 