특정문자가 있는 행 추출

VBA
작성자
007
작성일
2021-12-07 10:51
조회
302
엑셀버전 : 엑셀2013

운영체제 : 윈도우10

늘 배웁니다.

특정 문자가 들어있는 행을 추출하는 VBA에 대해 문의드립니다.

저는 '필터'를 이용한 VBA를 주로 사용합니다.

다른 방법의 VBA에 대해 알고 싶습니다.

  • 원본 자료는 5,000여 행 됩니다. (첨부파일의 자료는 편의상 10행입니다.)
  • (결과1) 원본에서 일치하는 문자가 들어있는 모든 행 추출 (첨부파일 [3월] 시트)
  • (결과2) 원본에서 일치하는 문자가 들어있는 행 중에서 머릿글의 일부열만 추출 (첨부파일 [4월_일부] 시트)
  • (결과3) 원본에서 일부 문자(함수를 적용한 셀)가 일치하는 행 중에서 머릿글의 일부열만 추출, 단, 머리글의 열 순서가 원본과 다름 (첨부파일 [입회비_일부] 시트)

조건은 첨부파일을 참고하시기 바랍니다.

늘 문의만 드려 죄송합니다.

 

회원등급 : 13레벨
포인트 : 1177 EP
총질문 : 16 개 (마감율 : 88%)
채택답변 : 0 개
전체 7

  • 2021-12-07 11:17

    [원본]에서 특정 문자를 제거한 문자열을 [변환본]이라 할 때, 두 문자열의 길이에 변화가 있다면 [원본]에 특정 문자가 포함되었다는 것입니다.

    이 방법을 이용하여 해법제안 파일을 올릴께요


  • 2021-12-07 13:12

    파일 내용을 검토해 보니 고급필터에 관한 문제이군요.

    [K17] 셀에 작업 코드를 입력하고, <필터링> 매크로를 실행하면 [조건1], [조건2], [조건3]에 해당되는 필터링 결과가

    [위치1], [위치2], [위치3] 에 나타납니다.  자동 연번 부여 기능도 추가하였습니다.

     

    이름 정의 부분을 적절히 이동시켜 원하는 결과를 얻기 바랍니다.

    첨부파일 : 특정문자가-있는-행추출_해법제안.xlsm


    • 2021-12-07 14:48

      @김학동 님 매번 빠른 답변에 정말 감사합니다.

      늘 배움의 기회를 주셔서 고맙습니다.

      죄송하지만 고급필터를 이용한 매크로 말고, 다른 형태의 vba를 적용한 방법을 알고 싶습니다.
      (고급필터 활용 매크로는 제가 주로 사용하는 vba입니다. 그래서 다른 형태의 VBA 방법을 알고 싶습니다.)

      그리고  <조건 4>에 2개 이상 조건을 만족하는 행 추출을 추가하였습니다.

      결과는 각각의 해당 시트 4개(3월, 4월_일부, 입회비_일부, 입회비_홍길동 일부 시트)에 추출하려고 합니다.

      문의만 드려 죄송합니다.

      감사합니다.

      첨부파일 : 특정문자가-있는-행추출_수정.xlsm


      • 2021-12-07 16:14

        @007 님 그러면 원본 자료의 맨 뒤에 조건반영 셀을 추가한 후 정렬과 복사 기능을 활용한 VBA를 쓰는 방법도 있겠군요.

        정리하여 답 파일 드릴께요

        아! 그리고 노파심에서 드리는 말씀인데 날짜를 관리하기 위하여 년월일 세개의 셀을 사용하는 것은 그리 좋은 방법은 아닌듯 합니다.


        • 2021-12-07 16:26

          @김학동 님 아, 정말 감사합니다.

          저는 월별로 추출하고 통계를 내어야 하는 것이 있어 그렇게 하였습니다.

          그럼 죄송하지만, [원본]과 4개의 [결과] 시트에 '년월일'을 하나의 셀에 입력(날짜 형식 2021-03-04)하여 추출하는 방법으로 해주시면 고맙겠습니다.

          조건을 자꾸만 추가하여 정말 염치 없습니다.

          감사합니다.

           


          • 2021-12-07 21:27
            채택된 답변

            @007 님 조건식에 의한 자료추출과 정렬 및 수식 복사 방법을 사용한 파일입니다.

            매 시트마다 추출에 사용할 수식이 기록되어 있습니다. 필요에 따라 이 부분은 숨김 처리해도 괜찮습니다

            첨부파일 : 특정문자가-있는-행추출_수정_수식복사와정렬방법사용.xlsm


            • 2021-12-08 08:52

              @김학동 님 매번 감사드립니다.

              여러가지 조건들을 생각하셔서 깔끔하게 해결해 주시는 모습, 그저 감탄할 뿐입니다.

              많은 도움이 되었습니다.

              거듭 감사드립니다.^^


