자료실

부자는 돈을 써서 시간을 아끼지만 가난한 사람은 시간을 써서 돈을 아낀다

vb6.0/vba

IT HUB를 찾아주셔서 감사합니다.

vba [vba] 고급필터(AdvancedFilter)를 이용한 지정한 구간의 날짜검색

페이지 정보

profile_image
작성자 하나를하더라도최선을
댓글 0건 조회 8,464회 작성일 20-09-04 14:38

본문

고급필터(AdvancedFilter)를이용해서 지정한 구간의 날짜를 필터링 하는 예제입니다.

첨부된 파일에는 아래처럼 이름이 정의되어 있습니다.

Data

=OFFSET(Sheet1!$A$4,0,0,COUNTA(Sheet1!$A:$A),5)

조건

=Sheet1!$F$1:$G$2

아래는 삽입된 vba(매크로) 소스입니다.

Sub Macro1()
    On Error Resume Next
    ActiveSheet.ShowAllData
    Range("Data").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range( _
        "조건"), Unique:=False
End Sub

아래와 같은 데이터가 있습니다.

"검색" 버튼을 누르면...

아래와 같이 2012-05-01 부터 2012-12-31 까지 검색(필터)해서 보여줍니다.

댓글목록

등록된 댓글이 없습니다.