(VBA) 013 - 조건문을 사용해봅시다! if

＃毎日育ちゃん可愛い大会
(설명자료)
pptx파일
(xlsm파일)
xlsm파일

★ 진행목적 : 왜 이걸 사용합니까.

1)VBA나 엑셀을 사용하다보면 특정 조건을 분기로 다른 데이터 처리방법을 사용하는 경우가 있습니다.

2)이것을 처리하는 것이 if문입니다! (switch-case문도 있지만, 이건 다음에 다루도록 할게요!

3)if를 사용하면 하나의 함수를 만들어 여러 가지 데이터를 처리할 수 있다는 이점이 있지요!

★ 어떤 경우 사용합니까?

1)예를 들자면, 데이터의 종류가 3가지라고 합시다. (0보다 크다, 0이다, 0보다 작다)

2)이 때, 이 데이터에 따라 각기 다른 데이터 처리를 해야한다고 하면, 지금까지의 학습 내용이라면 함수를 세 개를 만들고 각 조건별로 다른 함수를 불러야 하겠지요!

3)이를 해결하기 위해서, 하나의 함수에 조건문을 넣어서 처리해주는 것입니다!

★ 예제의 처리과정을 알아봅시다!

1)예제에서는 0보다 클 때는 10배를 곱하고, 0보다 작을 때는 -1을 곱하고, 나머지의 경우(0인 경우) 1을,
바로 옆 Cell에 기록합니다!

2)각 Cell의 데이터를 조건식으로 받기 위해 If, Elseif의 옆에 달아놓았습니다.

3)이렇게 함수를 구현하면, 하나의 함수로 여러 가지 처리방법을 적용할 수 있겠지요!

4)처음엔 If~then, 두 번째 조건부터는 Elseif~then, 나머지 모든 조건은 Else로 처리하는 것으로 기억합시다!

Sub Test()
    Dim i As Integer
    
    Range("A2").Select
    i = 0
    Do
        If ActiveCell.Offset(i, 0).Value > 0 Then
            ActiveCell.Offset(i, 1).Value = _
            ActiveCell.Offset(i, 0).Value * 10
        ElseIf ActiveCell.Offset(i, 0).Value < 0 Then
            ActiveCell.Offset(i, 1).Value = _
            ActiveCell.Offset(i, 0).Value * (-1)
        Else
            ActiveCell.Offset(i, 1).Value = 1
        End If
        i = i + 1
    Loop Until ActiveCell.Offset(i, 0).Value = ""
    
    Cells(1, 1).Select
End Sub

(中谷育ちゃんのイメージについて）

本当に可愛い中谷育ちゃんのイメージが含まれています。ありがとうございます。

何か問題があったら、教えてください。直ちに処理します。

(About translation this material to the other languages)

If you need this information with other language, then let me know about that.

I will do my best to translate this material to language you ask me to, so you can use this material with the language you want to use. Thank you.