VBA(Excel), 선택한 셀이 숫자인지 아닌지 확인하기

If IsNumeric(Selection) Then
    MsgBox "숫자입니다."
Else
    MsgBox "숫자가 아닙니다."
End If