2013-07-24 2 views
0

나는 이전 직장 동료가 Excel 스프레드 시트에 쓴 코드를 복제하려고하지만 VBA에 조금 익숙해서 구문 분석에 문제가있다. 여기 내가 혼란스러워하는 코드의 일부가 있습니다.이 vba 코드는 무엇을 의미합니까?

개인 서브 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 개체 필요한 오류가 throw됩니다. 그는 [Header]라는 Sheet1과 객체를 연결 한 것처럼 보이지만 그가 어디에서 그랬는지 찾을 수는 없습니다. 이것에 대한 어떤 통찰력이라면 크게 감사하겠습니다. 감사!

답변

1

"header"는 sheet1의 명명 된 범위입니다. Excel 2010을 사용하는 경우 "수식"탭으로 이동하여 "이름 관리자"를 클릭하여 명명 된 범위를 볼 수 있습니다.

for 루프는 "header"라는 배열을 sheet1의 "header"라는 범위의 두 번째 열에서 처음 15 개 행으로 설정합니다.

이 복사본을 복사 한 통합 문서의 sheet1에 "header"라는 범위가 없기 때문에 424 개체 필요 오류가 발생했습니다.

+0

고마워, 그건 정확히 내가 이해하지 못했던 것이었다! – user2539552

+0

답변을 수락하려면 옆에있는 체크를 클릭하십시오! :) – Ripster

관련 문제