Obsah
Tento tutoriál ukáže, ako používať funkciu Formátovať VBA na formátovanie času.
Funkcia formátu a čas
Čas formátu VBA s preddefinovanými formátmi
Funkciu VBA Format je možné použiť na prevod čísla na reťazec s preddefinovaným formátom. Dostupné formáty času sú dlhý, stredný a krátky čas.
1234567891011121314 | Sub FormatTimeExample_1 ()Dim DateEx As DateDateEx = #18. 4. 2020 18:05:07 #Formát MsgBox (DateEx, "Long Time") 'Výsledok je: 18:05:07 PMFormát MsgBox (DateEx, „stredný čas“) 'Výsledok je: 18:05Formát MsgBox (DateEx, „Short Time“) 'Výsledok je: 18:05DateEx = #2/18/2021 6:05:07 AM #Formát MsgBox (DateEx, „Long Time“) 'Výsledok je: 6:05:07 ránoFormát MsgBox (DateEx, „stredný čas“) 'Výsledok je: 06:05Formát MsgBox (DateEx, „Short Time“) 'Výsledok je: 06:05Koniec pod |
Čas formátovania VBA s vlastnými formátmi
Funkciu VBA Format je možné použiť na prevod čísla na reťazec s vlastnými formátmi. Symboly h a hh sa používajú hodiny, n a nn minúty, s a ss sekundy, ttttt plný čas podľa nastavení systému a AM/PM, dopoludnia/popoludní, A/P, a/p, AMPM pre dopoludnie -systém pm.
1234567891011121314151617 | Sub FormatTimeExample_2 ()Dim DateEx As DateDateEx = #18. 4. 2020 18:05:07 #Formát MsgBox (DateEx, "hh: nn: ss") 'Výsledok je: 18:05:07Formát MsgBox (DateEx, "h: n: s AM/PM") 'Výsledok je: 6: 5: 7 PMFormát MsgBox (DateEx, "h") 'Výsledok je: 18Formát MsgBox (DateEx, "hh") 'Výsledok je: 18Formát MsgBox (DateEx, "h: n") 'Výsledok je: 18: 5Formát MsgBox (DateEx, "hh: nn") 'Výsledok je: 18:05Formát MsgBox (DateEx, "hh: nn: s") 'Výsledok je: 18: 05: 7Formát MsgBox (DateEx, "hh: nn: ss") 'Výsledok je: 18:05:07Formát MsgBox (DateEx, "\ T \ i \ m \ e \ \ i \ s \: \ hh: nn: ss")„Výsledok je: Čas je: 18:05:07Koniec pod |