본문 바로가기

Cerificate/컴퓨터활용능력

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

728x90
반응형

기출유형 2회

1. 스프레드시트

 

시나공 온라인 채점

  시간이 계속 부족하다. 기본작업에서 막히는 부분이 있고, 거기서 해매다보니 뒤에서 손을 못 대는 부분이 생긴다. 거기에 보다 엄격한 대비를 위해 43분으로 시간을 설정하는 것도 한 몫하는 듯.

 

  그나저나 채점 중 에러 발생하는데 (처리할 수 없는 예외가 발생했다는 메시지 내용), 온라인 채점 프로그램을 활용해야겠다. (링크)

 

시나공 채점프로그램 에러

1) 기본작업

(1) 고급 필터

=AND(OR(B3="문예창작과",B3="문헌정보학과"),COUNTIF(F3:H3,80))

countif 함수에 대한 이해 부족

- countif 함수는 조건을 만족하는 것이 몇 개인지 추출하는 기능

- 조건은 쌍따옴표를 사용해 표시.

 

(2) 조건부 서식

=AND($E3="남",LARGE($H$3:$H$27,10))

당연히 오답!

 

범위를 지정해 어떤 셀이 large함수로 출력되는 값보다 작은지 나타내야함.

 

(3) 통합 및 인쇄

 

- 시트보호는 [검토] 탭에 위치

- 페이지 나누기 구분선은 [보기]탭에서!

 

2) 계산작업

(1) sumproduct 함수

=SUMPRODUCT(E34:G34,{0.7,0.2,0.1})

- 특정 배열을 곱한 다음, 그 값을 합산.

- 배열은 중괄호를 사용해 표현.

 

(2) 숫자만큼 반복해 특수문자로 표시

=CONCATENATE(REPT("★",QUOTIENT(E3,10)),REPT("☆",QUOTIENT(100-E3,10)))

아... 센스가 모잘랐다.

10에서 정수만큼 간단한데...

 

(3) 배열수식 인원수 계산

=SUM(IF($A39=$D$3:$D$34,COUNT(1)))&"명"

count함수에 대한 지시는 없으므로

=SUM(IF($A39=$D$3:$D$34,1))&"명"

이렇게 쓰자.

 

(4) 배열수식 조건 2개

=average(if((FIND("정보",$A$3:$A$34),A38=$D$3:$D$34

흠... 딱 봐도 오답.

 

=AVERAGE(IF((A39=$D$3:$D$34) * IFERROR(FIND("정보",$A$3:$A$34)>=1,0),$G$3:$G$34))

- 조건 2개를 만족한다는 것을 *로 표현.

- find는 해당값이 있는 위치를 출력하는 함수.

- 즉, 정보라는 값이 없으면 (에러 발생 시) 0을 주라는 의미. (두번째 조건)

- 두 조건을 만족할 때, G열에 대한 평균값 계산.

 

3) 분석작업

(1) 피벗테이블 작성

 

- '·'는 'ㄱ' + 한자 키를 누르면 나옴

-  요긴한 특수문자 정리 : ☆★※·△▲▽▼◁◀▷▶○●

 

(2) 데이터 유효성 검사 / 데이터 표

 

- 데이터표는 우선, 계산하고자 하는 값을 공란에 연동시켜줘야 한다. (='셀 주소')

- 그리고 표의 모든 범위를 선택하고, [데이터]-[가상분석]-[데이터표]에서 상세 설정.

 

4) 기타작업

(1) 매크로 작성

 

- 서식 : '#.#'과 '#.0"은 소수점 이하의 수가 0일 때 다른 결과를 추출 (# - 0 표시 X)

 

(2) VBE

 

- A. 1번 문제

Private Sub UserForm_Initialize()
    cmb학과명.RowSource = "'기타작업-2'!i5:i8"
    opt1학년 = True
End Sub

이건 틀린 것인가? 공홈 문의 중 (22.05.04)

- 결과는 동일하게 나옴.

- 다른 시트에서 가져올 때는 따옴표와 느낌표 활용 (모를 때는 시트에 직접 해보면 됨.)

 

- B. 3번 문제

Private Sub cmd종료_Click()
    MsgBox "성적입력 폼을 종료합니다."
    Unload Me
    
End Sub

오답! 캡션 속성을 이용하지 않았기 때문.

 

Private Sub cmd종료_Click()
    MsgBox me.caption & "폼을 종료합니다."
    Unload Me
    
End Sub

caption이라는 명령어를 이용해 캡션 속성을 나타낸다!

 

- C. 2번 문제

Private Sub cmd입력_Click()
    
    i = CurrentRegion.Rows.Count + 4
    
    Cells(i, 2) = Rows() & txt성명
    Cells(i, 3) = cmb학과명
    
    If opt1학년 = True Then
       Cells(i, 4) = "1학년"
    ElseIf opt2학년 = True Then
       Cells(i, 4) = "2학년"
    ElseIf opt3학년 = True Then
       Cells(i, 4) = "3학년"
    Else
       Cells(i, 4) = "4학년"
    End If
    
       
    Cells(i, 5) = txt학과성적
    Cells(i, 6) = txt어학테스트
    Cells(i, 7) = txt면접
    
    
End Sub

 

입력 결과

위의 코드는 실행되지 않고, 일부 수정하면 8행부터 출력된다.

 

Private Sub cmd입력_Click()
    
    i = Range("b3").CurrentRegion.Rows.Count + 2
    
    Cells(i, 2) = i - 3 & txt성명
    Cells(i, 3) = cmb학과명
    
    If opt1학년 = True Then
       Cells(i, 4) = "1학년"
    ElseIf opt2학년 = True Then
       Cells(i, 4) = "2학년"
    ElseIf opt3학년 = True Then
       Cells(i, 4) = "3학년"
    Else
       Cells(i, 4) = "4학년"
    End If
    
       
    Cells(i, 5) = txt학과성적
    Cells(i, 6) = txt어학테스트
    Cells(i, 7) = txt면접

    
End Sub

 이 코드를 입력하면 된다. 근데 일부 코드 뒤에 value가 꼭 있어야 하는 것인가?


<2022.05.08 시나공 답변 추가>

 


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

 

채점프로그램과 온라인 채점 사이트를 이용한 결과가 상이하다... 

 

 

1) DB구축

 

(1) 내림차순 정렬 : 정렬 기준 란에 '필드명 + desc' 입력

 

2) 조회 및 출력 기능 구현

 

(1) 날짜 컨트롤 속성 설정 

- mmm과 mmmm의 차이 

- mmm : 영어 표기 축약형

- mmmm : 영어 표기 

 

3) 처리 기능 구현

 

(1) 체크 = yes이므로, "iif(필드 = yes, 맞을 때, 아닐 때)" 이렇게 입력해주어야 함.

728x90
반응형