Excel之VBA常用功能应用篇：设置Excel数据格式，NumberFormat详细举例说明

Excel中有许多数据格式，因为要呈现不同的数据方式，如此就需要对不同的数据进行格式设置。

这是一个很简单的道理，但是在对Excel操作的时候，很难准确的掌握各种数据的表现形式。

这样就会用到一个数据格式化的属性，本节示例为NumberFormat属性的使用方法介绍。

以Range对象为例来编写一些代码，通过数据格式设置，将数据以想要的方式显示出来。

思路清楚以后，就是对数据格式进行设置。

使用方法：

RangeObject.NumberFormat="0;-(0);0;-"

最简单的方式如上代码所示，NumberFormat的值是由一串字符来表示，实际上这串字符由4部分组成，每个部分以";"为间隔标志。

第一部分表示正数的数据形式，第二部分为负数的数据形式，第三部分为零的形式，第四部分表示数据为文本格式的数据形式。

如下图所示：

不同数字的表达方式：

这是最简单的表达方式，同时还有一些日期或时间的表达方式。

如下表所示：

代码示例：

Private Sub SetNumberFormat()

Dim R As Range, x As Variant

Set R = Range("A1")

x = Application.InputBox("输入数据：", "NumberFormat", "")

R.Value = x

Dim cR As Range

Set cR = Range("B4:E4")

Dim cS As String, f As String

f = ";"

cS = cR.Item(1).Value & f & _

cR.Item(2).Value & f & _

cR.Item(3).Value & f & _

cR.Item(4).Value

R.NumberFormat = cS

Me.Label1.Caption = R.Value

End Sub

NumberFormat给我们一些很好的数据形式设置方法，如果全部掌握那将对Excel数据操作有一个质的提高。

通过不断的总结学习，可以最大化的实现数据多元化显示方式。

重点提醒一下，这里的数据显示方式，并不能真正意义上改变表格内容，也就是说，无论显示出来的数据是什么样子，其真正的值是不会变的。