[1주차] VBA 4주 완성 스터디 노트 / 미션 제출

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

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

① VBA 사용처

굳이 파이썬을 이용하지 않아도 될 간단한 사무자동화 부분에서는 파이썬을 배우는 시간과 노력을 아낄 수 있다는 점을 깨달았습니다.   (모기 잡는데 전차가 필요하지 않구나..)

② VBA 문법

tab키로 4칸 들여쓰는 것, 새로 만드는 함수에 변수 지정하는것 등은 파이썬과 똑같고, 파이썬에서 라이브러리 입력하는 것처럼 엑셀은 .을 이용해서 엑셀함수를 넣어 직관적인 문법을 이룬다는 것을 알았습니다.

③ 손으로 많이 써보기

미션을 하려할때 순간  턱 막히는게 역시 파이썬이나 VBA나 밑그림을 손으로 그려가며 입력, 연산, 출력을 생각해보는 시간을 가져야한다는 것을 느꼈다.

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

책이 아니라 정보전달 밀도가 높은 동영상을 보면서 한다는 점이 굉장히 안정적이었고, 실시간 채팅을 통해서 순간 막히는 부분을 빠르게 처리 해주심이 편리했습니다.

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

Sub MyTestMacro1()
'
' 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
 
 
 
 
 
Function FindGender(Name)
 
FindGender = WorksheetFunction.VLookup(Name, Range("B2:G18"), 2, 0)
 
 
End Function