Forskellige måder formatering datoer i VBA omfatter dem for at skabe datostrenge med præciseret måneder formatering med bare tal med hverdage og med tilpassede formater. Du kan se de forudindstillede datoformater rådighed i VBA ved hjælp af Excel standard interface. Klik på den lille pil nederst til højre på fanebladet "Hjem" s "Number " panel til at vise en liste over disse formater . Lange formater
En måde du kan formatere datoer med VBA er at bruge en række " m" tegn til at angive de lange navne måneder. For eksempel formatet " mmmm " vil give netop den præciseret teksten "December ", hvis datoen du formaterer , er i december. Hvis du ønsker en tre bogstaver måned , brug " mmm ", som i " Selection.NumberFormat =" mmm dd, yyyy "" for datoer som " December 31 , 1966. " Læg mærke til brugen af " d " tegnet til at repræsentere dagen.
Korte formater
p Hvis du ønsker tal i stedet for præciseres tekst til dine datoer , brug bare en eller to formatering tegn for din måneder. For eksempel , skriv " Selection.NumberFormat =" mm /dd /yyyy "" for datoer som " 1966/12/31 . " For " 12/66 ", bruge formateringen strengen " mm /yy ", eller blot" m /Y ".
Datoer med Weekday
For at formatere en date med en præciseret dagen, bruge fire "d" tegn til at angive dagen . For eksempel , skriv " Selection.NumberFormat =" dddd , mmm dd, yyyy "" for datoer som " Lørdag, 31 december, 1966 . " At forkorte dagen uden at bruge tal , bruge tre "D" tegn i stedet for fire , som i " ddd, mmm dd, yyyy ".
Brugerdefineret datoformater
Du kan oprette en tilpasset datoformat i VBA ved at bruge nogen delimiter ud over de fælles dem af " /" og " - ". for eksempel kan du bruge en sætning som " Selection.NumberFormat =" mm ~ dd ~ yy "" til at producere datoer som " ; 12 ~ 31 ~ 66 " Du kan vælge sådan et brugerdefineret format lige af hensyn til stil, eller til at forberede din datostrenge for programmer, der kræver bestemte tegn for deres input
Sample Program . .
følgende eksempel VBA program kan du hurtigt afprøve forskellige datoformater . Indsæt programmet i VBA programmering miljø , hvor du kan indtaste ved at trykke på " Alt" og " F11 " samtidigt efter åbning Excel. Efter at have kørt programmet ved at trykke på "F5 ", skriver en dato -format, når du bliver bedt om , såsom " mm /dd /åå . " Programmet vil vise den aktuelle dato i det format, du har angivet.
sub FormatDates ( ) Dim FMT , s1fmt = InputBox ( " Skriv en dato format " ) s1 = Format (Now , FMT ) MsgBox s1End sub