스크랩 기타 엑셀 필터링 후 붙여넣기에 대해 알아보자.ARABOJA

[아니우리정글뭐하는건데]

사회 초년생 탁서들을 위해

엑셀 팁을 하나 드리고자 씁니다.

엑셀.

만 직장인의 업무 필수 프로그램.

이 엑셀을 쓰다보면

이게 왜 안되지? ㅠㅠ

하면서 방법만 찾다가 시간만 날리는 경우가 몇 있는데

대표적인게 바로 [필터링 후 붙여넣기] 입니다.

전북에 사는 사람이 두명이나 있습니다.

[전북] 으로 필터링을 해봅시다.

김대리와 부장놈이 [전북]으로 필터링이 되었군요.

이때 다른 시트, 혹은 다른 프로그램에

연속된 데이터를 [비고]에 붙여넣고 싶을거에요.

안그러고싶다구요? 어쩌라구요.

이렇게 말이죠.

이 두개의 데이터를 복사해서

D6 셀에 붙여넣기 하면

[김대리], [부장놈]의 [비고] 칸에 [전북]이 입력 되겠죠?

잉???

[부장놈]에는 전북이 왜 안붙죠?

아이고... 필터를 풀어보니

이과장에게 붙어있네요....

두개의 [전북]이 연속된 데이터다보니

필터링에 걸려 숨겨져 있던 셀에 채워진 모양입니다.

필터링한 데이터를 복사해서 다른 셀로 옮길 때도 똑같은 문제가 발생하죠.

그렇다면

[부장놈]의 [비고] 셀에 넣을 방법은 없을까?

없으면 글을 쓰지 않았겠쥬?

해당 내용은 Excel 2013을 기준으로 작성합니다

다른 버전도 같을거에용

[파일] - [옵션] - [리본 사용자 지정] - [도구] 체크 - [확인]

파일

옵션

리본 사용자 지정

개발 도구 체크 후 확인

[확인]을 클릭하고 밖으로 나오면

메뉴바에 [개발 도구] 탭이 생긴게 보입니다.

여기서

[Visual Basic]을 클릭해봅시당

몬가 갱장히 어려울 것 같은 창이 뜨지만

쫄지 말고 [삽입] - [모듈]을 선택하죠.

이런 느낌의 창이 열립니다.

그럼 이제 ================줄 사이의 코드를 붙여넣고 창을 닫아주세요

======================================

Sub 필터붙여넣기()

Dim CopyRange As Range
Dim FilterRange As Range
Dim RoofRange As Range
Dim dotax As Integer

On Error Resume Next

Set CopyRange = Application.InputBox("복사할 범위를 선택하세요", Type:=8)
If CopyRange Is Nothing Then Exit Sub

Set FilterRange = Application.InputBox("붙여넣을 필터의 셀 범위를 선택하세요", Type:=8)
If FilterRange Is Nothing Then Exit Sub

dotax = 1

For Each RoofRange In FilterRange.SpecialCells(xlCellTypeVisible)
   
    CopyRange.Item(dotax).Copy
    RoofRange.PasteSpecial
    dotax = dotax + 1
Next

Application.CutCopyMode = False

End Sub
==============================================================

그다음

[개발도구] - [매크로]

[필터링붙여넣기]라는 매크로가 생겼쥬?

이게 바로 나, 너, 우리가 함께 만든 매크로입니다.

실행해볼까요?

복사 할 범위를 선택하구요~

붙여넣을 범위까지 선택해주면

짜라란~

됐쥬? 신나쥬? 업무가 편해지겠쥬?

빨리 업무 끝내고 정시 퇴근들 하십시다~

코드 복사를 위해 복금 해제합니다

========================

해당 매크로는 해당 파일에서만 사용 가능해요

매크로를 뒀다 계속 쓰고 싶으시면

[Visual Basic] - [파일] - [내보내기]

해서 매크로를 저장해두고

필요한 파일에서 계속 불러다 쓰시면 됨미당

-끗-

[홀로홀로홀로]

오옷 ㅋㅋ 어떻게 검색해야하는지도 몰랐던 궁금했던 정보입니다. 감사해요!

[망고맨]

않이 주얼베이직에 메크로 ! 분명 배웠지만 막상 쓰려고보니 생각나지않던 그거다!

[말개심해]

도움될정보

[식사하셨나요]

도움!!

[에끌레어a]

오 꿀팁 감사합니다~

[삐리리1124]

한글을 주로 쓰는 전 그냥 필터링 후 한칸한칸 적을래요....ㅠㅠ

[내 부캐는 마법소년]

허.. 배웠던거같은데 다까먹었네

[빵똥꾸]

엑셀.. !