전체 5,260
번호 카테고리 제목 작성자 작성일 추천 조회
알림
하루 딱 "1분", 진짜 쓰는 엑셀 꿀팁 👉 "오빠두엑셀" 인스타그램 오픈! (33)
트로피 오빠두엑셀 | 2021.10.12 | 추천 24 | 조회 868
트로피 오빠두엑셀 2021.10.12 24 868
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (24)
오빠두엑셀 | 2021.10.28 | 추천 36 | 조회 2552
트로피 오빠두엑셀 2021.10.28 36 2552
26599 함수/공식
New 엑셀 조건 논리 연산자 엑셀 함수 중 합계 SUM IF 배열수식 질문입니다 (2)
namjaihee | 20:53 | 추천 0 | 조회 16
namjaihee 20:53 0 16
26591 함수/공식
New 엑셀 범위내 맨 좌측값 가져오기 첨부파일 (5) 답변완료
김성환 | 16:44 | 추천 0 | 조회 28
김성환 16:44 0 28
26590 VBA
New 엑셀 고급필터 예제파일 매크로 문제 관련 질문드립니다, 첨부파일
쌀알이 | 15:59 | 추천 0 | 조회 24
쌀알이 15:59 0 24
26586 VBA
New 고유값까지 한번에 제거할 수 있을까요? (2) 답변완료
루s cos 개인대행 | 15:04 | 추천 0 | 조회 27
루s cos 개인대행 15:04 0 27
26583 함수/공식
New 범위값을 가지는 테이블에서 해당 범위안에 들어가는 값을 찾는 방법문의 첨부파일 (5) 답변완료
딸기농장 | 14:08 | 추천 0 | 조회 31
딸기농장 14:08 0 31
26579 VBA
New 다른 데이터파일을 열지않고도 데이타를 불러올수 있나요? (1)
Hellohoney | 10:35 | 추천 0 | 조회 37
Hellohoney 10:35 0 37
26572 함수/공식
New substitute 함수 질문 있습니다. (4) 답변완료
온윤 | 00:56 | 추천 0 | 조회 41
온윤 00:56 0 41
26569 VBA
New 지정양식에 데이터 불러오기 문제 관련 첨부파일 (5) 답변완료
HJ | 2022.01.28 | 추천 0 | 조회 40
HJ 2022.01.28 0 40
26565 파워쿼리/피벗
New 파워쿼리사용시 원본데이터와 다르게 쿼리로 전환되는경우(유로통화화페) (2) 답변완료
Olivia | 2022.01.28 | 추천 0 | 조회 26
Olivia 2022.01.28 0 26
26552 함수/공식
New 특정 셀부터 더하기가 궁금합니다. 첨부파일 (2)
기린 | 2022.01.28 | 추천 0 | 조회 48
기린 2022.01.28 0 48
26549 VBA
New 인덱스매치로 조회한 원본데이터를 변경(Worksheet의 Change 이벤트 프로시저를 이용한 누적 입력 방법) 기능을 다른 시트참조로 사용하기 첨부파일 (2) 답변완료
별명 | 2022.01.28 | 추천 0 | 조회 41
별명 2022.01.28 0 41
26547 파워쿼리/피벗
New 파워쿼리 병합 후 중복되는 열이 생기는 문제 (2)
Olivia | 2022.01.28 | 추천 0 | 조회 33
Olivia 2022.01.28 0 33
26543 대시보드
New 해당월 클릭시, 연매출액 계산이 가능한지 문의드립니다. (2)
모모 | 2022.01.28 | 추천 0 | 조회 47
모모 2022.01.28 0 47
26542 VBA
New 영문사이트를 getHTTP 하면 html내에있는 영문text가 한글로 바뀌어지는 문제관련 (2)
seob**** | 2022.01.28 | 추천 0 | 조회 37
seob**** 2022.01.28 0 37
26539 함수/공식
New 모든 시트의 특정 셀 합계 구하는 방법을 알고싶습니다. 첨부파일 (3)
이주 | 2022.01.28 | 추천 0 | 조회 51
이주 2022.01.28 0 51
26535 차트/그래프
New 차트 틀고정 문의 드립니다. (4)
박주형 | 2022.01.28 | 추천 0 | 조회 38
박주형 2022.01.28 0 38
26529 VBA
New vba 재고관리프로그램 강의 Get_db 함수 관련 (2) 답변완료
탄만두 | 2022.01.27 | 추천 0 | 조회 47
탄만두 2022.01.27 0 47
26527 VBA
New 그룹별 빈셀 삭제 방법 문의 드립니다. 첨부파일 (1)
Wland | 2022.01.27 | 추천 0 | 조회 30
Wland 2022.01.27 0 30
26525 함수/공식
New 비교 조건 어떻게 처리하면 될까요ㅠ (6) 답변완료
LiNe | 2022.01.27 | 추천 0 | 조회 44
LiNe 2022.01.27 0 44
26522 VBA
New 재고관리 달력입력폼 X를 누르면 오전12:00:00 이라고 표시됩니다ㅠㅠ (1)
탄만두 | 2022.01.27 | 추천 0 | 조회 35
탄만두 2022.01.27 0 35
26517 함수/공식
New 함수질문 1:다 Lookup 와일드카드 사용 첨부파일 (3)
H.B | 2022.01.27 | 추천 0 | 조회 44
H.B 2022.01.27 0 44
26514 피벗테이블
New [피벗테이블 기준값]과의 차이 첨부파일 (1)
gh**** | 2022.01.27 | 추천 0 | 조회 32
gh**** 2022.01.27 0 32
26513 피벗테이블
New 피벗테이블 기준갑과의 차이 첨부파일 (1)
gh**** | 2022.01.27 | 추천 0 | 조회 31
gh**** 2022.01.27 0 31
26511 VBA
New MSXML 또는 WinHttp 크롤링할 때 브라우저가 뜨지 않게 하는 방법 (2)
나는나 | 2022.01.27 | 추천 0 | 조회 34
나는나 2022.01.27 0 34
26508 함수/공식
New 중복데이터 찾아서 삭제하는 방법(3천개정도 됩니다) 첨부파일 (3) 답변완료
따뜻한아메리카노 | 2022.01.27 | 추천 0 | 조회 49
따뜻한아메리카노 2022.01.27 0 49
26504 VBA
New HTML 코드안의 원하는 값 가져오기 (1)
엑셀초보(LV.1) | 2022.01.27 | 추천 0 | 조회 35
엑셀초보(LV.1) 2022.01.27 0 35
26501 VBA
New VBA 유저폼 리스트박스에 배열 정렬방법문의드립니다 (1)
98e | 2022.01.27 | 추천 0 | 조회 33
98e 2022.01.27 0 33
26498 VBA
New vba 그래프 영역 변경 구문 간단질문 (2) 답변완료
H.B | 2022.01.27 | 추천 0 | 조회 28
H.B 2022.01.27 0 28
26497 함수/공식
New 엑셀 수식 계산 (7)
스미스 | 2022.01.27 | 추천 0 | 조회 59
스미스 2022.01.27 0 59
26489 함수/공식
New 특정 셀이 공란일시, 저장이 안되게끔 할 수 있을까요? (8) 답변완료
쿠몬은내친구 | 2022.01.27 | 추천 1 | 조회 51
쿠몬은내친구 2022.01.27 1 51