간단한 질문요.

[디넴]

VBA에 대해서 간단한 질문 올릴게요.

사용자폼에서 텍스트박스의 값을 엑셀쉬트의 셀로 옮길 때
텍스트박스 이름을 'txtinput1, txtinput2.....txtinput숫자' 이런 식으로
했거든요.

이것을 일일이 셀과 텍스트박스를 연동시켜서 입력하지 않고.

for ~ next문을 사용하여 A(i)=txtinput(i) 이런 식으로 직접 넣고 싶은데

이렇게 하려면 txtinput 뒤에 어떤 부호나 명령어가 들어가야하나요?

예를 들면
지금 내가 한 것이

worksheets("sheet1").cells(1,1).value = userform1.txtinput1.value
worksheets("sheet1").cells(1,2).value = userform1.txtinput2.value
worksheets("sheet1").cells(1,3).value = userform1.txtinput3.value
....

이런 식인데

이것을

for i = 1 to 20 step 1
worksheets("sheet1").cells(1,i).value = userform1.txtinput(i).value
next

이런 식으로 바꾸고 싶어서요.

윗 방법으로 하면 20줄이 필요한데 아래 방법이 되면
3줄이면 되잖아요.

유저폼에서 텍스트박스는 고유명사라서 저런 지정이 안되는건가요? ㅠ.ㅠ

해결책이 있으면 좀 알려주세요. ^^

[제갈공명]

TXTINPUT 개체를 지정할 배열을 만들어 입력을 시켜주면 가능합니다.

[디넴]

빠른 답변 감사합니다. 그런데 txtinput이란게 변수가 아니라 텍스트박스 이름이예요. 총 17개의 박스가 있는데 각각의 이름에 뒤에 숫자를 붙여서 설정해 놓은 상태죠. ㅠ.ㅠ

[제갈공명]

비쥬얼 베이직에서는 개체또한 배열에 입력이 가능합니다.

[컴민]

나도 빨리 비주얼을 공부해 놔야 될텐... 휴!! ㅡㅡ;;