Verschillende manieren van formatteren data in VBA omvatten die voor het creëren date snaren met gespeld maanden , formatteren met alleen getallen , met doordeweekse dagen , en met aangepaste formaten. U kunt de vooraf ingestelde datum formaten beschikbaar in VBA te zien door het gebruik van standaard interface van Excel . Klik op de kleine pijl in de rechterbenedenhoek van het tabblad "Home " " Number " paneel om een lijst van deze formaten weer te geven . Lange Formaten Een manier kunt u data met VBA formatteren is om een reeks van "m " tekens gebruiken om de lange namen van de maanden aan te geven . Bijvoorbeeld , het formaat " mmmm " zal opleveren net de gespeld tekst "December , " als de datum dat u opmaakt is in december . Als u wilt dat een drie - letter maanden , gebruikt " mmm , " zoals in " Selection.NumberFormat = " mmm dd , yyyy " " voor data zoals " december 31 , 1966 . " Let op het gebruik van de " d " karakter aan de dag vertegenwoordigen . Korte Formats Als u wilt nummers ipv gespeld tekst voor uw data , gebruik gewoon een of twee opmaaktekens voor uw maanden . Typ bijvoorbeeld " Selection.NumberFormat = " dd /mm /jjjj " " voor data zoals " 1966/12/31 . " Voor " 12/66 ", gebruikt u de opmaak string " mm /jj , " of gewoon " m /y . " Dates met weekdag Om een date met een gespeld dag formatteren , gebruikt vier " d " tekens op de dag geven . Typ bijvoorbeeld " Selection.NumberFormat = " dddd , mmm dd , yyyy " " voor data zoals " zaterdag 31 december, 1966 . " Om de dag te korten zonder gebruik getallen , gebruik maken van drie " d " tekens in plaats van vier , zoals in " ddd , mmm dd , yyyy . " Aangepaste datum indelingen U kunt een aangepaste datumnotatie in VBA maken met alle scheidingsteken naast de gemeenschappelijke regels van " /", en " - . " Bijvoorbeeld , kunt u een uitspraak als " Selection.NumberFormat = " mm ~ dd ~ jj " gebruiken " om data zoals produceren " , 12 ~ 31 ~ 66 " je mag zo'n aangepaste notatie kiezen enkel omwille van stijl , of om je date snaren te bereiden op programma's die specifieke tekens nodig hebben voor hun inbreng Sample Program . . De volgende voorbeeld VBA programma kun je snel proberen verschillende datum formaten . Plak het programma in het VBA- programmeeromgeving , die u kunt invoeren door op " Alt " en " F11 " gelijktijdig na het openen van Excel . Na het uitvoeren van het programma door op " F5 ", typt u een datumnotatie wanneer daarom wordt gevraagd , zoals " dd /mm /jj . " Het programma zal de huidige datum weergegeven in het formaat dat u hebt opgegeven . sub FormatDates ( ) Dim fmt , s1fmt = InputBox ( " Typ een datumnotatie " ) s1 = format ( Now , fmt ) MsgBox s1End sub
|