Vba에서 dateserial 함수를 사용하는 방법(예제 포함)

VBA에서 DateSerial 함수를 사용하여 특정 일, 월, 연도의 날짜를 반환할 수 있습니다.

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

 SubUseDateSerial ()
    
Dim i As Integer

For i = 2 To 13
    Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
    
End Sub

이 특정 매크로는 C 열의 연도 값, B 열의 월 값, A 열의 일 값을 사용하여 D2:D13 범위의 날짜 값을 반환합니다.

다음 예제에서는 DateSerial 함수를 실제로 사용하는 방법을 보여줍니다.

예: VBA에서 DateSerial 함수를 사용하는 방법

다양한 날짜에 대한 일, 월, 연도를 표시하는 다음과 같은 Excel 열이 있다고 가정합니다.

각 행의 일, 월, 연도 값을 사용하여 D 열에 날짜 값을 표시한다고 가정합니다.

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

 SubUseDateSerial ()
    
Dim i As Integer

For i = 2 To 13
    Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
    
End Sub

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

D열에는 각각 A열, B열, C열의 일, 월, 연도 값을 사용하여 얻은 날짜 값이 표시됩니다.

참고 : VBA DateSerial 함수에 대한 전체 설명서는 여기에서 찾을 수 있습니다.

추가 리소스

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

VBA에서 날짜를 비교하는 방법
VBA에서 날짜를 주 번호로 변환하는 방법
VBA에서 두 날짜 사이의 일수를 계산하는 방법