[已解决]Text、Format、NumberFormat、NumberFormatLocal的区别

爱疯

Format 函数
NumberFormat
NumberFormatLocal

它们都是自定义单元格格式，对么？请问三种区别在哪？（用小示例证明更好）

谢谢！

最佳答案

月排行榜 / 总排行榜

小线

2010-4-13 09:59

再比如:

[A1]=format(1,"0000")'如果你在单元格输入0001会自动判断这是一个数字,然后变成默认的1,除非你设置其格式

debug.print format(1,"0000")'但是在VBA中立即窗口得到的是0001这种格式

一样的理解

跳转到最佳答案楼层

青城山苦丁茶

 后两个真还没用过

凭楼主的实力，看下帮助写个分享出来是毫无问题的

wilson2000

前者是函数，后两个是属性：

cell=Format(cell,"0000")

cell.NumberFormat="0000"

cell.NumberFormatLocal="0000"

吕?布

Format 函数，是根据指定格式输出一个值，这个值是供VBA用的，与单元格没有特别关系（虽然其格式字串与单元格格式很象）。
NumberFormat，单元格格式，这个应该是通用的。
NumberFormatLocal，单元格格式，这个是本地的，什么叫本地的，就是与控制面版里面的设置相关的，控制面版可以控制日期格式，货币符号等。

吕?布

Sub test()
    Debug.Print Format(123, "吕布")     '可以格式化数值为指定格式后再进行输出(不输出也是可以的)
    Debug.Print Sheets(1).Range("A1").NumberFormat          'General
    Debug.Print Sheets(1).Range("A1").NumberFormatLocal     'G/通用格式,与区域设置有关,本地的,界面中所见到的.汉语版的
End Sub

爱疯

谢谢大家！

学习了，我看了帮助后，还是说不出Format和NumberFormat的区别[em04]

小线

吕布说的很清楚了,format之后的值只在VBA中有效,但是输出到单元格中还有可能改变.

你可以找一个日期的例子,用format之后放到单元格中就知道了.

小线

最简单的例子:
Option Explicit

Sub test1()
    Dim a As Date
    a = Date
    [A1] = Format(a, "yyyy/mm/dd")
End Sub
Sub test2()
    Dim a As Date
    a = Date
    [A1] = Format(a, "yyyy-mm-dd")
End Sub

小线

我举的例子中分别加一个debug.print a就更容易看出来区别了

amulee

Sub Test()
    MsgBox Format(123456, "000,")       '与工作表函数Text有点像
    MsgBox Range("A1").NumberFormat     '返回单元格的数字格式的代码
End Sub

如同Text函数与自定义格式的区别。