Is 함수는 지정된 변수 또는 값(Value)의 상태를 확인하는 결과값을 True 또는 False를 반환합니다.
예1) IsEmpty(Target)
If IsEmpty(Range("a12").Value) = True Then ' 타겟이 비어있으면...
....
End If
유사코드 : VBA에서 값의 유무를 확인하는 다른 방법
If Range("A12").Value <> "" Then ' 공백문자가 아니라면....
IsMissing 함수는 매개변수의 값을 확인합니다.
예2) IsMissing(Target)
If IsMissing(rngMargin) Then 'rngMargin(Varient 형 변수)범위가 지정되지 않았으면
Set rngMargin = Range("A1:A10") '범위를 지정해줍니다.
End If
IsDate 함수는 날짜 형식의 상태를 확인합니다.
예3) IsDate(Target)
Function 성별(ByVal 주민번호 As String)
If 생년월일(주민번호) <> "" Then
If Mid$(주민번호, 8, 1) Mod 2
Then
성별 =
"남자"
Else
성별 = "여자"
End If
End If
End Function
Function 생년월일(ByVal 주민번호 As String)
Dim vDate
If Not 주민번호 Like "######-#######"
Then
MsgBox
"입력형태(yymmdd-0000000)가 잘못되었습니다."
End
End If
vDate = Format(Left$(주민번호, 6),
"0000-00-00")
If Not IsDate(vDate) Then
MsgBox 생년월일 & " : 유효한 날짜가
아닙니다."
End
Else
생년월일 = CStr(CDate(vDate))
End If
End Function
Function 나이(ByVal 주민번호 As String)
나이 = "만 " & DateDiff("yyyy", 생년월일(주민번호),
Date) & "세"
End
Function