VBA Range数值格式
Range.NumberFormat设置数值格式:常规、文本、数值、日期、等。
Range.NumberFormatLocal 设置本地化格式,通常用于日期显示的本地化。
示例
Sub sub3()
Dim ws As Worksheet
Set ws = Workbooks.Item("小步教程1.xlsx").Worksheets.Item("Sheet1")
Dim r As Range
'@表示文本类型
ws.Range("C8").NumberFormat = "@"
'设置为两位小数
ws.Range("C9").NumberFormat = "0.00"
'日期格式设置中文年月日
ws.Range("C10").NumberFormatLocal = "yyyy""年""m""月""d""日"""
End Sub
运行效果:
三个单元格原来显示
执行上述代码,格式化后显示