Excel 在VBA中怎么定义数值变量

Question

如题所述

Answer 1

dim a as long  '定义一个长整数型变量　　-2,147,483,648 到 2,147,483,647。
dim a as integer '定义一个整数型变量　　-32,768 到 32,767。

全局变量例子
public 变量1 AS Integer
Sub LLL()
变量1 = 1111
End Sub


模块级变量例子
DIM 变量1 AS Integer
Sub LLL()
变量1 = 1111
End Sub

拓展资料

vba中如何定义小数类型的变量

VBA中如何使用小数类型？变量声明为Variant类型

Sub Test()

Dim varNumber As Variant

varNumber = 3.1415

If VarType(varNumber) = vbDouble Then

MsgBox "默认是双精度型（Double）"

End If

varNumber = CDec(3.1415)

If VarType(varNumber) = vbDecimal Then

MsgBox "经过CDec函数转后换才是小数型（Decimal）"

End If

End Sub

Answer 2

dim a as long '定义一个长整数型变量　　-2,147,483,648 到 2,147,483,647
dim a as integer '定义一个整数型变量　　-32,768 到 32,767

其他几个

Single
(单精度浮点型)
4 个字节
负数时从 -3.402823E38 到 -1.401298E-45；正数时从
1.401298E-45 到 3.402823E38

Double
(双精度浮点型)
8 个字节
负数时从 -1.79769313486231E308 到

-4.94065645841247E-324；正数时从4.94065645841247E-324 到
1.79769313486232E308

Currency
(变比整型)
8 个字节
从 -922,337,203,685,477.5808 到
922,337,203,685,477.5807

Decimal
14 个字节
没有小数点时为
+/-79,228,162,514,264,337,593,543,950,335，而小数点右边有 28 位数时为
+/-7.9228162514264337593543950335；最小的非零值为 +/-0.0000000000000000000000000001本回答被提问者和网友采纳