TOP

函数VBA:Format

描述

VBA Format 函数返回具有指定格式的日期或数字的字符串。


语法 Format

Format(值,格式掩码)

示例 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):

符号例子描述
d 8 Day (from 1 to 31)
dd 08 Day (from 01 to 31)
ddd Fri Day of the week (abbreviated)
ddddFridayDay of the week
m 1 Month (from 1 to 12)
mm 01 Month (from 01 to 12)
mmm January Month (abbreviated)
mmmmJanuaryMonth
yy 21 Year (last 2 digits)
yyyy2021 Year
h 9 Hours (from 0 to 23)
hh 09 Hours (from 00 to 23)
n 5 Minutes (from 0 to 59)
nn 05 Minutes (from 00 to 59)
s 7 Seconds (0 to 59)
ss 07 Seconds (00 to 59)