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

运行效果:

三个单元格原来显示

img

执行上述代码,格式化后显示

img