Olika sätt att formatera datum i VBA omfatta de för att skapa date strängar med stavas ut månader , formatering med bara siffror , med vardagar , och med anpassade format . Du kan se de förinställda datumformat som finns i VBA genom att använda Excels standardgränssnitt . Klicka på den lilla pilen längst ned till höger på fliken "Hem" s " Antal " för att visa en lista över dessa format . Långa format
Ett sätt du kan formatera datum med VBA är att använda en serie av " m " tecken för att indikera de långa namnen på månader . Till exempel formatet " mmmm " kommer att ge just det preciseras texten " december " Om det datum du formaterar är i december . Om du vill ha en tre - brev månaden , använd " mmm ", som i " Selection.NumberFormat = " mmm dd, åååå " " för datum som " December 31 , 1966 . " Lägg märke till användningen av " d " figur som representerar dagen .
Korta format
p Om du vill ha siffror istället för preciseras text för datum , använd bara en eller två formateringstecken för dina månader . Skriv till exempel " Selection.NumberFormat = " mm /dd /åååå " " för datum som " 1966/12/31 . " "12 /66 " använda formatering strängen " mm /yy , " eller bara" m /Y ".
datum med Weekday
vill formatera ett datum med preciseras dag , använd fyra " d " tecken för att indikera dagen . Skriv till exempel " Selection.NumberFormat = " dddd , mmm dd, åååå " " för datum som " Lördag 31 December, 1966 . " Att förkorta dagen utan att använda siffror , använder tre " d " tecken istället för fyra , som i " ddd, mmm dd, åååå . "
anpassad datumformat
Du kan skapa en anpassad datumformat i VBA genom att använda någon avgränsare förutom de vanligaste av " /, " och " - . " Till exempel , kan du använda ett uttalande som " Selection.NumberFormat = " mm ~ dd ~ yy " " för att framställa datum såsom " , 12 ~ 31 ~ 66 " Du kan välja en sådan anpassat format bara för sakens skull stil , eller att förbereda din dejt strängar för program som kräver särskilda tecken för deras insatser
Sample program . .
följande exempel VBA -program kan du snabbt prova olika datumformat . Klistra in programmet i VBA-programmering miljö , där du kan ange genom att trycka på " Alt " och " F11 " samtidigt efter öppnandet Excel . Efter att ha kört programmet genom att trycka på " F5 ", skriver ett datumformat vid uppmaning , t.ex. " mm /dd /åå . " Programmet kommer att visa det aktuella datumet i det format du angett.
sub FormatDates ( ) Dim FMT , s1fmt = InputBox ( " Skriv in ett datum format " ) s1 = format ( nu , FMT ) MsgBox s1End sub
