시나공

시험에

나오는 것만

공부한다!

Sub 자동필터()
'
' 자동필터 Macro
'

'
Range("E6").Select
Selection.AutoFilter
ActiveWorkbook.Worksheets("분석작업-2").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("분석작업-2").AutoFilter.Sort.SortFields.Add Key:=Range _
("B3:B21"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("분석작업-2").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
ActiveSheet.Range("$A$3:$H$21").AutoFilter Field:=7, Criteria1:=">=1000000" _
, Operator:=xlAnd, Criteria2:="<=3000000"
End Sub

--------------------------------------------------------------------------------------------

이건 제가 한 매크로입니다.

문제에선 '자동 필터 기능을 이용하여 품목이름을 기준으로 오름차순 정렬한 후 이익금액이 1,000,000이상 3,000,000이하인 데이터만을 표시하는 매크로를 생성'인데요

'자동필터 기능을 이용하여~ ' 이부분을 보고 정렬도 자동필터로 적용했는데

정답을 보니 먼저 정렬 후 자동필터를 하여 조건에 맞는 데이터를 표시하도록 한 것 같더군요

제가 한 매크로가 자동필터 기능을 풀어주지 않으면 매크로 실행 시 오류가 발생하긴하는데

문제를 보니 좀 애매하네요..

이와같은 자동필터 매크로 문제에서 정렬에 대한 지시사항이 주어졌을경우

먼저 정렬을 한 후 자동 필터를 해야하는 건가요?

----------------------------------------------------------------------------------------------

12년 1회 액세스 문제1-1에 4번에서

'생일'필드에 1960년 1월 1일 이후의 날짜만 입력되도록 유효성 검사규칙을 설정할 때

정답에선 >=1960-1-1 로 되어있는데 이렇게 할 경우 데이터시트에 입력된 생일 형식처럼

1959년 12월 31일로 입력했을때 입력이 되지 않아야 할텐데 제가 뭘 잘못했는지 그냥 입력이 되더군요..

저는 >="1960년 1월 1일" 이런 형식으로 작성했는데 이렇게 작성해도 되나요?

2-2번 문제에서 Dlookup("전화번호","회원","이름 = txt이름")으로 작성했는데

답은 Dlookup("전화번호","회원","txt이름 = 이름")으로 되어있던데 별 차이는 없는거겠죠...?

----------------------------------------------------------------------------------------------

2012년 모의고사에서 매크로 부분에서 첨부한 파일과 같이 실행 시마다 전체평균등이 중복되서 표시되는데 이렇게 되면 틀린 것으로 간주되나요?

질문이 너무 많네요 ㅠㅠ 답변 부탁할게요~