Meer informatie

Gebruik een van de volgende methoden om pagina-instellingen op te geven voor een groep Excel-werkbladen.

Methode 1: Een sjabloon gebruiken

Als u meer informatie wilt over het opslaan van pagina-instellingen in een sjabloon, klikt u op Microsoft Excel Help in het menu Help, typt u werkmap of werkblad aanpassen met een sjabloon in de Office-assistent of de Antwoordwizard en klikt u op Zoeken om het bijbehorende onderwerp te bekijken.

Methode 2: Een groep werkbladen wijzigen

U kunt als volgt pagina-instellingen toepassen op een groep werkbladen in een werkmap:

1. Druk op SHIFT en klik vervolgens op de tab van elk werkblad in de werkmap waarvoor u pagina-instellingen wilt opgeven.
2. Klik op Pagina-instelling in het menu Bestand.
3. Breng de gewenste wijzigingen aan in het dialoogvenster Pagina-instelling en klik op OK.
   
   
   Alle geselecteerde werkbladen hebben nu dezelfde pagina-instellingen.

Methode 3: Een macro gebruiken

De door Microsoft gebruikte programmeervoorbeelden dienen uitsluitend ter illustratie. Microsoft verleent dan ook geen enkele impliciete of expliciete garantie met betrekking tot deze voorbeelden. Er gelden geen impliciete garanties met betrekking tot verkoopbaarheid en/of geschiktheid voor een bepaald doel, noch enigerlei andere garanties. In dit artikel wordt ervan uitgegaan dat u bekend bent met de programmeertalen VBScript en VBA, alsmede met de hulpprogramma's waarmee procedures worden gemaakt en waarmee fouten in procedures worden opgespoord. U kunt desgewenst contact opnemen met Microsoft Productondersteuning voor uitleg over de functie van een bepaalde procedure. Microsoft Productondersteuning is echter niet bereid de voorbeelden aan te passen om extra functies toe te voegen of om procedures te maken die aan uw specifieke wensen voldoen. Als u nog niet zoveel programmeerervaring hebt, kunt u desgewenst contact opnemen met een Microsoft Certified Partner. Als u meer informatie wilt over Microsoft Certified Partners, bezoekt u de volgende website van Microsoft:

Voor meer informatie over de beschikbare ondersteuningsopties en hoe u contact kunt opnemen met Microsoft, bezoekt u de volgende website:

U kunt via programmacode de pagina-instellingen van de actieve werkmap en alle andere geopende werkmappen wijzigen.
Opmerking In deze macro's wordt de eigenschap Orientation van het object PageSetup gebruikt. U kunt andere pagina-instellingen wijzigen door andere eigenschappen van PageSetup op te geven, zoals LeftMargin, RightMargin, enzovoort.


Gebruik de stappen in het vorige voorbeeld om via programmacode de afdrukstand van alle werkbladen in de actieve werkmap te wijzigen:

1. Start Excel.
2. Typ wat gegevens in drie werkbladen.
3. Druk op ALT+F11 om de Visual Basic-editor te openen.
4. Klik in het menu Invoegen op Module.
5. Typ de volgende code in het modulewerkblad:
   
   Sub SetAttributes() For Each xWorksheet In ActiveWorkbook.Worksheets xWorksheet.PageSetup.Orientation = _ Worksheets("Sheet1").PageSetup.Orientation Next xWorksheetEnd Sub
   
6. Druk op ALT+F11 om naar Excel over te schakelen.
7. Selecteer Sheet1.
8. Klik op Pagina-instelling in het menu Bestand.
9. Open het tabblad Pagina, klik op Liggend onder Stand en klik op OK.
10. Wijs in het menu Extra de optie Macro aan en klik op Macro's.
11. Klik op SetAttributes en klik op Uitvoeren.
    
    
    Alle drie de werkbladen worden nu met de afdrukstand Liggend weergegeven in het afdrukvoorbeeld.

Gebruik de stappen in het volgende voorbeeld om via programmacode de pagina-instellingen van een andere geopende werkmap te gebruiken voor alle pagina's in de actieve werkmap:

Opmerking Dit voorbeeld is een voortzetting van het vorige voorbeeld.

1. Klik op Nieuw in het menu Bestand.
2. Klik op Werkmap en klik op OK.
3. Typ gegevens in alle werkbladen van de nieuwe werkmap.
4. Druk op ALT+F11 om de Visual Basic-editor te openen.
5. Klik in het menu Invoegen op Module.
6. Typ de volgende code in het modulewerkblad:
   
   Sub SetWorkbookAttributes() For Each xWorksheet In ActiveWorkbook.Worksheets xWorksheet.PageSetup.Orientation = _ ThisWorkbook.Worksheets("Sheet1").PageSetup.Orientation Next xWorksheetEnd Sub
   
7. Druk op ALT+F11 om terug te gaan naar Excel.
8. Wijs in het menu Extra de optie Macro aan en klik op Macro's.
9. Klik op SetWorkbookAttributes en klik op Uitvoeren.
   
   
   De afdrukstand is nu hetzelfde als die van sheet1 in de eerste werkmap.

Als u andere pagina-instellingen wilt wijzigen voor werkbladen, kunt u binnen elke Sub-procedure extra regels toevoegen aan de instructie For Each...Next. De regels moeten hetzelfde zijn als de voorbeeldregels, afgezien van de eigenschap (Orientation), die u vervangt door de gewenste eigenschap (zoals CenterFooter of PaperSize).