IT/EXCEL & VBA
[Excel VBA 기초-2] IF문 / For문 / While문
크몽 '경매하는 개발자' 님의 경매/부동산/IT/사업 채널
2021. 12. 27. 14:26
반응형
[Excel VBA 기초-2] IF문 / For문 / While문
반응형
<사용된 함수>
- 셀 값 선택
Range("C2").Value
- 메시지박스 출력
MsgBox ("안녕")
- 알파벳+변수명(숫자)로 셀 만들고 그 셀 선택
Range("F" & num).Select
- 선택된 셀에 값 넣기
Selection.Value = "안녕!"
1. IF문
비교연산자 | 의미 | 논리연산자 | 의미 |
= | 같다 | A AND B | A B 모두 만족 |
<> | 같지않다 | A OR B | A B 중 하나라도 만족 |
> | 크다 | NOT A | A가 TRUE면 FALSE |
< | 작다 | A XOR B | A B 모두 불만족 |
>= | 크거나 같다 | ||
<= | 작거나 같다 |
1-1. 김경록만 찾기
반응형
Sub if문배우기()
사원명 = Range("b2").Value
부서 = Range("c2").Value
If 사원명 = "김경록" Then
MsgBox ("해당 사원명은 김경록이 맞습니다.")
End If
End Sub
1-2. 김경록 / 그외 사람 찾기
Sub if문배우기()
사원명 = Range("b2").Value
부서 = Range("c2").Value
If 사원명 = "김경록" Then
MsgBox ("해당 사원명은 김경록이 맞습니다.")
Else
MsgBox ("해당 사원명은 김경록이 아닙니다.")
End If
End Sub
1-3. 김경록 / 조세호 / 그외 사람 찾기
Sub if문배우기()
사원명 = Range("b2").Value
부서 = Range("c2").Value
If 사원명 = "김경록" Then
MsgBox ("해당 사원명은 김경록이 맞습니다.")
ElseIf 사원명 = "조세호" Then
MsgBox ("해당 사원명은 조세호가 맞습니다.")
Else
MsgBox ("해당 사원명은 김경록/조세호가 아닙니다.")
End If
End Sub
반응형
2. For문 - n번 반복하고 싶을때 사용
Sub For문배우기()
For 반복범위 = 1 To 1000
Range("F" & 반복범위).Select
Selection.Value = "반복" & 반복범위
Next
End Sub
◆ 코드 설명
1) Range("F1"&반복범위).Select : F1 셀을 선택함
2) Selection.Value = "A" : 선택된 셀에 A를 입력함
반응형
3. While문 - 조건에 맞을때까지 반복하고 싶을때 사용
i =0
Do While(i<5)
Debug.print("안녕!")
i = i + 1
Loop
◆ 코드 설명
1) Debug.print("안녕!") : 개발용 실행창(Ctrl+G)에서 "안녕!" 출력
반응형