Excel 使用动态阵列时出现运行时错误1004

我在A列中有15个名称。当尝试重新定义和填充一个已声明的数组，并将元素（名称）提取到E列时，下面的代码让我打嗝，说这是运行时错误1004（应用程序定义的或对象定义的错误）

---

循环变量i以0开头；这将终止

Cells（）

函数。


（可能还有其他错误）

循环变量i以0开头；这将杀死

Cells（）

函数。


（可能还有其他错误）

这是学术练习吗

如果没有，则可以轻松使用：

Private Sub CommandButton1_Click()
Dim FinalRow As Long
FinalRow = Cells(Rows.Count, 1).End(xlUp).Row
Sheet1.Range("E1:E" & FinalRow).Value = Sheet1.Range("A1:A" & FinalRow).Value
End Sub

---

这是学术练习吗

如果没有，则可以轻松使用：

Private Sub CommandButton1_Click()
Dim FinalRow As Long
FinalRow = Cells(Rows.Count, 1).End(xlUp).Row
Sheet1.Range("E1:E" & FinalRow).Value = Sheet1.Range("A1:A" & FinalRow).Value
End Sub

---

*…因为没有列号零。*…因为没有列号零。