[1주차]스터디노트

VBA 4주 완성
작성자
백소연(아임파인)
작성일
2022-07-04 23:38
조회
43

1. 열심히 공부한 흔적이 담긴 사진을 남겨주세요!
(위쪽 카메라 버튼을 클릭해서 이미지를 삽입할 수 있습니다)

 

 

 

 

2. 이번 스터디에서 새롭게 알게되거나 유익했던 내용을 3가지로 요약해주세요!

 

  1. 매크로 명령문 (sub, function) 익히기
  2. 나만의 함수만들기 (Bmi지수, Id_Gender, Mysum등)
  3. 매크로함수만들어서 버튼하나로 자동화 (ex)셀채우기

 

 

3. 이번 스터디를 진행하면서 특별히 좋았던 점이나 부족했던 점이 있다면 자유롭게 남겨주세요.

차근차근 하나씩 설명해 주어서 따라하면서 익히기 좋았습니다.

 

 

4. 열심히 학습한 결과파일이나 스크린샷, 코드가 있다면 자유롭게 올려주세요.

 

Private Sub Workbook_Open()
MsgBox "어서오세요"
End Sub
= > 결과 : 파일을 클릭할때 표시됨

Private Sub Workbook_SheetActivate(Byval Sh as Object)
MsgBox Sh.Name
End Sub
= > 결과 : 시트를 열때마다 시트이름창이 표시

매크로 기록 버튼 클릭 - 매크로 이름 만들기

Sub MytestMacro1()
' MytestMacro1

'범위선택 range : 범위
Range("b3").CurrentRegion.Select

=>결과: b3을 기준으로 영역표시(ctrl+a)

'빈셀선택
Selection.SpecialCells(xlCellTypeBlanks).Select
Application.WindowState = xlNormal

'셀채우기를 노란색으로 변경
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535 칼라
.TintAndShade = 0
.PatternTintAndShade = 0
End With

'선택된 셀의 값을 "미제출" 입력
Selection.FormulaR1C1 = "미제출"
End Sub

Sub Test2()
Range("b3").CurrentRegion.Select

End Sub

나만의 함수만들기

Function Mysum(num1, num2)
Mysum = num1 + num2

=>결과: 엑셀에서 =mysum(1,2) ->결과3
End Function

'BMI(몸무게,키)
Function BMI(Weight, Height)
BMI = Weight / (Height / 100) ^ 2

=>결과 : 엑셀에서 =bmi(weight,height) = 계산
End Function

'Id_Gender(주민번호)
Function ID_Gender(ID)

ID_Gender = Mid(ID, 8, 1)
ID_Gender = WorksheetFunction.IsOdd(Mid(ID, 8, 1))
=결과 :isodd함수=홀수면 true, 짝수면 false
즉,mid함수이용해서 성별1,2불러와서 1이면 ture,2면 false

If ID_Gender = True Then
ID_Gender = "남자"
Else
ID_Gender = "여자"
End If

End Function

 

Function FindGender(Name)

FindGender = WorksheetFunction.VLookup(Name, Range("b:g"), 2, False)

End Function

 

회원등급 : 2레벨
포인트 : 32 EP

작성한 댓글이 없습니다.

전체 0

전체 1,208
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[📚교재 출간 안내] 「진짜쓰는 실무엑셀」 , 드디어 출간되었습니다! (135)
오빠두엑셀 | 2022.02.03 | 추천 392 | 조회 68704
오빠두엑셀 2022.02.03 392 68704
40636 VBA 4주 완성
4주차 VBA강의 노트 엑셀파일첨부파일
이명환 | 2022.07.30 | 추천 0 | 조회 179
이명환 2022.07.30 - 179
40631 VBA 4주 완성
[4주차]VBA 4주 학습 첨부파일
이상민 | 2022.07.30 | 추천 0 | 조회 59
이상민 2022.07.30 - 59
40630 VBA 4주 완성
[3주차]VBA 4주 교육 첨부파일
이상민 | 2022.07.30 | 추천 0 | 조회 47
이상민 2022.07.30 - 47
40627 VBA 4주 완성
[2주차]VBA 4주 완성 학습 첨부파일
이상민 | 2022.07.30 | 추천 0 | 조회 47
이상민 2022.07.30 - 47
40622 VBA 4주 완성
[4주차] VBA 4주차 스터디 노트 엑셀파일첨부파일 (1)
사랑2 | 2022.07.30 | 추천 0 | 조회 50
사랑2 2022.07.30 - 50
40621 VBA 4주 완성
[4주차]엑셀 VBA 4주완성 엑셀파일첨부파일
최동국 | 2022.07.30 | 추천 0 | 조회 37
최동국 2022.07.30 - 37
40618 VBA 4주 완성
[4주차] 스터디 노트, 미션 첨부파일
달구름 | 2022.07.30 | 추천 0 | 조회 46
달구름 2022.07.30 - 46
40616 VBA 4주 완성
[4주차] VBA 4주 완성 특별스터디 4강 엑셀파일첨부파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 47
Gladiolus 2022.07.30 - 47
40615 VBA 4주 완성
[3주차] VBA 4주 완성 특별스터디 3강 엑셀파일첨부파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 35
Gladiolus 2022.07.30 - 35
40614 VBA 4주 완성
[2주차] VBA 4주 완성 특별스터디 2강 엑셀파일첨부파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 41
Gladiolus 2022.07.30 - 41
40612 VBA 4주 완성
[1주차] VBA 4주 완성 특별스터디 1강 엑셀파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 61
Gladiolus 2022.07.30 - 61
40609 VBA 4주 완성
[4주차] VBA 4주 완성 스터디노트 첨부파일
ㅊH 운ㅓ | 2022.07.30 | 추천 0 | 조회 38
ㅊH 운ㅓ 2022.07.30 - 38
40607 VBA 4주 완성
[4주차] 스터디 첨부파일
girls**** | 2022.07.30 | 추천 0 | 조회 37
girls**** 2022.07.30 - 37
40596 VBA 4주 완성
[3주차] 스터디 및 미션 첨부파일
DanP | 2022.07.29 | 추천 0 | 조회 36
DanP 2022.07.29 - 36
40595 VBA 4주 완성
[3주차] VBA 4주 완성 첨부파일
| 2022.07.29 | 추천 0 | 조회 36
2022.07.29 - 36
40592 VBA 4주 완성
[4주차] VBA 4주 완성 첨부파일
익명 | 2022.07.29 | 추천 0 | 조회 39
익명 2022.07.29 - 39
40591 VBA 4주 완성
[2주차] 스터디 및 미션 첨부파일
DanP | 2022.07.29 | 추천 0 | 조회 54
DanP 2022.07.29 - 54
40589 VBA 4주 완성
콜렉션및 배열등 엑셀파일첨부파일
브랑카 | 2022.07.29 | 추천 0 | 조회 36
브랑카 2022.07.29 - 36
40588 VBA 4주 완성
[3주차] VBA 4주 완성 노트 및 과제 엑셀파일첨부파일
토토니 | 2022.07.29 | 추천 0 | 조회 42
토토니 2022.07.29 - 42
40586 VBA 4주 완성
[4주차]VBA 4주 완성 엑셀파일첨부파일
ㅇㅇ나두 | 2022.07.29 | 추천 0 | 조회 40
ㅇㅇ나두 2022.07.29 - 40
글쓰기