office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

VBA判斷Excel單元格的數據類型

2020-04-23 08:00:00
zstmtony
原創
3064

VBA判斷Excel單元格的數據類型


Public Function gf_CheckCellType(cel As Range) As String

    Dim strType As String



    Select Case True

    Case Application.IsText(cel)

        strType = "文本"

    Case Application.IsLogical(cel)

        strType = "邏輯值"

    Case IsEmpty(cel)

        strType = "空值"

    Case IsNumeric(cel)

        strType = "數值"

    Case Application.IsErr(cel)

        strType = "錯誤值"

    Case IsDate(cel)

        strType = "日期"

    End Select

    MsgBox "[" & cel.Address & "] 的數據類型爲:" & strType

    gf_CheckCellType = strType

End Function


分享