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

엑셀에 대해서 궁금한 것이 있으시면 마음껏 질문해주세요.

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

글 수 822

(VBA) 또 질문할 수 밖에 없는 내가 너무 싫어요.

조회 수 4618 추천 수 0 2009.07.06 22:03:19
[레벨:1]사오정원조 *.44.196.164

저번에 질문하고 1차로 해결되어서 무척 즐겁게 작업을 할 수 있었는데...

또다른 질문거리가 생겨서 죄송합니다.

 

첨부 파일의 "11"sheet 의 <통계처리/click> 버튼을 누르면

"누가기록"sheet의 내용을 통계처리하게 되어있는데

이것을 저는 다음과 같이 배열식을 사용해서 문장을 작성했습니다.

 

Selection.FormulaArray = "=SUM((기록_학번=RC2)*(기록_장학금종류=R7C)*(기록_장학금))"
   
   
    Selection.AutoFill Destination:=Range("H9:AQ9"), Type:=xlFillValues
    Range("H9:AQ9").Select
   
    Selection.AutoFill Destination:=Range("H9:AQ48"), Type:=xlFillValues
    Range("H9:AQ48").Select
    Selection.Copy
   
    Range("H9").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("H9").Select

 

그런데 실행시켜 보면 잘 아시겠지만 처리하는데 시간이 무척 오래 걸립니다.

데이터가 몇 개 안되는데도 이렇게 시간이 걸리면 프로그래머로서의 자격이 없는것 같은데...

 

제가 VBA는 아직 초보라 달리 좋은 방법을 생각할 수 없습니다.

고수님들의 고견을 듣고 싶습니다.

 

이 게시물을...
첨부
엮인글 :
http://www.abyul.com/zbxe/66379/bb7/trackback
목록

댓글 '3'

profile

[레벨:30]아별

2009.07.07 18:41:13
*.107.204.56

배열 수식에 사용한 영역 이름이 무궁무진해서 처리속도가 무쟈게 오래 걸린겁니다.

1 by 65533 의 테이블을 3개나 배열 수식으로 물려놓았으니.. 컴퓨터가 해야할 연산수는? ㅎㄷㄷ

아래와 같이 수정해주시면 처리속도가 빨라집니다.

 

첨부파일을 참고하세요..

다운받기 : abyul_20090707_JangHak_v15.zip

 

수고하세요.. ^^

 

 

 

▲ 문제의 배열 수식
 "=SUM((기록_학번=RC2)*(기록_장학금종류=R7C)*(기록_장학금))" 
▲ 이름 수정 필요

이름

참조대상_최초

참조대상_수정

기록학번 =누가기록!$A$3:$A$65536 =INDIRECT("누가기록!$A$3:$A"&COUNTA($A$3:$A$65536)+2)
기록_장학금종류 =누가기록!$D$3:$D$65536 =INDIRECT("누가기록!$D$3:$D"&COUNTA($D$3:$D$65536)+2)
기록_장학금 =누가기록!$F$3:$F$65536 =INDIRECT("누가기록!$F$3:$F"&COUNTA($F$3:$F$65536)+2)

첨부

[레벨:1]사오정원조

2009.07.08 00:04:43
*.44.210.228

어떻게 이렇게 쉽게 작성하는지?

그저 감탄만 나올 뿐입니다.

가까이 있으면 밤새 술이라도 대접해 드리고 싶네요.

거듭 감사드립니다.

profile

[레벨:30]아별

2009.07.08 00:22:41
*.130.73.19

도움이 되셨다니 다행입니다. ^^

저도 처음에 VBA작성할때는 엄청 고생했습니다.

그런 시간들이 조금씩 모이다 보니 이제 겨우 틀이 잡히는 것 같습니다.

저도 엑사모나 편무학엑셀 유노21등 쟁쟁한 사이트에 돌면서 묻고 도움을 받고 그러면서 배웠습니다.

그곳에 계신 쟁쟁한 고수님들에 비하면 저는 아직 미숙할뿐입니다.

하루 빨리 원하시는 프로그램 구현하시길 기원합니다. ^^

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 59046
502 SUMIF 해당조건에 맞는 월사용액 구하기 file [2] [레벨:4]성투은자 2013-04-29 4717
501 미친 용량 해결 방법 없을까요? [1] 김정헌 2010-09-10 4716
500 피벗테이블 엑셀 작업 중, 질문사항 몇개... _ 피벗테이블 계산 필드, 계산 항목 [3] [레벨:4]나카타 2011-09-16 4714
499 루나입니당 ㅎㅅㅎ; [1] 루나 2010-01-01 4696
498 문의 합니다 file [1] [레벨:0]호호천사 2009-08-07 4688
497 엑셀일반 혹시 이런것도 가능한가요? (간결한 2가지 질문) - VBA만 실행파일(.exe)로 만들 수 있는지 여부, 외부 파일명 일괄 변경 방법.. [2] [레벨:6]파이스 2011-12-02 4679
496 유효성 검사가 걸리질 않아요 [1] [레벨:1]shawn 2009-10-14 4661
495 엑셀이 미쳤나바요 [1] [레벨:1]혜라니 2009-07-16 4659
494 엑셀일반 아별을 깔면 이러네요.ㅠ.ㅠ 엑셀 창이 알트텝으로 검색이 안되요 imagefile [2] [레벨:2]큰아빠에요 2012-01-30 4656
493 질문있습니다. file [2] [레벨:1]DamA Negii 2009-09-01 4646
492 불규칙 데이터 정리 2 [2] [레벨:1]부기부기 2009-07-15 4643
491 VBA 오늘도 질문!^^있습니다. [레벨:2]정용규 2015-01-19 4640
490 VBA [긴급] Range 범위 "A2:A10" -> 를 변수로 받게 하는 방법.. file [3] [레벨:1]마리너 2012-07-05 4640
489 엑셀일반 엑셀 질문 몇가지 드립니다. file [1] [레벨:1]나도그래짱 2013-02-03 4634
488 VBA vba 방향키 질문입니다 [4] [레벨:4]기능인 2013-07-11 4631
487 함수쫌 부탁드립니다. imagefile [1] [레벨:1]귀염둥잏ㅎㅎ 2009-07-20 4625
» (VBA) 또 질문할 수 밖에 없는 내가 너무 싫어요. file [3] [레벨:1]사오정원조 2009-07-06 4618
485 엑셀일반 엑셀 작업한 내용이 안보여요. file [5] [레벨:2]시나브로 2012-06-20 4617
484 이기능 어떻게 사용하는건가요??? file [2] 용처ㅣ 2009-09-24 4617
483 피벗테이블 피벗테이블 날짜 버튼 생성에 대한 문의 file [2] [레벨:4]thoi 2014-02-13 4602
목록
쓰기