[1일차] VBA 스터디 노트

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

01. 버튼으로 빈셀선택하여, 체크해 주는 매크로 생성

Sub MttestMacro1()
' Mytestmacro1 매크로

'범위선택
Range("B2").CurrentRegion.Select
'빈셀 선택
Selection.SpecialCells(xlCellTypeBlanks).Select

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

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

02. 비만도 계산

'BMI(몸무게,키)
Function BMI(Weight, Height)

BMI = Weight / (Height / 100) ^ 2

End Function

03. 이름과 주민등록으로 매칭으로, 남녀 구분

Function ID_Gender(ID)

ID_Gender = WorksheetFunction.IsOdd(Mid(ID, 8, 1))

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

End Function

04. 미션 - 함수로 이름 입력시 남녀 구분

Function ID_Gender(ID)

ID_Gender = WorksheetFunction.IsOdd(Mid(ID, 8, 1))

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

End Function

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

VB를 이용하면, 반복적인 일을 쉽게 처리할수 있음.

생각보다 이해하고, 따라 하기 쉬움.

업무에 적용할 부분이 많다고 생각함.

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

항상 좋은 강의 열정적인 강의 감사합니다.

이번 스터디에서 실습을 따라 하면서, 중간에 코드 에러가 나왔는데, 엑셀을 다시 실행시키니 제대로 작동했습니다.

왜 그런지 모르겠네요.

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

위에 코드와 스크릿샷 첨부하였습니다.