Hoe geeft u de datum- of datum/tijdnotatie op in de koptekst of voettekst?
Bij het gebruik van Excel moet u de huidige datum of tijd vaak opnemen in de koptekst of voettekst van uw werkblad, bijvoorbeeld voor het afdrukken van rapporten of het bijhouden van documentrevisies. Standaard toont Excel, wanneer u een datum of tijd invoegt in de koptekst of voettekst met behulp van de &[Date]- of &[Time]-code, deze elementen in de datum- en tijdnotatie die is ingesteld in uw regionale Windows-instellingen. Dat betekent dat u met de ingebouwde functionaliteit niet direct kunt bepalen hoe de datum of tijd wordt weergegeven in de koptekst of voettekst—bijvoorbeeld „23 april 2024” in plaats van „23/04/2024”.
Deze beperking kan problematisch zijn als uw documenten moeten voldoen aan specifieke huisstijlrichtlijnen, regionale voorkeuren of persoonlijke voorkeuren voor de weergave van datum en tijd. U wilt bijvoorbeeld de datum weergeven in het formaat „Maand Dag, Jaar” of datum en tijd combineren (zoals „April 23, 2024 18:05”) in de kopteksten of voetteksten van uw document. De volgende schermafbeelding toont een aangepaste datumnotatie in de koptekst van het werkblad:
Om dit op te lossen, gebruikt u VBA (Visual Basic for Applications) om programmatisch de koptekst of voettekst in te stellen op het gewenste datum- of datum/tijdformaat. Deze methode biedt flexibiliteit en stelt u in staat de beperkingen van de ingebouwde Excel-hulpmiddelen voor kopteksten en voetteksten te omzeilen.
Geef de datum of Datum- en tijdnotatie instellen op in de koptekst of voettekst met VBA-code
Geef de datum of Datum- en tijdnotatie instellen op in de koptekst of voettekst met VBA-code
Om de notatie van de datum of datum en tijd in de koptekst of voettekst aan te passen, kunt u eenvoudig een VBA-code gebruiken. Deze oplossing is ideaal als u een flexibele, gepersonaliseerde weergave nodig hebt die niet wordt beperkt door de regionale instellingen van uw systeem. Volg deze stappen:
1. Open het werkblad waarin u de datumnotatie in de koptekst of voettekst wilt invoegen en aanpassen. Schakel over naar de paginalay-outweergave voor een direct voorbeeld van hoe uw kopteksten en voetteksten eruitzien bij het afdrukken. U schakelt de paginalay-outweergave in door op de knop Pagina-indeling rechtsonder in het Excel-venster te klikken, zoals hieronder wordt weergegeven:
Tip: Hoewel het overschakelen naar de paginalay-outweergave niet verplicht is om de VBA-code uit te voeren, is het wel aan te raden als u de wijzigingen in koptekst of voettekst direct wilt zien.
2. Druk op ALT + F11 op uw toetsenbord om het venster van de Microsoft Visual Basic for Applications (VBA)-editor te openen.
3. Klik in de VBA-editor op Invoegen > Module. Hiermee maakt u een nieuwe module aan. Kopieer en plak de volgende VBA-code in het modulevenster:
VBA-code: Datum invoegen en opmaken in koptekst of voettekst:
Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub
- Deze code voegt automatisch de huidige datum in het door u gekozen formaat in de koptekst in. U kunt CenterHeader wijzigen in LeftHeader, RightHeader, LeftFooter, CenterFooter of RightFooter als u de opgemaakte datum naar een andere positie in de koptekst of voettekst wilt verplaatsen.
- De datumnotatie-tekenreeks, bijvoorbeeld mmmm dd, yyyy (die „April 23, 2024” produceert), kan ook worden aangepast aan elke standaard VBA-datumnotatiecode, zoals dd/mm/yyyy, yyyy-mm-dd of andere, indien nodig.
- Let op de syntaxis van de datumnotatie-tekenreeks: onjuiste formaatcodes kunnen fouten of onbedoelde resultaten veroorzaken. Controleer altijd in de paginalay-outweergave of het resultaat overeenkomt met uw bedoeling.
4. Nadat u de code hebt ingevoerd en gecontroleerd, drukt u op F5 of klikt u op de knop „Uitvoeren” in de VBA-editor om de code uit te voeren. Het specifieke datumformaat wordt direct weergegeven in de koptekst of voettekst van uw werkblad. U kunt het resultaat controleren in de paginalay-outweergave, zoals op de volgende schermafbeelding:
Als u wilt dat de datum dynamisch wordt bijgewerkt telkens wanneer de werkmap wordt geopend of afgedrukt, moet u de VBA-code opnieuw uitvoeren of deze koppelen aan een gebeurtenis zoals ‘Werkmap openen’ of ‘Vóór afdrukken’. Deze VBA-gebaseerde methode is handmatig: de inhoud van de koptekst of voettekst wordt dus niet automatisch vernieuwd elke nieuwe dag, tenzij de code opnieuw wordt uitgevoerd.
Tips: Als u de huidige tijd samen met de datum in een aangepast formaat wilt opnemen, kunt u de volgende VBA-code gebruiken. Dit is handig wanneer uw rapporten een tijdstempel vereisen of wanneer u zowel de datum als het tijdstip van afdrukken of exporteren in de koptekst of voettekst van uw werkblad wilt vastleggen:
Sub Change_Format()
ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub
Het resultaat is een koptekst of voettekst die zowel datum als tijd weergeeft in het opgegeven formaat. Als u bijvoorbeeld het formaat instelt op "mmmm dd, yyyy hh:mm", ziet u een weergave zoals „april 23, 2024 18:05".
En u krijgt het volgende resultaat:
Waarschuwing: Sla werkmappen met VBA-macro’s altijd op als macro-ingeschakelde werkmap (.xlsm) om te garanderen dat uw code behouden blijft voor toekomstig gebruik. Sommige Excel-instellingen kunnen het uitvoeren van macro’s beperken; als u fouten tegenkomt, controleer dan uw macro-beveiligingsinstellingen via Bestand > Opties > Trustcentrum > Instellingen Trustcentrum > Macro-instellingen. Werkt de koptekst of voettekst niet zoals verwacht? Controleer dan of u de macro op het juiste werkblad uitvoert en of uw code verwijst naar het juiste gedeelte van de koptekst of voettekst.
Als u verschillende datumnotaties voor afzonderlijke werkbladen nodig heeft, herhaalt u het proces eenvoudig op elk relevant werkblad en past u de opmaaktekenreeks naar wens aan. Voor terugkerend gebruik kunt u de VBA-code toewijzen aan een knop of sneltoets, zodat u er razendsnel bij kunt.
Alternatieve methoden om de datumnotatie in de koptekst of voettekst aan te passen, zijn:
-Handmatig datum/tijd typen in koptekst of voettekst (eenvoudig maar statisch): U kunt elke gewenste datum of tijd invoeren door handmatig dubbel te klikken in de koptekst of voettekst in de paginalay-outweergave. Deze methode wordt echter niet automatisch bijgewerkt wanneer het werkblad wordt geopend of afgedrukt. Het is een snelle oplossing voor statische documenten, maar vereist handmatige updates bij nieuwe data.
Kort samengevat is VBA de ideale oplossing voor flexibele, aangepaste en dynamische datum- of datum/tijdformaten in kopteksten en voetteksten. Controleer altijd uw opmaaktekenreeksen en sla uw macro’s correct op. Mocht u na het uitvoeren van de code nog steeds verouderde of ongewijzigde datumnotaties zien, controleer dan uw macro-beveiligingsinstellingen of probeer uw werkmap op te slaan en opnieuw te openen.
Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins