Note: The other languages of the website are Google-translated. Back to English
Logga in  \/ 
x
or
x
Registrera  \/ 
x

or

Hur anger jag format för datum eller datum i sidhuvud eller sidfot?

Normalt när du sätter in datum eller tid i sidhuvudet eller sidfoten med &[Datum] or &[Tid] kod, är datum- eller tidsformatet baserat på de regionala inställningarna som kontrolleras av Windows. I det här fallet, hur kan du ändra datum eller datumformat till ditt eget behov i sidhuvud eller sidfot enligt följande skärmdump?

dokumentformat datum i rubrik 1

Ange datum eller datumformat i sidhuvud eller sidfot med VBA-kod


pil blå höger bubbla Ange datum eller datumformat i sidhuvud eller sidfot med VBA-kod

Här kommer jag att introducera några enkla VBA-koder för dig att lösa denna uppgift i Excel, gör så här:

1. Aktivera kalkylbladet som du vill infoga och formatera datumet i sidhuvud eller sidfot och klicka sedan på Sidan Layout knappen i nedre högra hörnet av arbetsboken för att aktivera sidlayoutvyn, se skärmdump:

dokumentformat datum i rubrik 2

2. Håll ner ALT + F11 tangenter i Excel för att öppna Microsoft Visual Basic för applikationer fönster.

3. Klicka Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.

VBA-kod: Infoga och formatera datum i sidhuvud eller sidfot:

Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub

Anmärkningar: I koden ovan kan du ändra CenterHeader till LeftHeader, CenterFooter... och datumformatet mmmm dd, åååå kan också ändras efter behov.

4. Och tryck sedan på F5 för att köra den här koden och ditt angivna datumformat har införts i sidhuvudet eller sidfoten på en gång. Se skärmdump:

dokumentformat datum i rubrik 3

tips: Om du vill infoga ditt eget datumformat i sidhuvudet eller sidfoten, använd följande kod:

Sub Change_Format()
  ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub

Och du får följande resultat:

dokumentformat datum i rubrik 4


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2019 och 365. Stöder alla språk. Enkel distribution i ditt företag eller organisation. Fullständiga funktioner 30-dagars gratis provperiod. 60-dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50% och minskar hundratals musklick åt dig varje dag!
officetab botten
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Kasra · 6 months ago
    Hi, Thank You
    Can I ask you how can I change the font and size of "Date" by VBA?
    I mean with same code that you wrote for insert date into header by VBA.
    Thanks
  • To post as a guest, your comment is unpublished.
    Paula McSorley · 9 months ago
    I use a dynamic print range in my spreadsheet and generate PDFs. Oddly enough, when I execute the above VBA code snippet, it resets the dynamic print range for my current worksheet to a static range. Is there any way to avoid that?
  • To post as a guest, your comment is unpublished.
    Judy Kunz · 1 years ago
    This doesn't seem to work anymore.