본문 바로가기

Cerificate/컴퓨터활용능력

[컴퓨터활용능력 1급 실기] 2022 시나공 기출문제집 #5 (기출유형 4회 풀이 및 핵심 정리)

728x90
반응형

 1. 스프레드시트 (엑셀)

시간 부족이라는 문제가 지속되고 있는 상황.

 

 

1) 기본작업

PASS!

 

2) 계산작업

(1) 누적개수 (if, countif, left 사용) - 고난이도

=IF(LEFT($B20,1)="M","뮤지컬("&COUNTIF($B$15:$B$40,LEFT($B20,1)="M")&")",IF(LEFT($B20,1)="C","콘서트("&COUNTIF($B$15:$B$40,LEFT($B20,1)="C")&")","그외("&COUNTIF($B$15:$B$40,LEFT($B20,1)<>"C")+COUNTIF($B$15:$B$40,LEFT($B20,1)<>"B")&")"))

 

함수 결과

 

괄호 안의 숫자가 안 나옴. countif에 이상이 있다는 뜻.

 

=IF(LEFT($B15,1)="M","뮤지컬("&COUNTIF($B$15:B15,"M*")&")",IF(LEFT($B15,1)="C","콘서트("&COUNTIF($B$15:B15,"C*")&")","그외("&COUNTIF($B$15:B15,"<>M*")-COUNTIF($B$15:B15,"C*")&")"))

 

- countif의 조건 수정. (left함수를 사용한 식은 통하지 않음.)

- 그외 조건을 보면, M으로 시작하지 않는 것에서 C로 시작하는 경우를 빼서 누적 개수 도출.

 

(2) 총금액 평균

=AVERAGEIFS($F$15:$F$40,$A$15:$A$40,$A$3:$A$10,$E$15:$E$40,">=5")

 

(3) maxa, momnth 배열수식

=MAXA((MONTH($C$15:$C$40)=$D3)*$E$15:$E$40)

maxa함수는 숫자뿐만 아니라 텍스트와 논리값 등도 사용 가능.

 

(4) dcounta 함수

=TEXT(DCOUNTA($A$14:$H$40,A14,$D$10:$E$11),"0개")

- 두번째 변수는 필드명이 있는 셀을 찍어주는 듯.

 

(5) countifs 함수

=COUNTIFS($D$3:$D$20, "강석희",$E$3:$E$20,G$23)&"건"

- 강석희이고, 이하인 거래건수라는 2가지 조건을 만족해야함.

 

=COUNTIFS($D$3:$D$20, "강석희",$E$3:$E$20,"<="&I$23)&"건"

이하라는 조건을 표시할 때, 쌍따옴표 사용하고 & 연산자로 이어야 함.

 

 

3) 기타작업

 

(1) 매크로

[빨강][>=100]"[대강당]"* 0;[>=70]"[중강당]"* 0;"[소강당]"* 0

- * 뒤의 문자를 반복하여 셀의 너비만큼 채워주는데 공백을 입력하였으므로 공백을 최대한 넣어줌.

 

(2) VBA

 

(A) 최후 작업

Private Sub cmd종료_Click()

    MsgBox "전체 예매 건수는" & Counta(c5:c24) & "건입니다."
    Unload Me
    
End Sub

오류!

 

Private Sub cmd종료_Click()

    MsgBox "전체 예매 건수는" & [c4].CurrentRegion.Rows.Count - 1 & " 건입니다."
    Unload Me
    
End Sub

- 필드명이 들어간 한 줄을 빼고 메시지창이 출력되도록!

 

 

(B) 중간 작업

Private Sub cmd예매_Click()
    
    i = Range("c4").CurrentRegion.Rows.Count + 4
    j = cmb공연명.ListIndex + 5
    
    Cells(i, 3) = Date
    Cells(i, 4) = txt공연장
    Cells(i, 5) = cmb공연명
    Cells(i, 6) = txt좌석수
    Cells(i, 7) = Cells(j, 12)
    Cells(i, 8) = Cells(j, 13)
    Cells(i, 9) = Cells(i, 6) * Cells(i, 8)
    
    
    
    
End Sub

- listindex는 0부터 출력함.

 


2. 데이터베이스 (액세스)

 

1) DB구축

PASS!

 

2) 조회 및 출력 기능 구현

(1) 폼 완성하기

=IIf([출금항목]=True,"이체","카드")

- Yes가 정답인데 True는 안되는 것인가?

 

(2) 과목별 성적 조회 (DAVG 사용)

=DAvg("성적","과목별성적","과목명=txt과목명")

필드명, 레코드 위치 (테이블 or 쿼리명, 문제에서 언급됨), 조건 순으로 입력

 

 

3) 조회 및 출력 기능 구현

(1) 특수기호 표시

=Format(Avg([금액]),"분류별 소비 평균 "":"" #,###.0")

- 이중 큰따옴표로 표기해야 함.

 

(2) 날짜 필터

Private Sub cmd조회_Click()

    Me.Filter = "날짜 = #" & txt날짜 & "#"
    Me.FilterOn = True
    
    
End Sub

- 큰따옴표 사용 주의

 

4) 처리 기능 구현

(1) 소비조회 쿼리

 

오답!
정답!

- weekday 함수 : 1(일) ~ 7(토)

728x90
반응형