将扩展器添加到长variables – VBA

我已经定义了一个variables如下：

Dim Salary As Long 

在VBA中进行一些计算后，我得到一个通常超过10000的数字，我在屏幕上显示

  MsgBox(Index) 

问题是显示如下的variables

100000

你可以在Excel中添加一个1000分隔符吗？

Answer 1

您也可以使用格式化function。 这种方法的好处是您可以使用Excel书中定义的任何标准或自定义格式。 例如，要将您的号码格式化为货币：

 Dim Salary As Long Salary = 100000 MsgBox Format(Salary, "Currency") 

或者，您可以定义自己的自定义格式：

 Dim Salary As Long Salary = 100000 MsgBox Format(Salary, "#,###") 

Answer 2

您可以使用FormatNumber函数，详细的解释可以在MSDN上find

看到下面的代码：

 Dim Salary As Long Salary = 100000 MsgBox FormatNumber(Salary, 0, GroupDigits:=vbTrue)