2016-09-02 3 views
-2

). 달 이름을 정수로 변환하는 빠른 방법이 있습니까? 따라서 정수는 항상 1-12 사이이며 1 월 = 1, 12 월 = 12입니다.VBA에서 월 이름을 정수로 변환합니다 (예 : 1 월 1 일부터 8 월 8 일로

이 사용되는 시나리오는 다음과 같습니다

내가 잰 2016대로 사이의 영업 달 클라이언트가 계산하고자 올해를 계산하는 VBA를했다. (그러므로 현재 달 필요하지 않음)

내 생각은 클라이언트가 VBA를 실행하고 원하는 달을 문자열에 넣으면 입력 상자가있는 것입니다.

나는 클라이언트에게 숫자로 변환하도록 요청할 수 있다고 생각하지만 많은 번거 로움없이 할 수 있다면 궁금하다.

설명해 드리겠습니다.

감사합니다,

+0

이 사전을 사용을? 그렇지 않은 경우 구체적인 문제를 명확히하거나 세부 정보를 추가하여 필요한 정보 (즉, 실제로 무엇을하려고하는지, * 왜 *)를 강조하십시오. 솔루션이 사용자가 생각하는 것과 다를 수 있습니다. 현재 작성된 내용이므로 귀하가 원하는 내용을 정확하게 말하기는 어렵습니다. –

+3

'Application.Match (monthhere, Array ("January", "February", "March", ..., "December"), 0)' –

+0

또한 'Enum'을 사용할 수도 있습니다. 길 아래에서 툴벨트를 사용하는 것이 좋습니다. 여기에 좋은 페이지가 요약되어 있습니다. http://www.cpearson.com/excel/Enums.aspx –

답변

4

이 인식 로케일 것이 아니라, 당신에게 요점 제공해야합니다 :

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

감사합니다! 이것은 영리하다. – YLS

관련 문제