로그인 유지
이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
2013.09.25 19:24:33 *.104.126.21
열심회원님..
VBA에 대해서 어느정도 지식이 있으시니까.. 간략히 말씀드리겠습니다.
데이터 영역에 자동필터를 설정하시고.. 매크로 기록으로 가만 필터링 되도록 기록해보세요..
아래 코드처럼 기록되는데요.. Criteria1 부분만 수정하면 되겠죠?
ActiveSheet.Range("$A$4:$B$9").AutoFilter Field:=2, Criteria1:="가"
자동필터가 맘에 안 드시면.. 고급필터를 적용할 수도 있는데요..
그게 그겁니다. 다만.. 고급필터를 사용하려면 CriteriaRange를 따로 만들어줘야합니다.
Range("A4:B9").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("D5:D6"), Unique:=False
무조건 하려고 하기보다는 매크로 기록을 해보시는게 공부하시는데 도움이 될 겁니다.
2013.09.25 19:59:03 *.218.33.33
2013.09.26 13:15:51 *.104.126.21
네 없습니다.
드롭다운 버튼을 보고 싶지 않다면 고급필터로 하세요.
2013.09.26 16:43:55 *.218.33.33
새 창으로
선택한 기호
702
701
700
699
698
697
696
695
694
693
692
691
690
689
688
687
686
685
684
683
열심회원님..
VBA에 대해서 어느정도 지식이 있으시니까.. 간략히 말씀드리겠습니다.
데이터 영역에 자동필터를 설정하시고.. 매크로 기록으로 가만 필터링 되도록 기록해보세요..
아래 코드처럼 기록되는데요.. Criteria1 부분만 수정하면 되겠죠?
ActiveSheet.Range("$A$4:$B$9").AutoFilter Field:=2, Criteria1:="가"
자동필터가 맘에 안 드시면.. 고급필터를 적용할 수도 있는데요..
그게 그겁니다. 다만.. 고급필터를 사용하려면 CriteriaRange를 따로 만들어줘야합니다.
Range("A4:B9").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("D5:D6"), Unique:=False
무조건 하려고 하기보다는 매크로 기록을 해보시는게 공부하시는데 도움이 될 겁니다.