Ulike måter formatering datoer i VBA inkludere disse for å skape dato strenger med stavet ut måneder , formatering med bare tall, med hverdager , og med tilpassede formater. Du kan se de forhåndsinnstilte datoformatene tilgjengelig i VBA ved å bruke Excel standard grensesnitt. Klikk på den lille pilen nederst til høyre på "Home "-kategorien er " Number "-panelet for å vise en liste over disse formatene . Lange formater
En måte du kan formatere datoer med VBA er å bruke en rekke " m" tegn for å indikere de lange navnene på månedene . For eksempel formatet " mmmm " vil gi akkurat den stavet ut teksten " desember " hvis datoen du formaterer er i desember . Hvis du ønsker en tre-bokstavs måned , bruker du " mmm ", som i " Selection.NumberFormat =" mmm dd, åååå " " for datoer som " desember 31 , 1966 . " Legg merke til bruken av" d " tegnet for å representere dagen .
Korte formater
p Hvis du vil ha tall i stedet for stavet ut tekst for dine datoer , bruker bare én eller to formateringstegn for måneder. For eksempel " Selection.NumberFormat = " mm /dd /åååå " " for datoer som " 12/31/1966 . " For " 12/66 ", bruker formateringen strengen "mm /åå ", eller bare " m /y . "
datoer med Weekday
vil formatere en date med en stavet ut dagen , bruker fire "d" tegn som tyder på dagen . For eksempel " Selection.NumberFormat =" dddd , mmm dd, åååå " " for datoer som "Saturday 31. desember 1966. " For å forkorte dag uten å bruke tall, bruke tre "d" tegn i stedet for fire , som i " ddd , mmm dd, åååå . "
Custom datoformater
kan du lage et tilpasset datoformatet i VBA ved hjelp av noen delimiter tillegg til de vanlige de av " /" og " - ". for eksempel kan du bruke en uttalelse som " Selection.NumberFormat = " mm ~ dd ~ åå "" for å produsere datoer som " ; 12 ~ 31 ~ 66 " Du kan velge en slik skikk format bare for moro skyld av stil, eller for å forberede date strenger for programmer som krever spesifikke tegn for deres innspill
Sample Program. .
følgende eksempel VBA -programmet kan du raskt prøve ut forskjellige datoformater. Lim inn i programmet inn i VBA programmering miljø , som du kan skrive ved å trykke " Alt" og " F11 " samtidig etter åpning Excel. Etter å ha kjørt programmet ved å trykke "F5 ", skriver en dato format når du blir bedt om , for eksempel " mm /dd /åå . " Programmet vil vise gjeldende dato i formatet du har angitt.
sub FormatDates ( ) Dim FMT , s1fmt = InputBox ( "Skriv en dato format" ) s1 = format (Now , FMT ) MsgBox s1End sub