책 내용 질문하기
온라인 채점 결과 문의
도서
2026 시나공 컴퓨터활용능력 1급 실기 총정리
페이지
0
조회수
5
작성일
2025-11-06
작성자
최*국
첨부파일
2026_최신기출문제_04회_2025년상시04
기타작업 - 2 에서
1번을
Private Sub UserForm_Initialize()
cmb강좌명.RowSource = "h5:i10"
cmb강좌명.ColumnCount = 1
End Sub
이렇게 풀고
2번을
Private Sub cmd입력_Click()
i = [b4].CurrentRegion.Rows.Count + 4
Cells(i, 2) = cmb강좌명.Column(0)
If opt남 = True Then
Cells(i, 3) = "남"
ElseIf opt여 = True Then
Cells(i, 3) = "여"
End If
Cells(i, 4) = cmb강좌명.Column(1)
If opt참석 = True Then
Cells(i, 5) = "○"
Cells(i, 6) = Cells(i, 4) + 15000
Else
Cells(i, 5) = ""
Cells(i, 6) = Cells(i, 4)
End If
End Sub
이렇게 풀어도 될까요?