将月份名称转换为数字

我有填充月份的下拉框。当选择一个月份时，我想将它转换为月份数字是否有可以做到这一点的功能？将月份名称转换为数字

例如，九月= 9

2012-08-10 HL8

另一种方式

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

替换

来源

2012-08-10 04:07:25

+1的完整工作！ – 2012-08-10 13:51:15

尝试......

=MONTH(DATEVALUE(A1&"1"))

凡A1单元包含月份名称。

来源

2012-08-10 03:59:59 SiB

+ 1对于Excel公式:) – 2012-08-10 04:13:13

昨天我在看你的个人资料，当我看到这个问题，我很相信你会是第一个回答...但是当它不回应;我想让我试试看。谢谢！！ – SiB 2012-08-10 05:23:25

我已经知道了答案，但想在测试前三次测试（我必须说出一种奇怪的习惯）:) – 2012-08-10 05:25:38

Sub month() 

Dim monthh As Integer 

monthh = month(Date) 

MsgBox monthh 

End Sub

试试这个。

来源

2014-02-12 00:17:34

另一个Excel公式，其中A1是小区ID与一个月名称：

=TEXT(DATEVALUE(A1&" 1"), "m")

来源

2016-02-29 16:20:55 ThiamTeck

该解决方案并没有为我（Excel 2010中）工作，我不得不缩短一个月名3个字符，并添加在缩短的字符串前的一天数字。

=MONTH(1&LEFT(A1;3))

来源

2017-01-05 09:55:56 Alexus

将月份名称转换为数字

回答

相关问题