此vba代碼是什么意思？

Question

我正在嘗試復制我的一位前同事在excel電子表格中編寫的一些代碼，但是我對VBA還是有點陌生​​，所以很難解析它。 這是我很困惑的部分代碼。

私人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

“頁眉”是sheet1上的命名范圍。 如果您使用的是Excel 2010，則可以轉到“公式”選項卡，然后單擊“名稱管理器”以查看命名范圍。

for循環將sheet1上名為“ header”的范圍的第二列中的數組“ header”設置為前15行。

由於您將其復制到的工作簿中的sheet1上沒有名為“ header”的范圍，因此出現424 Object Required錯誤。