得到溢出错误,当我使用函数"ActiveSheet.UsedRange.Rows.Count"来查找excel VBA中的计数

Question

当我尝试使用该功能时,我收到溢出错误

ActiveSheet.UsedRange.Rows.Count

在VBA Excel中

Answer 1

我假设您有以下内容:

Dim x as Integer

x = ActiveSheet.UsedRange.Rows.Count

要修复,只需将其更改为:

Dim x as Long

x = ActiveSheet.UsedRange.Rows.Count

要么

Dim x&

x = ActiveSheet.UsedRange.Rows.Count

与号(&)类型声明字符表示Long

Integer和Long数据类型都可以保存正值或负值.它们之间的区别在于它们的大小:整数变量可以保持-32,768和32,767之间的值,而Long变量的范围可以从-2,147,483,648到2,147,483,647.

因为Excel工作表可以有超过32,767行,所以不能总是将行数拟合成一个整数,并且必须使用Long.