Creative Commons License
Creative Commons License
Public Function 성별(num As Range)
     Dim a As String
     Dim sex As String
    a = Mid(num, 8, 1)
        If a = "1" Then
            sex = "남"
        ElseIf a = "2" Then
            sex = "여"
        Else
            sex = "불확실"
        End If
        성별 = sex
   End Function
신고

'学习 > My Study Excel' 카테고리의 다른 글

VBE 사용자 정의 함수 연습  (0) 2010.09.30
by nanasand 2010.09.30 17:14
| 1 |

티스토리 툴바