Cuprins
Acest tutorial va arăta cum să utilizați funcția Format VBA pentru a formata ora.
Funcția și ora formatului
VBA Format Time cu formate predefinite
Funcția Format VBA poate fi utilizată pentru a converti un număr într-un șir cu un format predefinit. Formatele disponibile pentru timp sunt mult timp, mediu și scurt.
| 1234567891011121314 | Sub FormatTimeExample_1 ()Dim DateEx Ca datăDateEx = # 18/04/2020 18:05:07 PM #Format MsgBox (DateEx, „Long Time”) 'Rezultatul este: 18:05:07 PMFormat MsgBox (DateEx, „Ora medie”) 'Rezultatul este: 18:05Format MsgBox (DateEx, „scurt timp”) 'Rezultatul este: 18:05DateEx = # 18/20/2021 06:05:07 AM #Format MsgBox (DateEx, „Long Time”) 'Rezultatul este: 6:05:07 AMFormat MsgBox (DateEx, „Ora medie”) 'Rezultatul este: 06:05 AMFormat MsgBox (DateEx, „scurt timp”) 'Rezultatul este: 06:05Sfârșitul Sub |
VBA Format Time cu formate personalizate
Funcția Format VBA poate fi utilizată pentru a converti un număr într-un șir cu formate personalizate. Simbolurile h și hh sunt folosite pentru ore, n și nn pentru minute, s și ss pentru secunde, ttttt pentru normă întreagă în funcție de setările sistemului și AM / PM, am / pm, A / P, a / p, AMPM pentru am -sistem pm.
| 1234567891011121314151617 | Sub FormatTimeExample_2 ()Dim DateEx Ca datăDateEx = # 18/04/2020 18:05:07 PM #Format MsgBox (DateEx, "hh: nn: ss") 'Rezultatul este: 18:05:07Format MsgBox (DateEx, "h: n: s AM / PM") 'Rezultatul este: 6: 5: 7 PMFormat MsgBox (DateEx, „h”) 'Rezultatul este: 18Format MsgBox (DateEx, "hh") 'Rezultatul este: 18Format MsgBox (DateEx, "h: n") 'Rezultatul este: 18: 5Format MsgBox (DateEx, "hh: nn") 'Rezultatul este: 18:05Format MsgBox (DateEx, "hh: nn: s") 'Rezultatul este: 18: 05: 7Format MsgBox (DateEx, "hh: nn: ss") 'Rezultatul este: 18:05:07Format MsgBox (DateEx, "\ T \ i \ m \ e \ \ i \ s \: \ hh: nn: ss")„Rezultatul este: Ora este: 18:05:07Sfârșitul Sub |
