这个vba代码是什么意思？

Question

我正在尝试复制我的前同事在excel电子表格中写的一些代码，但我对VBA有点新，所以我无法解析它。这是我很困惑的代码部分。

  

Private Sub cbWriteIES_Click（）

Dim Hangle, Vangle As Double
Dim header(1 To 15) As String


'ASSIGN HEADER TO VARIABLE
For i = 1 To 15
    header(i) = Sheet1.[header].Cells(i, 1) & Sheet1.[header].Cells(i, 2)
Next i

有人可以向我解释for循环中发生了什么吗？它在原始工作簿中运行良好，但是当我复制并粘贴到我的工作簿时，它会抛出424对象所需的错误。在我看来，他将一个与Sheet1关联的对象称为[header]，但我似乎无法找到他那样做的地方。任何对此的见解将不胜感激。谢谢！

Answer 1

＆＃34;头＆＃34;是sheet1上的命名范围。如果您正在使用excel 2010，您可以转到＆＃34; Formulas＆＃34;选项卡并单击＆＃34;名称管理器＆＃34;查看命名范围。

for循环设置数组＆＃34; header＆＃34;在名为＆＃34;标题＆＃34;的范围的第二列中的前15行在sheet1上。

424 Object Required错误即将出现，因为您没有名为＆＃34;标题＆＃34;的范围。在您将其复制到的工作簿中的sheet1上。