在VBA中将月份名称转换为整数，例如，从1月1日到8月8日

Question

是否有将月份名称转换为整数的快捷方法？所以整数总是在1-12之间，1月= 1，12月= 12。

使用的方案是：

我制作了一个vba，用于计算2016年1月至今年客户想要计算的月份之间的销售额。 （所以当前月份没有必要）

我的想法是在客户端运行VBA后有一个输入框，并将所需的月份放在字符串中。

我知道我可以要求客户将其转换为数字，但我很好奇是否可以毫不费力地完成。

我希望这可以解释。

谢谢，

Answer 1

这不是语言环境，但应该给你一个要点：

Public Function MonthNumber(test As String) As Integer
    MonthNumber = DatePart("M", test & "/13/2016")
End Function