excel - 将月份名称转换为数字

Question

我有填充了月份的下拉框。选择月份后，我想将其转换为月份数字，是否有函数可以执行此操作？

例如。九月 = 9

Answer 1

另一种方式

Excel 公式

=MONTH(1&A1)

VBA

Sub Sample()
    Dim MonthNm As String
    MonthNm = "September"
    Debug.Print Month(DateValue("01 " & MonthNm & " 2012"))
End Sub

或

Sub Sample()
    Dim MonthNm As String
    MonthNm = "September"
    Debug.Print Application.Evaluate("=MONTH(1&" & Chr(34) & MonthNm & Chr(34) & ")")
End Sub

替换