我对 VBA 完全陌生,我一直在尝试解决基本问题来练习。我只想用从 1 到 N 的序列号填充一列。 N 号将是特定单元格上的值。
所以 N 值在 C4 单元格上,例如是 5 ,我想从 B2 输出 - BN = 1,2,3,4,5 我有这个代码基于有点类似的问题和我的周期知识,但我可以'让它工作...
Sub ejemplo()
Dim total() As Variant
maximo = Range("C4").Value
For i = 1 To maximo
total(i) = i
Next i
total = Application.WorksheetFunction.Transpose(total)
Range("B7:B").Value = total
End Sub
Run Code Online (Sandbox Code Playgroud)
有时弹出的错误是 total(i) = i 行上的“超出范围”,我真的不知道发生了什么......