Hoe voeg je een achtergrondkleur toe aan kopteksten of voetteksten in een Excel-werkblad tijdens het afdrukken?
Bij het werken in Excel verhoogt het toevoegen van kopteksten of voetteksten het professionele uiterlijk van je afgedrukte documenten door belangrijke informatie zoals paginanummers, bestandsnamen of bedrijfslogo's op te nemen. Hoewel de ingebouwde functies van Excel het mogelijk maken om tekst en afbeeldingen in kopteksten en voetteksten in te voegen die tijdens het afdrukken zichtbaar worden, kan het zijn dat je deze secties wilt markeren met een achtergrondkleur voor verbeterde leesbaarheid of branding. Helaas biedt Excel momenteel geen directe optie om achtergrondkleuren toe te passen op de koptekst- of voettekstgebieden in de afdruk. Dit kan frustrerend zijn als je deze secties visueel wilt scheiden van je gegevens bij het afdrukken. Hieronder vind je enkele praktische oplossingen om een gekleurde koptekst of voettekst na te bootsen in je Excel-afdrukken, afgestemd op verschillende behoeften en technische vaardigheden.
Achtergrondkleur toevoegen aan koptekst of voettekst via Vulkleur
Achtergrondkleur toevoegen aan koptekst en voettekst via VBA
Achtergrondkleur toevoegen aan koptekst of voettekst via Vulkleur
Deze aanpak houdt in dat je werkbladcellen formatteert om visueel een gekleurde koptekst of voettekst na te bootsen. Omdat echte kopteksten en voetteksten die via Pagina-indeling zijn gemaakt geen ondersteuning bieden voor achtergrondkleur, biedt het formatteren van de bovenste en/of onderste rijen een effectief alternatief. Deze methode is het beste wanneer je voornaamste doel is om de visuele scheiding of branding van afgedrukte bladen te verbeteren, en wanneer je koptekst/voettekstinhoud kan worden weergegeven in werkbladrijen in plaats van echte afdrukkopteksten/voetteksten.
Beperkingen van deze methode omvatten de onmogelijkheid om dynamische koptekst-/voettekstvelden (zoals paginanummers) te gebruiken en de noodzaak om deze stappen handmatig voor elk blad te herhalen.
1. Klik Pagina-indeling > Pagina-instelling.
Voordat je verdergaat, is het belangrijk om alle marges op 0 in te stellen om de bruikbare werkbladruimte te maximaliseren en ervoor te zorgen dat de gekleurde gebieden volledig bovenaan en/of onderaan elke afgedrukte pagina staan. Dit helpt de illusie te creëren van een echte koptekst- of voettekstachtergrond wanneer het document wordt afgedrukt.
2. In de Pagina-instelling dialoog, ga naar het tabblad Marges en typ 0 in de Boven, Koptekst, Onder, en Voettekst tekstvakken. Dit zorgt ervoor dat er geen ruimte wordt gereserveerd voor de ingebouwde kopteksten en voetteksten van Excel, en positioneert je werkbladinhoud helemaal bovenaan en onderaan de afgedrukte pagina.
3. Klik OK om de wijzigingen in de marges toe te passen. Selecteer de eerste rij van je werkblad (deze rij zal visueel fungeren als je koptekst), ga vervolgens naar Start > Samenvoegen & Centreren om alle kolommen in deze rij samen te voegen tot één cel. Dit biedt een groot gebied voor je koptekst en achtergrondkleur.
Tip: Voor documenten met meerdere kolommen, zorg ervoor dat je het juiste bereik aan cellen selecteert en samenvoegt om je hele gegevensgebied te bestrijken.
4. Met de samengevoegde cel geselecteerd, klik op de Vulkleur knop (verfkwastpictogram) in het tabblad Start en kies je gewenste achtergrondkleur uit het palet. Dit zal een zichtbare kleurenband bovenaan je blad toevoegen, wat een koptekstachtergrond nabootst.
5. Als je ook een gekleurde voettekst wilt toevoegen, schuif dan naar de laatste rij van je afdrukbereik, selecteer deze en herhaal de samenvoeg- en vulkleurstappen om een gekleurd gebied onderaan de pagina te creëren.
Voor de beste resultaten kun je overwegen om je eigen koptekst- of voettekst rechtstreeks in deze gekleurde en samengevoegde cellen toe te voegen. Je kunt lettergrootte, uitlijning of opmaak aanpassen zoals nodig om te voldoen aan je afdrukvereisten. Houd er rekening mee dat deze methode de koptekst en voettekst alleen definieert op het zichtbare werkbladgebied. Als je document meerdere pagina's beslaat, moet je deze opmaakstappen mogelijk handmatig voor elke afgedrukte pagina herhalen, of gebruik de functie "Rijen herhalen bovenaan" in Pagina-instelling voor alleen kopteksten.
Nu, wanneer je naar Bestand > Afdrukken gaat of drukt op Ctrl + P, zou je een gekleurde band bovenaan (en/of onderaan) de voorbeeldpagina moeten zien, die dient als een gesimuleerde achtergrond voor je koptekst of voettekst.
Als de kleur niet zoals verwacht verschijnt in het Afdrukvoorbeeld, controleer dan of je printerinstellingen en werkbladbereik overeenkomen, en verifieer dat het afdrukbereik je opgemaakte rijen dekt.
Achtergrondkleur toevoegen aan koptekst en voettekst via VBA
Voor complexere werkbladen, of wanneer je te maken hebt met meerdere pagina's en een meer geautomatiseerde manier wilt om gekleurde koptekst- en voettekstgebieden op elke afgedrukte pagina te creëren, kun je een VBA-macro gebruiken om deze effecten snel door je hele blad heen toe te voegen. Deze VBA-oplossing voegt vooraf gedefinieerde gekleurde rijen toe aan het begin en einde van elk paginabereik, waardoor de look van gekleurde kopteksten en voetteksten in de afdruk wordt gesimuleerd.
Deze aanpak is bijzonder geschikt voor grotere werkbladen, legacyrapporten of situaties waar uniforme opmaak nodig is over veel pagina's. Het vereist echter het inschakelen van macrofunctionaliteit en enige ervaring met de VBA-interface. Let op dat dit nog steeds geen invloed heeft op de daadwerkelijke Excel-koptekst/voettekst, maar werkt door de werkbladinhoud rechtstreeks voor afdruksimulatie te wijzigen.
1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-editorvenster te openen. Als dit je eerste keer is met VBA, moet je mogelijk eerst het tabblad Ontwikkelaar inschakelen.
2. Klik in het VBA-venster op Invoegen > Module. Kopieer en plak de volgende code in het codegebied van de nieuwe module:
VBA: Achtergrondkleur toevoegen aan koptekst en voettekst
Sub FakeHeaderFooter()
'UpdatebyExtendoffice20180628 Dim I, J As Long Dim xRg As Range Dim xRow, xCol As Long Dim xRows, xCols As Long Dim xDivRow, xDivCol As Long Dim xTopArr, xButtArr As Variant Dim PageSize1, PageSize2 As Integer On Error Resume Next xTopArr = Array("Top Left", "", "", "Top Center", "", "", "", "")
xButtArr = Array("Bottom Left", "", "", "Bottom Center", "", "", "", "")
PageSize1 =46 PageSize2 =8 With ActiveSheet.PageSetup .TopMargin = Application.InchesToPoints(0)
.BottomMargin = Application.InchesToPoints(0)
.HeaderMargin = Application.InchesToPoints(0)
.FooterMargin = Application.InchesToPoints(0)
.BlackAndWhite = False End With Set xRg = ActiveSheet.UsedRange If xRg Is Nothing Then Exit Sub xRows = xRg(xRg.Count).Row xCols = xRg(xRg.Count).Column If xRows <46 Then xRows =46 If xCol <8 Then xCol =8 xDivRow = Int(xRows / PageSize1)
xDivCol = Int(xCols / PageSize2)
If ((xRows Mod PageSize1) >0) And (xDivRow <>0) Then xDivRow = xDivRow +1 If ((xCols Mod PageSize2) >0) And (xDivCol <>0) Then xDivCol = xDivCol +1 If xDivRow =0 Then xDivRow =1 If xDivCol =0 Then xDivCol =1 Set xRg = Range("A1").Resize(xDivRow * PageSize1, xDivCol * PageSize2)
xRow =1 xCol =1 Cells.PageBreak = xlPageBreakNone For I =1 To xDivRow * PageSize1 Step PageSize1 +1 For J =1 To xDivCol * PageSize2 Step PageSize2 Cells(I, J).Resize(1, PageSize2) = xTopArr Cells(I, J).Resize(1, PageSize2).Interior.ColorIndex =34 Cells(I + PageSize1, J).Resize(1, PageSize2) = xButtArr Cells(I + PageSize1, J).Resize(1, PageSize2).Interior.ColorIndex =34 Rows(I + PageSize1 +1).PageBreak = xlManual Columns(J + PageSize2).PageBreak = xlManual Next NextEnd Sub
3. Druk op F5 of klik op de Uitvoeren knop in de VBA-werkbalk om de code uit te voeren. De macro zal automatisch gekleurde rijen invoegen aan de boven- en onderkant van elk paginabereik zoals bepaald door de ingestelde PageSize1 (aantal rijen per pagina) en PageSize2 (aantal kolommen per pagina). De eerste en 47e rij op elke "pagina" zullen worden gevuld met de gespecificeerde kleur en vooraf gedefinieerde tekst, wat samen zal verschijnen als een "nep" koptekst en voettekst wanneer je naar het afdrukvoorbeeld gaat of je werkblad afdrukt.
Je kunt deze macro verder aanpassen om aan je vereisten te voldoen. Bijvoorbeeld, om de inhoud van de koptekst of voettekst te wijzigen, pas de tekst aan binnen deze regels:
xTopArr = Array("Linksboven", "", "", "Middenboven", "", "", "", "")
xButtArr = Array("Linksonder", "", "", "Middenonder", "", "", "", "")
Als je een andere achtergrondkleur wilt, wijzig dan de ColorIndex-waarde hier:
Cells(I, J).Resize(1, PageSize2).Interior.ColorIndex =34
Cells(I + PageSize1, J).Resize(1, PageSize2).Interior.ColorIndex =34
De macro gebruikt standaard Excel-kleurindexen. Om verschillende kleuren te bekijken, raadpleeg dan de ColorIndex-referentie van Microsoft of gebruik de kleurkiezer van Excel om waarden te identificeren die overeenkomen met je merk of ontwerpvoorkeuren.
Opmerking: Sla je werk op voordat je VBA-macros uitvoert, omdat acties niet ongedaan kunnen worden gemaakt met de standaard Ongedaan maken-functie. Bovendien wijzigt deze macro de inhoud van het werkblad, dus controleer of je afdrukbereik correct is en pas de PageSize1- en PageSize2-parameters aan voor je specifieke papier- en lay-outbehoeften. Deze methode voegt extra rijen toe en kan bestaande gegevens naar beneden verschuiven, dus controleer je lay-out na het uitvoeren van de macro.
Als je problemen ondervindt met gekleurde gebieden die niet zoals verwacht worden weergegeven bij het afdrukken (zoals ontbrekende kleur of afknipping), controleer dan of het afdrukken van achtergrondkleuren is ingeschakeld in de geavanceerde instellingen van je printer, en zorg ervoor dat het afdrukbereik van je werkblad correct is ingesteld. Zowel de vulkleur- als de VBA-aanpak vereisen voorzichtigheid met samengevoegde cellen en afdrukbereikinstellingen, omdat een onjuiste configuratie kan leiden tot misalignering of gedeeltelijke kleuring.
Kies de oplossing die het beste past bij je Excel-versie, paginalay-out, complexiteit van je koptekst-/voettekstbehoeften en of automatisering of ontwerpbewaking voor jou belangrijker is. Het kleuren van kopteksten/voetteksten werkt het beste voor presentaties, voorbladen of gemerkte afdrukken wanneer de daadwerkelijke koptekst-/voettekstvelden niet dynamisch over pagina's hoeven te worden bijgewerkt.
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen