Vba:날짜에서 월 이름을 얻는 방법

VBA에서 MonthName 함수를 사용하여 Excel의 날짜에서 월 이름을 가져올 수 있습니다.

실제로 이 기능을 사용하는 일반적인 방법은 다음과 같습니다.

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i) = MonthName(Month(Range(" A " & i)))
Next i

End Sub

이 특정 매크로는 A2:A11 범위에서 각 날짜의 월 이름을 찾고 C2:C11 범위의 해당 셀에 이러한 이름을 표시합니다.

다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.

예: VBA를 사용하여 날짜에서 월 이름을 얻는 방법

서로 다른 날짜에 회사의 매출에 대한 정보가 포함된 다음과 같은 데이터 세트가 Excel에 있다고 가정합니다.

Date 열의 각 셀에 대한 월 이름을 얻고 싶다고 가정해 보겠습니다.

이를 위해 다음 매크로를 생성할 수 있습니다:

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i)= MonthName(Month(Range(" A " & i)))
Next i

End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

C 열에는 A 열의 각 해당 날짜에 대한 월 이름이 포함되어 있습니다.

대신 약식 월 이름을 반환하려면 다음과 같이 MonthName 함수에서 선택적 True 인수를 사용할 수 있습니다.

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i)= MonthName(Month(Range(" A " & i)), True )
Next i

End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

이제 C열에는 A열에서 일치하는 각 날짜의 약식 월 이름이 포함됩니다.

추가 리소스

다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA에서 날짜를 비교하는 방법
VBA에서 문자열을 날짜로 변환하는 방법
VBA에서 두 날짜 사이의 일수를 계산하는 방법