VBA 날짜 및 시간과 관련된 함수들
In this Article
이 튜토리얼에서는 VBA의 날짜와 시간에 대한 함수들을 알아봅니다.
VBA Date 함수
Date 함수를 사용하여 현재 날짜를 반환할 수 있습니다.
Date 함수의 구문은 Date()입니다. 인수가 없습니다.
다음 코드는 날짜 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDateFunction()
Dim theDate As Date
theDate = Date()
Debug.Print theDate
End Sub직접 실행 창에 표시되는 결과는 다음과 같습니다:
VBA Now 함수
Now 함수를 사용하여 현재 날짜와 시간을 반환할 수 있습니다.
Now 함수의 구문은 Now()입니다. 인수가 없습니다.
다음 코드는 Now 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheNowFunction()
Dim theDate As Date
theDate = Now()
Debug.Print theDate
End Sub결과는 다음과 같습니다:
VBA Time 함수
Time 함수를 사용하여 현재 시간을 반환할 수 있습니다.
시간 함수의 구문은 Time()입니다. 인수가 없습니다.
다음 코드는 Time 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheTimeFunction()
Dim theTime As Date
theTime = Time()
Debug.Print theTime
End Sub결과는 다음과 같습니다:
VBA DateAdd 함수
DateAdd 함수를 사용하여 날짜 또는 시간에 날짜/시간 간격을 더할 수 있으며, 이 함수는 결과값으로 날짜 또는 시간을 반환합니다.
DateAdd 함수의 구문은 다음과 같습니다:
DateAdd(Interval, Number, Date) :
- Interval – 간격의 유형을 지정하는 문자열입니다. 다음 값 중 하나 일 수 있습니다:
“d” – 일
“ww” – 주
“w” – 요일
“m” – 월
“q” – 분기
“yyyy” – 연도
“y” – 일
“h” – 시간
“n” – 분
“s” – 초
- Number – 기준 날짜 또는 기준 시간에 추가할 수 입니다.
- Date – 기준 날짜 또는 기준 시간.
참고: 코드에서 날짜를 사용할 때는 # 또는 따옴표로 묶어야 합니다.
다음 코드는 DateAdd 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDateAddFunction()
Dim laterDate As Date
laterDate = DateAdd("m", 10, "11/12/2019")
Debug.Print laterDate
End Sub결과는 다음과 같습니다:
VBA DateDiff 함수
DateDiff 함수를 사용하여 지정된 시간 간격을 기준으로 두 날짜의 차이를 구할 수 있습니다.
DateDiff 함수의 구문은 다음과 같습니다:
DateDiff(Interval, Date1, Date2, [Firstdayofweek], [Firstweekofyear]):
- Interval – 간격 유형을 지정하는 문자열입니다. 다음 값 중 하나 일 수 있습니다:
“d” – 일
“ww” – 주
“w” – 일
“m” – 월
“q” – 분기
“yyyy” – 연도
“y” – 일
“h” – 시간
“n” – 분
“s” – 초
- Date1 – 두 날짜 중 이른 날짜
- Date2 – 두 날짜 중 늦은 날짜
- Firstdayofweek (선택사항) – 함수가 주의 첫 번째 날로 사용할 요일을 지정하는 상수입니다. 비어있을 경우 일요일이 주의 첫번째 요일로 사용됩니다. Firstdayofweek는 다음 값 중 하나를 사용할 수 있습니다:
-vbSunday – 일요일을 주의 첫 번째 날로 사용합니다.
-vbMonday – 월요일을 주의 첫 번째 날로 사용합니다.
-vbTuesday – 화요일을 주의 첫 번째 날로 사용합니다.
-vbWednesday – 수요일을 주의 첫 번째 날로 사용합니다.
-vbThursday – 목요일을 주의 첫 번째 날로 사용합니다.
-vbFriday – 금요일을 주의 첫 번째 날로 사용합니다.
-vbSaturday – 토요일을 주의 첫 번째 날로 사용합니다.
-vbUseSystemDayOfTheWeek – 시스템 설정에서 지정한 첫 번째 요일을 사용합니다.
- Firstweekofyear (선택사항) – 연도의 첫 번째 주를 지정하는 상수입니다. 비워두면 1월 첫째 주가 연도의 첫 번째 주로 사용됩니다. Firstweekofyear는 다음 값 중 하나일 수 있습니다:
-vbFirstJan1 – 1월 1일이 포함된 주를 사용합니다.
-vbFirstFourDays – 4일 이상이 포함된 첫 번째 주를 사용합니다.
-vbFirstFullWeek – 한 주 전체가 1월에 포함된 첫 번째 주를 사용합니다.
-vbSystem – 시스템 설정에 지정된 대로 연도의 첫 번째 주를 사용합니다.
다음 코드는 DateDiff 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDateDiffFunction()
Dim theDifferenceBetweenTwoDates As Long
theDifferenceBetweenTwoDates = DateDiff("q", "11/11/2010", "10/12/2012")
Debug.Print theDifferenceBetweenTwoDates
End Sub결과는 다음과 같습니다:
VBA DatePart 함수
DatePart 함수를 사용하여 주어진 날짜의 일부(일, 주, 분기, 월 등)를 반환할 수 있습니다.
DatePart 함수의 구문은 다음과 같습니다:
DatePart(Interval, Date,[Firstdayofweek], [Firstweekofyear]) :
- Interval – 반환할 날짜의 일부를 지정하는 문자열입니다. 다음 값 중 하나 일 수 있습니다:
“d” – 일
“ww” – 주
“w” – 주일(1~7)
“m” – 월
“q” – 분기
“yyyy” – 연도
“y” – 일(1~365)
“h” – 시간
“n” – 분
“s” – 초
- Date – 날짜 입력값
- Firstdayofweek (선택사항) – 함수가 주의 첫 번째 날로 사용할 요일을 지정하는 상수입니다. 비어있을 경우 일요일이 주의 첫번째 요일로 사용됩니다. Firstdayofweek는 다음 값 중 하나를 사용할 수 있습니다:
-vbSunday – 일요일을 주의 첫 번째 날로 사용합니다.
-vbMonday – 월요일을 주의 첫 번째 날로 사용합니다.
-vbTuesday – 화요일을 주의 첫 번째 날로 사용합니다.
-vbWednesday – 수요일을 주의 첫 번째 날로 사용합니다.
-vbThursday – 목요일을 주의 첫 번째 날로 사용합니다.
-vbFriday – 금요일을 주의 첫 번째 날로 사용합니다.
-vbSaturday – 토요일을 주의 첫 번째 날로 사용합니다.
-vbUseSystemDayOfTheWeek – 시스템 설정에서 지정한 요일을 사용합니다.
- Firstweekofyear (선택사항) – 연도의 첫 번째 주를 지정하는 상수입니다. 비워두면 1월 첫째 주가 연도의 첫 번째 주로 사용됩니다. Firstweekofyear는 다음 값 중 하나일 수 있습니다:
-vbFirstJan1 – 1월 1일이 포함된 주를 사용합니다.
-vbFirstFourDays – 1월 날짜 4일 이상이 포함된 첫 번째 주를 사용합니다.
-vbFirstFullWeek – 한 주 전체가 1월에 포함된 첫 번째 주를 사용합니다.
-vbSystem – 시스템 설정에 지정된 대로 연도의 첫 번째 주를 사용합니다.
다음 코드는 DatePart 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDatePartFunction()
Dim thePartOfTheDate As Integer
thePartOfTheDate = DatePart("yyyy", "12/12/2009")
Debug.Print thePartOfTheDate
End Sub결과는 다음과 같습니다:
VBA DateSerial 함수
VBA DateSerial 함수는 연도, 월, 일을 입력 인자로 하여 날짜를 반환합니다.
DateSerial 함수의 구문은 다음과 같습니다:
DateSerial(Year, Month, Day) :
- Year – 연도를 나타내는 100~9999 사이의 정수 값입니다.
- Month – 월을 나타내는 정수 값입니다.
- Day – 일을 나타내는 정수 값입니다.
다음 코드는 DateSerial 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDateSerialFunction()
Dim theDate As Date
theDate = DateSerial(2010, 11, 10)
Debug.Print theDate
End Sub결과는 다음과 같습니다:
VBA DateValue 함수
DateValue 함수는 날짜의 문자열 표현이 주어지면 날짜(Date 유형 변수)를 반환합니다.
DateValue 함수의 구문은 다음과 같습니다:
DateValue(Date) :
- Date – 날짜를 나타내는 문자열입니다.
다음 코드는 DateValue 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDateValueFunction()
Dim theDate As Date
theDate = DateValue("2022년 10월 29일")
Debug.Print theDate
End Sub결과는 다음과 같습니다:
VBA Day 함수
Day 함수를 사용하여 입력 날짜의 일을 반환할 수 있습니다.
Day 함수의 구문은 다음과 같습니다:
Day(Date_value) :
- Date_value – 날짜 값
다음 코드는 Day 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheDayFunction()
Dim theDay As Integer
theDay = Day("10/12/2010")
Debug.Print theDay
End Sub결과는 다음과 같습니다:
VBA Hour 함수
Hour 함수를 사용하여 입력한 시간의 시 값을 반환할 수 있습니다.
Hour 함수의 구문은 다음과 같습니다:
Hour(Time) :
- Time – 시간
다음 코드는 시간 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheHourFunction()
Dim theHour As Integer
theHour = Hour("2:14:17 AM")
Debug.Print theHour
End Sub결과는 다음과 같습니다:
VBA Minute 함수
Minute 함수를 사용하여 입력한 시간의 분 값을 반환할 수 있습니다.
Minute 함수의 구문은 다음과 같습니다:
Minute(Time) :
- Time – 시간
다음 코드는 Minute 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheMinuteFunction()
Dim theMinuteValue As Integer
theMinuteValue = Minute("2:14:17 AM")
Debug.Print theMinuteValue
End Sub결과는 다음과 같습니다:
VBA Second 함수
Second 함수를 사용하여 입력 시간의 초 값을 반환할 수 있습니다.
Second 함수의 구문은 다음과 같습니다:
Second(Time) :
- Time – 시간
다음 코드는 Second 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheSecondFunction()
Dim theSecondValue As Integer
theSecondValue = Second("2:14:17 AM")
Debug.Print theSecondValue
End Sub결과는 다음과 같습니다:
VBA Month 함수
Month 함수를 사용하여 입력 날짜의 월을 반환할 수 있습니다.
Month 함수의 구문은 다음과 같습니다:
Month(Date_value) :
- Date_value – 날짜
다음 코드는 월 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheMonthFunction()
Dim theMonth As Integer
theMonth = Month("11/18/2010")
Debug.Print theMonth
End Sub결과는 다음과 같습니다:
VBA MonthName 함수
MonthName 함수를 사용하여 숫자로 입력된 월을 이름으로 변환할 수 있습니다.
MonthName 함수의 구문은 다음과 같습니다:
MonthName(Number_of_month, [Abbreviate]) :
- Number_of_month – 숫자 형식의 월. 1에서 12 사이의 정수값.
- Abbreviate (선택사항) – 월 이름을 약어로 사용할지 여부를 지정합니다(영문을 기본값으로 사용할 경우만 해당합니다). 비워두면 기본값인 False가 사용됩니다.
Sub UsingTheMonthNameFunction()
Dim theMonthName As String
theMonthName = MonthName(12, False)
Debug.Print theMonthName
End Sub결과는 다음과 같습니다:
VBA TimeSerial 함수
TimeSerial 함수는 시, 분, 초를 입력값으로 받아 시간을 반환합니다.
TimeSerial 함수의 구문은 다음과 같습니다:
TimeSerial(Hour, Minute, Second) :
- Hour – 시간 값을 나타내는 0~23 사이의 정수 값입니다.
- Minute – 분 값을 나타내는 0~59 사이의 정수 값입니다.
- Second – 초 값을 나타내는 0~59 사이의 정수 값입니다.
다음 코드는 TimeSerial 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheTimeSerialFunction()
Dim theTime As Date
theTime = TimeSerial(1, 10, 15)
Debug.Print theTime
End Sub결과는 다음과 같습니다:
VBA TimeValue 함수
TimeValue 함수는 날짜 또는 시간의 문자열 표현에서 시간을 반환합니다.
TimeValue 함수의 구문은 다음과 같습니다:
TimeValue(Time) :
- Time – 문자열 형식의 시간
다음 코드는 TimeValue 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheTimeValueFunction()
Dim theTime As Date
theTime = TimeValue("22:10:17")
Debug.Print theTime
End Sub결과는 다음과 같습니다:
VBA Weekday 함수
Weekday 함수를 사용하여 입력 날짜의 요일을 나타내는 1~7 사이의 정수를 반환할 수 있습니다.
Weekday 함수의 구문은 다음과 같습니다:
Weekday(Date, [Firstdayofweek]) :
- Date – 날짜
- Firstdayofweek (선택사항) – 함수가 주의 첫 번째 날로 사용할 요일을 지정하는 상수입니다. 비어있을 경우 일요일이 주의 첫 번째 날로 사용됩니다.
-vbSunday – 일요일을 주의 첫 번째 날로 사용합니다.
-vbMonday – 월요일을 주의 첫 번째 날로 사용합니다.
-vbTuesday – 화요일을 주의 첫 번째 날로 사용합니다.
-vbWednesday – 수요일을 주의 첫 번째 날로 사용합니다.
-vbThursday – 목요일을 주의 첫 번째 날로 사용합니다.
-vbFriday – 금요일을 주의 첫 번째 날로 사용합니다.
-vbSaturday – 토요일을 주의 첫 번째 날로 사용합니다.
-vbUseSystemDayOfTheWeek – 시스템 설정에서 지정한 요일을 사용합니다.
다음 코드는 Weekday 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheWeekdayFunction()
Dim theWeekDay As Integer
theWeekDay = Weekday("11/20/2019")
Debug.Print theWeekDay
End Sub결과는 다음과 같습니다:
VBA WeekdayName 함수
WeekdayName 함수를 사용하여 입력된 요일 번호를 요일 이름으로 변환할 수 있습니다.
WeekdayName 함수의 구문은 다음과 같습니다:
WeekdayName(Weekday, [Abbreviate], [Firstdayoftheweek]) :
- Weekday – 1에서 7 사이의 정수값 입니다.
- Abbreviate (선택사항) -요일 이름을 축약할지 여부를 지정합니다. 비워두면 기본값인 False가 사용됩니다.
- Firstdayofweek (선택사항) – 함수가 주의 첫 번째 날로 사용할 요일을 지정하는 상수입니다. 비어 있으면 일요일이 주의 첫 번째 날로 사용됩니다. Firstdayofweek는 다음 값 중 하나를 사용할 수 있습니다:
-vbSunday – 일요일을 주의 첫 번째 날로 사용합니다.
-vbMonday – 월요일을 주의 첫 번째 날로 사용합니다.
-vbTuesday – 화요일을 주의 첫 번째 날로 사용합니다.
-vbWednesday – 수요일을 주의 첫 번째 날로 사용합니다.
-vbThursday – 목요일을 주의 첫 번째 날로 사용합니다.
-vbFriday – 금요일을 주의 첫 번째 날로 사용합니다.
-vbSaturday – 토요일을 주의 첫 번째 날로 사용합니다.
-vbUseSystemDayOfTheWeek – 시스템 설정에서 지정한 요일을 사용합니다.
Sub UsingTheWeekdayNameFunction()
Dim theWeekdayName As String
theWeekdayName = WeekdayName(4)
Debug.Print theWeekdayName
End Sub결과는 다음과 같습니다:
VBA Year 함수
Year 함수를 사용하여 입력 날짜의 연도를 반환할 수 있습니다.
Year 함수의 구문은 다음과 같습니다:
Year(Date_value) :
- Date_value – 날짜
다음 코드는 Year 함수를 사용하는 방법을 보여줍니다:
Sub UsingTheYearFunction()
Dim theYear As Integer
theYear = Year("11/12/2010")
Debug.Print theYear
End Sub결과는 다음과 같습니다:
VBA에서 날짜 비교하기
VBA에서 >, <, = 연산자를 사용하여 날짜를 비교할 수 있습니다. 다음 코드는 VBA에서 두 날짜를 비교하는 방법을 보여줍니다.
Sub ComparingDates()
Dim dateOne As Date
Dim dateTwo As Date
dateOne = "10/10/2010"
dateTwo = "11/11/2010"
If dateOne > dateTwo Then
Debug.Print "dateOne 이 늦은 날짜입니다"
ElseIf dateOne = dateTwo Then
Debug.Print "두 날짜는 동일합니다"
Else
Debug.Print "dateTwo 가 더 늦은 날짜입니다"
End If
End Sub
날짜의 문자열 서식에 대한 자세한 내용은 이 튜토리얼을 참조하세요.
