Datum formaat wijzigen in Excel 2013 koptekst

Question

Hallo,

Ik zou graag het formaat van de datum willen wijzigen in mijn koptekst bij Excel 2013.

Want als ik die automatisch laat invoeren via volgend code "&[Datum]" is het formaat niet zoals ik wens. Maar vind geen weg om dit te veranderen.

Kan iemand mij hiermee helpen?

Alvast bedankt

Met vriendelijke groeten,

Killian Geldof

Answer 1

Dat kan via een macro. Je hebt niet aangegeven welke notatie je dan wel wilt hebben, dus ik neem maar even "20 jan 2014" als voorbeeld. Pas telkens het vetgedrukte deel naar wens aan.

Deze macro plaatst een koptekst in het actieve werkblad.

Sub KoptekstDatum1()

ActiveSheet.PageSetup.CenterHeader = Format(Now(), "dd mmm yyyy")

End Sub

Deze macro plaatst de gewenste koptekst in alle werkbladen in de werkmap.

Sub KoptekstDatum2()

Dim wb As Worksheet

For Each wb In Worksheets

    wb.PageSetup.CenterHeader = Format(Now(), "dd mmm yyyy")

Next wb

End Sub

Uitleg:

Macro's maken met VBA

Macro's starten

Sla de werkmap op als *Excel-werkmap met macro's (*.xlsm)********Mocht je met "formaat" de tekengrootte bedoelen: selecteer &[Datum], ga naar het tabblad Start en pas in de groep Lettertype de tekengrootte aan.

Answer 2

Dank u voor uw antwoord dit is precies wat ik wou als formaat.

Nogmaals bedankt.