로그인 유지
이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
2013.09.25 19:24
열심회원님..
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
무조건 하려고 하기보다는 매크로 기록을 해보시는게 공부하시는데 도움이 될 겁니다.
새 창으로
선택한 기호
![[레벨:30]](http://www.abyul.com/zbxe/modules/point/icons/default/30.gif "포인트:141861point, 레벨:30/30"){kind=icon}
아별
열심회원님..
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
무조건 하려고 하기보다는 매크로 기록을 해보시는게 공부하시는데 도움이 될 겁니다.