1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

vba속도 관련 외

VBA 조회 수 2103 추천 수 0 2012.09.12 08:54:25

운영체제 ": Win7 sp1

엑셀 : 2010 sp1

 

첨부된 예제 파일에 있는 코드는 개인용매크로통합문서에 기록된 코드로써,

 "원본"이라는 워크시트에서 매크를 실행하면 행이 한칸씩 복사 삽입되어 빨간색으로 변하면서 "결과"라는 워크시트처럼 됩니다.

(매크로 실행 시 inputbox에는 5를 입력하고, msgbox에서는 "예"를 선택)

 

여기에서,

첫번째)

실행해 보시면 아시겠지만 속도가 진짜 늦더라구요. 1~2초만에 끝낼 수 있는 방법이 있을까요?

 

두번째)

"결과"라는 워크시트에서 노랗게 칠해진 부분을 보면 빨간색과 검정색의 값이 다르다는 걸 알 수 있습니다.

나머지는 다 같거든요. 혹, 이러한 문제가 해결이 되는지요?

 


댓글 '2'

profile

[레벨:30]아별

2012.09.25 21:22:41
*.104.126.21

안녕하세요? 고수가되고파님..

질문올리신지 2주가 다 되어가네요.. 한동안 고민 좀 해보다가.. 회사에 일이 많아져서 한동안 홈페이지 관리를 못했습니다.

 

1. 속도..

원본 데이터의 각 행마다 한줄씩 행을 추가한 다음 바로 위 수식을 복사해넣는 방식..

 

--> 일단 각 행마다 삽입하는 작업이 시간이 많이 걸립니다.
       보통 행 삽입이 필요할때는 아래 빈행을 묶어서 정렬시키는 방법을 사용합니다만..
       고수가되고파님의 파일의 경우.. 각 행마다 수식이 일정하게 물려잇는 것로 아니라
       같은 열의 다른 열을 참조하게 설정되어 있어서 정렬을 시키면 수식이 다 틀어져버립니다.

 

--> 일단.. 왜 이런 양식이 필요한지 모르겠지만..
    각 행의 수식을 독립적인 것으로 만들거나 SUMIF등의 수식으로 동일하게 만들고..
    정렬을 통해 각 행을 삽입한 후에 수식을 일과적으로 부여하는 방식으로 수식을 수정해야 빠른 실행속도가 나올 것 같습니다.
    현재 상태의 수식을 가지고.. 각 행을 삽입하는 방식으로는 도저히 속도가 안납니다.

 

만들다 만 파일이지만 참고하세요.. ㅠㅠ

다운로드 : abyul.com_20120912_VBA_RunningTimeIssue-3.xlsm

첨부

[레벨:4]고수가되고파

2012.10.10 11:30:28
*.104.208.234

감사합니다. 코드가 장난이 아니네요. 저 같은 초보가 보기에는...ㅠ,ㅠ

행을 하나씩 삽입해서 위의 행은 당초, 밑에 행은 변경으로 활용하려고 합니다.

당초에는 수량이 1이었는데, 2로 변경이 될 수 있잔아요. 일을 하다보면...

그럼 변경부분의 금액이 달라집니다.

그래서 당초에는 이랬는데 수량이 변동되어 변경처럼 되었다 라는 의미이죠...

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 43991
62 엑셀일반 정렬2차 문의 file [2] [레벨:3]블루짱이 2013-10-24 2125
61 엑셀수식 조건 함수 file [2] [레벨:3]블루짱이 2012-03-15 2120
60 엑셀일반 아별님! 안녕하세요 file [1] [레벨:2]북곰 2013-06-05 2118
59 엑셀수식 안녕하세요. 아별님~ file [4] [레벨:2]진주22 2014-01-13 2110
» VBA vba속도 관련 외 file [2] [레벨:4]고수가되고파 2012-09-12 2103
57 셀서식(표시형식) 아별님 다시 질문드려요, file [2] [레벨:2]북곰 2012-09-18 2092
56 vba에 관해 질문드립니다. (DB에서 개인별 카드로 인쇄하는 방법) file [2] [레벨:1]자인 2011-07-04 2070
55 엑셀수식 어떤 함수를 써야할 지 모르겠어요, 도와주세요! imagefile [1] [레벨:1]재회 2014-01-12 2062
54 VLookup 다른시트에 있는 연락처 옮겨오기 file [2] [레벨:1]뚱뚱만만 2012-09-20 2060
53 차트 안녕하세요 아별님 file [2] [레벨:2]쿠라 2012-09-09 2047
52 엑셀일반 데이터 유효성 검사질문입니다. file [4] [레벨:4]열심회원 2013-09-24 2043
51 VBA 액셀 아르바이트 좀 해주세요 [2] [레벨:1]구삼이 2012-10-08 2034
50 아별툴관련질문 안녕하세요.. abyul툴 옆에 이상한 버튼이 하나 생겼어요... [1] [레벨:2]dizzy 2013-08-30 2004
49 날짜/시간 수식 답변 너무 감사하구요 재문의 드립니다. file [5] [레벨:0]아민 2012-09-27 1993
48 엑셀수식 엑셀 배열함수 질문입니다. file [2] [레벨:2]북곰 2012-03-14 1989
47 소팅하는법좀 제발 알려주세요 [1] [레벨:1]나는너다 2011-07-07 1973
46 SUMPRODUCT SUMPRODUCT file [2] [레벨:0]아민 2012-10-24 1966
45 빠른실행도구 질문드립니다. imagefile [2] [레벨:10]8877 2011-07-10 1964
44 VBA 셀 병합 관련 file [2] [레벨:4]고수가되고파 2012-10-11 1942
43 추가기능(AddIns) 아별툴 추가기능 실행시 에러 imagefile [1] [레벨:2]성현아방 2012-10-25 1911