나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 파로이 (sts852)

추천:  2
파일:     조회:  2023
제목:   variant 함수 메모리에 저장이 안되는 이유가 뭘까요?
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(95,97,2000,xp,2003,2007): 2010

* 아래줄에 질문을 작성하세요 >>


    ReDim filethis(1 To 5000, 1 To 7)
    For A = B To C
        y = Cells(A, 4).Value & "\"
        X = Cells(A, 5).Value
        strFile = ROOT1 & y & X & "_A.xls"
        Workbooks.Open Filename:=strFile
            For Z = 1 To 10
            filethis(d, 1) = Range("R49") & "#"
            filethis(d, 2) = Range("AC49") & "#"
            filethis(d, 3) = Range("P46") & "#"
            filethis(d, 4) = Cells(Z + 21, "O") & "#"
            filethis(d, 5) = Cells(Z + 21, "R") & "#"
            filethis(d, 6) = Cells(Z + 21, "W") & "#"
            filethis(d, 7) = Cells(Z + 21, "Y") & "#"
            d = d + 1
            Next Z
       ActiveWorkbook.Close False
    Next A
    Next d
    Sheets("부품리스트2").Range("a1:g5000") = filethis '출력

이런 코드를 만들었는데 매크로를 실행하면
1열값만 메모리에 저장이 되고 나머지는 빈칸으로 출력합니다.

한단계씩 코드 실행을 돌려보면 정상적으로 메모리에 값이 다 저장되어
출력도 정상적으로 됩니다.

뭐가 문제일까요?
 
[불량 게시물 신고]  
루아흐뉴마음 마지막 코드처럼 배열변수 내용을 한번에 출력할 수 있나요?
(몰라서 물어봅니다.)

만약 안된다면 마지막 코드가 문제일 것으로 보입니다.

배열변수 내용을 도장 찍듯이 쾅 하고 출력할 수 없고
각 배열을 순환하면서 출력해줘야 할 것 같습니다.
03-19 (17:45)
삭제 ■신고
        
  

작성일 : 2018-03-16(08:10)
최종수정일 : 2018-03-16(08:10)