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

 졸따구 (zolddagu)

추천:  2
파일:     0814이상한숫자구하기.xls (34.5KB) 조회:  2204
제목:   이상한 숫자추출하고 삭제하기(VBA)
     
  더운 날씨에 수고 많습니다.
 
서로다른 열에 있는 데이터를 비교하여 공통된 값을 다른 열에 표기하고
원데이터의 각열의 나머지데이터를 추출하는 방법을 도와주세요.

 자세한것은 첨부 파일 참조하시고 꼭 좀 도움을 주시길..... 

 한번 도움을 받았는데, 데이터의 량이 많아짐에 따라 일일이 수식적용이 어려워 
VBA를 활용한 방법이 없을까 하여 재차 도움을 요청합니다.

 그럼 많은 도움 바라면서.......
==============[강원님 글에 대한 답변입니다]==============

 공부삼아 만들어봤습니다. 배열수식으로 구하였던 것을 다양한 방법을 사용하여 'VBA'로 구하였습니다.

  'VBA Cording'에 도움이 되시길..
 
[불량 게시물 신고]  
강원정말 고맙습니다.
덕분에 많은 수작업을 줄일수 잇게 되었네요. 감사....
08-14 (16:57)
삭제 ■신고
강원쫄다구님, VBA를 실행하니 런타임오류라면서 프로시저호출 또는 인수가 잘못되었다는 오류메시지가 뜨는데 무엇이 잘목되었을까요?
만들어주신 VBA구문을 복사하여 다른 쉬트에 적용하니 오류가 나오는데.... 다시한번 도움을....
08-14 (17:19)
삭제 ■신고
강원디버그시 에러난구문 "노란색" --> RngA = Left(RngA, Len(RngA) - 1)
이부분입니다.
08-14 (17:20)
삭제 ■신고
졸따구해당코드는 마지막에 붙은 ','(콤마)를 제거하기 위한 것으로 에러 날 수 없는 부분(문자열 가공)인데 다른 파일에 복사하면서 환경이 바뀌어서 그런것 같습니다.
가능하다면 원본을 올려 주시면 Debugging해 드리겠습니다.
08-14 (17:56)
삭제 ■신고
강원위문제는 공토이 없을경우 저 오류가 뜨더군요. 그래서 굳이 수정 안해도 될것 같다는... 여하튼 신경써 주셔서 정말 고맙습니다.
근데, 공통의 데이터를 표시하고 난후,각열을 서로 비교하여 순수한 단독만 표기 할려면 어떻게 수정하면 되겠습니까? 즉 A,B,C,D열을 서로 비교하여 A에만 있는것 B에만 있는것.... 등을 나타내는 방법도 좀 신경 써 주시면 안될까요? 너무 많은것을 부탁드려 죄송합니다.
 다시한번 감사하다는 말씀과 더운날씨에 건강하시길....
08-14 (18:54)
삭제 ■신고
        
  

작성일 : 2003-08-14(16:31)
최종수정일 : 2003-08-14(16:31)
 


 ◎ 관련글

  제 목   작성자   날짜
다시한번 부탁드립니다. 강원 2003-08-14
이상한 숫자추출하고 삭제하기(VBA) 졸따구 2003-08-14