반응형
VBA에서 “DateDiff” 함수는 두 날짜 사이의 차이를 계산하는데 사용합니다. 함수는 두 날짜 간의 차이를 초, 분, 시간, 일, 월, 년 등 다양한 단위로 반환할 수 있습니다. 이처럼 “DateDiff” 함수를 사용하면 두 날짜 사이의 차이를 다양한 단위로 쉽게 계산할 수 있습니다.
◎ 1. 구문 |
“DateDiff” 함수의 구문은 다음과 같습니다.
DateDiff(interval, date1, date2, [firstdayofweek], [firstweekofyear]) l “interval”: 반환되는 시간 간격의 단위를 지정합니다. 예를 들어, "d"는 일수를, "h"는 시간을, "m"는 분을, "s"는 초를 의미합니다. l “date1”, “date2”: 차이를 계산할 두 날짜입니다. l “firstdayofweek”(선택적): 주의 첫 번째 날을 지정합니다. 생략하면 기본값은 일요일입니다. l “firstweekofyear”(선택적): 연도의 첫 번째 주를 지정합니다. 생략하면 기본값은 1월 1일을 포함하는 주입니다. |
◎ 2. 일수 차이 계산 예제 |
예제에서는 2023년 12월 1일부터 2023년 12월 31일까지의 일수 차이를 “DateDiff” 함수로 계산합니다. 실행 결과, 메시지 박스에는 "30"이 출력됩니다.
Sub DateDiffExample()
Dim startDate As Date
Dim endDate As Date
startDate = "2023-12-1"
endDate = "2023-12-31"
MsgBox DateDiff("d", startDate, endDate)
End Sub
◎ 3. 월수 차이 계산 예제 |
예제에서는 2023년 1월 1일부터 2023년 12월 31일까지의 월수 차이를 “DateDiff” 함수로 계산합니다. 실행 결과, 메시지 박스에는 "11"이 출력됩니다.
Sub DateDiffExample()
Dim startDate As Date
Dim endDate As Date
startDate = "2023-1-1"
endDate = "2023-12-31"
MsgBox DateDiff("m", startDate, endDate)
End Sub
◎ 4. “firstdayofweek”와 “firstweekofyear” 인수 사용 예제 |
예제에서는 2023년 1월 1일부터 2023년 12월 31일까지의 주수 차이를 “DateDiff” 함수로 계산하되, 주의 첫 번째 날을 월요일로, 연도의 첫 번째 주를 1월 1일을 포함하는 주로 지정합니다. 실행 결과, 메시지 박스에는 "52"를 출력합니다.
Sub DateDiffExample()
Dim startDate As Date
Dim endDate As Date
startDate = "2023-1-1"
endDate = "2023-12-31"
MsgBox DateDiff("ww", startDate, endDate, vbMonday, vbFirstJan1)
End Sub
반응형
'엑셀(Excel) > VBA' 카테고리의 다른 글
엑셀 VBA 반복문 For Next 문 사용하기 (0) | 2024.05.16 |
---|---|
엑셀 VBA 연도, 월, 일로 날짜를 생성하는 함수 DateSerial (0) | 2024.05.09 |
엑셀(VBA) Hour, Minute, Second 시간에서 시, 분, 초 추출 (0) | 2024.05.04 |
엑셀(VBA) Year, Month, Day 함수 연도, 월, 일 추출 (0) | 2024.05.04 |
엑셀 VBA 통화 형식 지정 함수 FormatCurrency 사용하기 (0) | 2024.05.02 |
엑셀 VBA 함수 Join 배열 합치기 (1) | 2024.05.01 |
엑셀 VBA 숫자를 문자열로 바꾸는 여러가지 방법 (1) | 2024.04.27 |
엑셀 VBA 문자열 분할 함수 Split 사용하기 (1) | 2024.04.21 |