Excel宏 - 用于循环增量

Question

我看了,但找不到解决方案.

你如何增加变量？就像在任何其他语言中一样,您只需在循环结束之前执行++(变量名称).在我的例子中,我想增加J.

Dim j as integer
j = 13
FinalRow = Range("B15").End(xlUp).Row
        For i = 9 To FinalRow
            Range("B" & i).Copy Destination:=Sheets("Design").Range("A" & j)
            J++
        Next i

代码从B9-B15循环,并从A13向下粘贴Designsheet中的信息.

Answer 1

这样做:

J = J + 1

Simples.