VBA操作Excel时触发Overflow(溢出)错误的原因排查求助
VBA操作Excel时触发Overflow(溢出)错误的原因排查求助
大家好,我现在碰到个棘手的问题——用VBA往Excel文件输出计算结果时,总是弹出“Overflow”(溢出)错误,想请各位大佬帮忙排查下问题所在。
我的需求很明确:计算所有隔间(bays)的总重心(CGs),代码逻辑是先循环累加对应单元格的乘积,最后除以总数量得到平均值,再把结果填充到Excel指定位置。
我的代码片段如下:
'calculating the total CGs across all of the bays For ii = 1 To bayCount .cells(bayCount + 2, 3) = .cells(bayCount + 2, 3) + .cells(ii + 1, 2) * .cells(ii + 1, 3) .cells(bayCount + 2, 4) = .cells(bayCount + 2, 4) + .cells(ii + 1, 2) * .cells(ii + 1, 4) .cells(bayCount + 2, 5) = .cells(bayCount + 2, 5) + .cells(ii + 1, 2) * .cells(ii + 1, 5) Next ii .cells(bayCount + 2, 3) = .cells(bayCount + 2, 3) / .cells(bayCount + 2, 2) .cells(bayCount + 2, 4) = .cells(bayCount + 2, 4) / .cells(bayCount + 2, 2) .cells(bayCount + 2, 5) = .cells(bayCount + 2, 5) / .cells(bayCount + 2, 2)
我本来只是想把计算结果填入Excel,但有人提醒我,会不会是计算过程中数值太大,超过了VBA的数据类型限制?我不确定是不是这个原因,或者有没有其他可能的问题?麻烦各位帮忙分析下,谢谢!
备注:内容来源于stack exchange,提问作者Adam Carneiro
相关产品推荐
相关产品推荐

