为什么会实时错误6 溢出

会实时错误6 溢出的原因是当赋值超出目标的限制时，就会发生溢出。此错误有以下的原因和解决方法：

赋值、计算或数据类型的结果的转换太大，以致于不能在变量类型所允许的范围内表示出来。赋值给足够表示值的范围的类型的变量上。给属性的赋值超过属性能接受的最大值。确保赋值适合属性的范围。

你定义的变量hrowc是整形，最大值为32768，如果你的表格已使用的行数超过了这个数就会出现溢出错误，将dim句定义的 hrowc AS Integer 改为 hrowc&，这定义为长整形即可

声明变量类型不正确！

Dim y As Long, W As Long

特别是 Range.Row 的属性是 Long 型的。从 Excel2003 版本开始， 每个工作表最大行号为 65536；Excel2007版本以后每个工作表最大行号达到了 1048576。都已经超过了 Integer 型数的范围了 （-32768 ～ 32767）！

---