الوظيفة VBA: Format

وصف

ترجع الدالة VBA Format سلسلة ذات تاريخ أو رقم بالتنسيق المحدد.

بناء الجملة Format

Format (القيمة ، format_mask)

مثال VBA Format

استخدام الدالة Format لعرض القيم الرقمية بتنسيقات مختلفة:

Sub FormatExample1()

     '98.1%
     MsgBox Format(0.9814, "0.0%")

     '54'321.90
     MsgBox Format(54321.9, "##'##0.00")

     '54 321.90 €
     MsgBox Format(54321.9, "# ##0.00 €")

End Sub

استخدام الدالة Format لعرض تاريخ بتنسيقات مختلفة:

Sub FormatExample2()
    
     myDate = #10/30/2020 3:35:45 PM#
    
     '30.10.20
     MsgBox Format(myDate, "dd/mm/yy")
    
     '30 October 2020
     MsgBox Format(myDate, "d mmmm yyyy")
    
     'Friday
     MsgBox Format(myDate, "dddd")
    
     '30/10/2020 15:35
     MsgBox Format(myDate, "dd/mm/yyyy hh:nn")
    
     'Friday 30 at 15h35
     MsgBox Format(myDate, "dddd d at h\hnn")

End Sub

تنسيقات التاريخ

جدول بتنسيقات التاريخ المختلفة التي يمكن استخدامها مع وظيفة Format (على سبيل المثال للتاريخ 01-08-2021 09:05:07):