[VBA ] 出现"溢位

楼主: markbaseball (Mark)   2015-05-19 23:28:39
各位大大好:我现在想让D2的值=C2的值/C3的值 。D8的值=C8的值/C9的值
A B C D
1
2 X Z
3 Y
4
5
6
7
8 xx zz
9 yy
10
而目前我的CODE长这样
Sub TER()
Dim i As Double
Dim j As Double
i = 2
For j = 2 To 86
i = j + 6
Next
Cells(4, i).Value = Cells(3, i).Value / Cells(3, i + 1).Value
End Sub
但是最后一句一直出现错误"溢位"
但是我看不出来错误在哪,请各位大大帮帮忙 感谢~~~3Q
作者: lichuw (一切都是无解)   2015-05-20 00:17:00
next要放在最后一句后面才对, column和row也放反了另外cells里面没有值造成error
楼主: markbaseball (Mark)   2015-05-20 23:46:00
感谢!!已修正

Links booklink

Contact Us: admin [ a t ] ucptt.com