VBA 急急急!怎么从inputbox接收过来的数据,首先判断它是年份,然后怎么知道是哪一年?

2025-01-05 05:53:34
推荐回答(2个)
回答1:


Sub test()
    Dim x
    x = Application.InputBox("输入年月日", , "2013-2-2")
    If VBA.IsDate(x) = True Then
        MsgBox "年份为:" & VBA.Year(x)
    End If
End Sub

回答2:

首先isdate判断是不是日期值, 然后用format取YYYY即可