[엑셀 VBA 기초] 003. if 구문

안녕하세요, 고준영입니다. 오늘은 엑셀 VBA 사용 간 if 구문 사용에 대하여 알아보겠습니다.

예제로, 85점이 넘으면 pass / 85점 미만은 fail을 판단하는 매크로를 만들어보겠습니다.

 

---

예제 데이터입니다.

제임스	90	pass
존	80	fail
로버트	100	pass
마이클	90	pass
윌리엄	100	pass
데이비드	70	fail
리차드	90	pass
찰스	100	pass
조세프	100	pass
토마스	90	pass

pass / fail 판단을 한두 개는 직접 할 수 있지만, 데이터가 많아질수록 컴퓨터에 맡기는 것이 바람직합니다.

 

소스코드입니다.

Sub my_func()
    If ActiveCell(1, 0).Value > 85 Then
        ActiveCell.Value = "pass"
    Else
        ActiveCell.Value = "fail"
    End If
End Sub

사진과 같이 데이터 및 매크로를 구성해주세요.

ActiveCell = ActiveCell(1, 1) 이며,

ActiveCell(1, 0)은 하나 왼쪽에 있는 셀을 참조합니다.

데이터를 드래그 + Ctrl CV 로 가져가서 사용하세요

※ 매크로 버튼을 만들고 연동하는 방법은 아래를 참조하세요.

2022.09.16 - [자동화/엑셀] - [엑셀 VBA 기초] 002. 버튼으로 매크로 실행하기

 

이후, 점수 옆의 셀에 포커스를 두고 매크로를 실행하면 pass / fail 판단 및 입력이 가능합니다.

 

If 구문 한눈에 보기

If statement Then
    ~
Else If statement Then
    ~
Else
    ~
End If

 

※ 최초 점수 옆 셀에 =IF(C2>85, "pass", "fail") 을 넣고 아래로 자동완성시켜도 동일한 결과가 나오지만, 공부하는 차원에서 해 봤습니다.

 

---

 

오늘은 엑셀 VBA 기초에 대하여 알아보았습니다. 구독자 여러분 모두 한 번씩 따라 해 보시면서 엑셀 VBA에 대해 알아가시면 좋을 것 같습니다. 감사합니다.

 

 

해당 블로그에서 무료 업무 자동화 툴을 제작해 드리고 있습니다.
단순 제 학습용 및 게시글로서 활용되며, 전해주신 데이터는 철저히 익명 처리해서 활용할 예정입니다.
많은 관심 부탁드립니다.

e-mail : lilarcor27@gmail.com