excel宏中的重复语句

Question

我正在寻找一个函数，可以用来重复excel宏中的语句。案件如下：

• 我在我的宏中有这样的声明： alline = alline & Chr(10) alline & Chr(10) alline = alline §orNumber=& "sectorNumber=“&”& Chr(10) alline = alline & Chr(10) alline = alline & Chr(10) alline & Chr(10) alline &Chr(10)= alline &“<扇形”& Chr(10) alline = alline & "sectorNumber=“& "3”&“”& Chr(10) alline = alline & Chr(10)
• 如果使用此命令，我的excel宏过程将太大，无法编译。
• 我是否可以简化我的命令，这样我就可以减少由宏编译的内存？

谢谢你的关心。

Answer 1

当您想要多次执行某些操作时，需要使用loop语句：

For语句(最常见的循环语句)：

示例：

For i = 1 To 8
    'Your code here
Next i

Main：

For <counter variable> = <start number> to <end number> [step <step number>]
    'Codes
Next [<counter variable>]
'Default step number is 1

所以你可以这样用：

For i =1 to 8
     alline = alline & "<Sector" & Chr(10)
     alline = alline & "sectorNumber=" & """" & CStr(i) & """" & Chr(10)
     alline = alline & Chr(10) 
Next i