컴퓨터활용능력 1급 실기 - 엑셀 함수 및 프로시저 정리

소개글

컴퓨터활용능력 1급 실기 - 엑셀 함수 및 프로시저 정리에 대한 보고서 자료입니다.

본문내용

의 고객명(txt고객명), 고객등급(txt고객등급), 매출금액(txt매출금액), 결제방식(txt결제방식)에 각각 표시되도록 프로시저를 작성하시오. <시트에서 → 폼으로!>
* 특정 버튼을 클릭한다음 코드 입력하기
Private Sub cmd고객조회_Click()
입력행 = [d3].Row + [d3].CurrentRegion.Rows.Count - 1
txt고객명 = Cells(입력행, 4)
txt고객등급 = Cells(입력행, 5)
txt매출금액 = Cells(입력행, 6)
txt결제방식 = Cells(입력행, 7)
End Sub
◆ <성적입력> 폼의 날짜(Lbl날짜) 레이블을 더블클릭하면 날짜(txt날짜) 텍스트 상자에 현재 시스템 날짜와 시간이 표시되도록 이벤트 프로시저를 작성하시오.
Private Sub Lbl날짜_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
txt날짜 = Now
End Sub
◆ <성적입력>폼의 합계(Lbl합계) 레이블을 클릭하면 국어(txt국어) 점수와 영어(txt영어) 점수의 합계가 합계(txt합계) 텍스트 상자에 표시되도록 이벤트 프로시저를 작성하시오.
Private Sub Lbl합계_Click()
txt합계 = Val(txt국어) + Val(txt영어)
End Sub
* Val( ) : 문자를 숫자로 변환하는 함수
◆ 배송비의 체크박스(chk배송비)를 체크하면 ‘배송비 무료’, 체크를 해제하면 ‘배송비 유료’가 배송비(cmd배송비)에 표시되도록 프로시저를 작성하시오.
Private Sub Chk배송비_Click()
If Chk배송비 = True Then
Cmd배송비.Caption = "배송비 무료"
Else
Cmd배송비.Caption = "배송비 유료"
End If
End Sub
◆ 수량의 스핀(spin수량) 버튼을 누르면 증감된 숫자가 수량(txt수량)에 표시되도록 프로시저를 작성하시오.
* spin수량의 Change 프로시저 선택
Private Sub Spin수량_Change()
Txt수량 = Spin수량
End Sub
◆ 보험종류(cmb종류)와 가입지점(cmb지점)을 선택한 후 성명(txt성명)을 입력하고 신청확인(cmd확인) 버튼을 클릭하면 폼에 입력된 데이터가 [표1]에 입력되어 있는 마지막 행 다음에 연속하여 추가입력 되도록 작성하시오.
- 폼에서 선택된 보험종류에 해당하는 월납부액, 납부총액, 이자총액을 [참조표]에서 찾아 [표1]에 표시하시오.(ListIndex 속성 이용)
Private Sub Cmd확인_Click()
참조행 = Cmb종류.ListIndex + 7
입력행 = [a2].Row + [a2].CurrentRegion.Rows.Count -1
Cells(입력행, 1) = Cmb종류
Cells(입력행, 2) = Cmb지점
Cells(입력행, 3) = Txt성명
Cells(입력행, 4) = Cells(참조행, 9)
Cells(입력행, 5) = Cells(참조행, 10)
Cells(입력행, 6) = Cells(참조행, 11)
End Sub

키워드

컴활 1급,   실기시험,   1급실기,   시나공,   엑셀함수,   프로시저