엑셀 필터링 후 붙여넣기에 대해 알아보자.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] - [파일] - [내보내기]

해서 매크로를 저장해두고

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

-끗-

[칸바페]

ㄷㄱ

[초승달]

엑셀 ㄷㄱ

[눙눙눙]

그냥 드래그 선택 + alt+ ;
값복사 끝

[김리a]

excel

[발베니]

엑셀 매크로 필터링 붙여넣기

[삐뽀삐뽀]

ㄷㄱ

[아기장난감]

엑셀 ㄷㄱ

[FIRMINO]

엑셀

[코카콜리]

ㄷㄱ

[동네미친개]

엑셀!

[곰토리]

엑셀 ㄷㄱ!

[차가운핫초코]

엑셀필터ㄷㄱ

[쌔내기]

엑셀 붙여넣기

[튼튼용사]

ㄷㄱ

[똥가루]

엑셀 필터링 후 붙여넣기

[따라쟁이a]

엑셀 필터링 값 복사하기

[동네죠]

엑셀 필터 ㄷㄱ

[eLpERRO]

ㄷㄱ

[R.Scofield]

엑셀 필터링 후 붙여넣기에 대해 알아보자.ARABOJA ㄷㄱ

[프리머리]

매크로저장해두고 다시 가져오는게 왜 안될까요..

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

뭐가 안돼요?

[프리머리]

적으신대로 바주얼베이직-파일-내보내기 해서 저장하고서 엑셀 새로키고 비주얼베이직-파일-불러오기 했는데.. 매크로가 안생겨요..

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

내보내기 하실 때 .bas 파일이 생성된게 맞나요?
내보내기 하기 전에 [모듈]에서 추가한 스크립트를 클릭해서 선택 해줘야해요

[프리머리]

아 클릭하구 하니까 정상적으로 되네요 감사합니다!!

[패턴독해17]

필터링
붙여넣기 댓글

[피카츄임]

ㄷㄱ

[GenesisQ]

ㄷㄱ

[HitoE]

ㄷㄱ

[소혜♥]

엑셀필터매크로

[롤 접음]

ㄷㄱ

[Barrow]

엑셀필터

[시간의존재]

ㄷㄱ

[botafogo]

ㄷㄱ

[Berbatov]

ㄷㄱ

[유승옥]

필터

[하슬]

ㄷㄱ

[Barents]

ㄷㄱ

[감자요플레]

ㄷㄱ