2021.05.03 11:11
드림플러스 질문은 아래에 남기는 것이 답변이 빠릅니다.
홈페이지 : http://www.dreamcad.net/support/qna/
메일 : email72@nate.com
vba intersectwith를 이용하여 교차되는 object를 찾는데...
대상 객체 수량이 10,000개정도 되다보니 찾는 시간이 오래걸리거나 팅겨지는 현상이 생깁니다.
코딩은 아래와 같습니다.
조언 부탁드리겠습니다.
for each entry in sobj
-
-
ip = rLine.intersectwith(vLine, acExtendnone)
if Ubound(ip) = 2 then
-
-
end if
next
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
공지 | ★ 드림플러스 질문은 메일 또는 홈페이지에 부탁합니다 ★ | 아저씨 | 2017.05.16 | 2774 |
공지 | 제목이 엉망이면 답변달지 않습니다. [1] | 아저씨 | 2014.04.04 | 23854 |
공지 | 순수 캐드 질문은 고캐드로 | 아저씨 | 2013.05.28 | 68641 |
공지 | 질문 답변 게시판을 만들었습니다. | 아저씨 | 2013.02.09 | 74943 |
1519 | 다중플롯 배치탭 출력 관련오류 질문입니다. [1] | 김원재 | 2017.08.29 | 71 |
1518 | 최근 DREAM 업데이트 이후..문제점?인지 확인좀 부탁드릴께요 [1] | 김영찬 | 2020.04.20 | 71 |
1517 | 안녕하세요 setup을하는데 마지막에 이런메세지가떠네요 [2] | 대군 | 2015.01.23 | 72 |
1516 | 2010아무리 노력 해도 안돼요 [1] | 왕초보 | 2016.02.18 | 72 |
» | 드림 사용자 인데.. 드림외 다른것 조언 부탁드리겠습니다. [2] | 서방 | 2021.05.03 | 72 |
1514 | 드림기능 추가 부탁드리고 싶은게 있습니다....ㅠㅠ [2] | 항미니 | 2015.04.15 | 73 |
1513 | 다중플롯 pdf [1] | 안녕! | 2015.07.03 | 73 |
1512 | 블록 색상 변경/대체 에 대해서 문의드립니다. [1] | kamena | 2015.10.29 | 73 |
1511 | 안녕하세요 드림구매문의합니다. [1] | 딜레마 | 2016.02.29 | 73 |
1510 | 기존드림 라이센스 사용 관련 문의드립니다. [2] | 먹구름 | 2016.12.01 | 73 |
1509 | 캐드 2010 드림 명령어 CALC 쓰면 자동으로 오류 걸리면서 꺼집니다.. [2] | 소방내진 | 2017.10.31 | 73 |
1508 | 캐드드림 실행오류 질문합니다. [1] | kim | 2018.03.14 | 73 |
1507 | 알수없는 명령어라고 뜨는 문제 해결 부탁드립니다. [1] | 백방 | 2016.07.07 | 74 |
1506 | QBM 명령여 관련 문의 [6] | ㅈㄷㅈ | 2016.07.13 | 74 |
1505 | [개선사항요청] 다중플롯 도곽 LIST 저장기능은 안되는건가요? [1] | 드림짱짱 | 2017.04.21 | 74 |
안녕하세요.
VBA를 손 뗀지 너무 오래되어 (7년전?) 사실 잘 기억은 안 납니다.
VBA는 한줄 읽어 처리하는 방식입니다. 같은 한 줄씩 읽는 리습 보다는 빨라도 속도는 유리하지 않습니다.
(기회되면 .NET으로 해보세요)
그리고 1만개 교차를 각각 교차 검색이라면 실제 수행은 1만*1만 = 1억번 수행입니다.
교차 검색이라면 검색 끝난 것을 리스트에서 빼내서 다음 번 교차 검색 안 되도록 순환 횟수를 줄이는 것이 나을 것 같습니다.
아니면 객체를 조금씩 검색하던가 해야겠죠.
그냥 1만개 한번 검색하고 마는 일방향 검색이라면 순환 회수 줄일 수는 없을 것 같습니다.
ip 변수에 값이 없으면 Ubound 에러날테니
ip 변수를 Variant 형으로 하고 If IsEmpty(ip) Then 해서 값이 없으면 건너 뛰게 하는 것이 나을 것 같습니다.
문법이 잘 기억 안 나서 상세 답변은 못드릴 것 같습니다.