반응형
VBA에서 Now 함수는 현재 날짜와 시간을 반환하는 함수입니다. 날짜와 시간 형식의 값을 생성하여 현재 날짜와 시간을 나타냅니다. 이 함수를 사용하면 현재 날짜와 시간을 쉽게 가져와서 시간과 관련된 작업을 수행할 수 있습니다. 아래에서 [Now] 함수의 개념, 구문, 예제, 실행 결과 및 소스 설명을 설명하겠습니다.
◎ 구문 |
함수는 인수를 가지지 않습니다.
Now |
◎ 예제 1: 현재 날짜와 시간 표시 |
예제에서는 [Now] 함수를 사용하여 현재 날짜와 시간을 가져옵니다. 현재 날짜와 시간을 변수에 저장한 다음 메시지 상자를 통해 날짜와 시간을 표시합니다.
Sub ShowCurrentDateTime()
Dim currentDateTime As Date
currentDateTime = Now
MsgBox "현재 날짜와 시간: " & currentDateTime, vbInformation, "날짜와 시간 표시"
End Sub
◎ 예제 2: 날짜와 시간 연산 |
예제에서는 [Now] 함수를 사용하여 현재 날짜와 시간을 가져온 다음, 3시간 후의 날짜와 시간을 계산합니다. [DateAdd] 함수를 사용하여 현재 날짜와 시간에 3시간을 더하여 미래 날짜와 시간을 계산하고 메시지 상자에 표시합니다.
Sub DateTimeOperations()
Dim currentDateTime As Date
currentDateTime = Now
Dim futureDateTime As Date
futureDateTime = DateAdd("h", 3, currentDateTime)
MsgBox "현재 날짜와 시간: " & currentDateTime & vbCrLf & _
"3시간 후 날짜와 시간: " & futureDateTime, vbInformation, "날짜와 시간 연산"
End Sub
◎ 예제 3: 날짜와 시간 형식 지정 |
예제에서는 [Now] 함수를 사용하여 현재 날짜와 시간을 가져온 다음, 원하는 형식으로 날짜와 시간을 표시합니다. [Format] 함수를 사용하여 날짜와 시간을 "yyyy-mm-dd hh:nn:ss AM/PM" 형식으로 변환하고 메시지 상자에 표시합니다.
Sub FormatDateTime()
Dim currentDateTime As Date
currentDateTime = Now
Dim formattedDateTime As String
formattedDateTime = Format(currentDateTime, "yyyy-mm-dd hh:nn:ss AM/PM")
MsgBox "현재 날짜와 시간: " & formattedDateTime, vbInformation, "날짜와 시간 형식 지정"
End Sub
Now 와 유사한 함수인 Date 가 있습니다. Date 는 아래 포스팅을 참고하세요.
https://mainia.tistory.com/7020
날짜를 연산하는 함수인 DateAdd 입니다. 아래 포스팅을 참고하세요.
https://mainia.tistory.com/7016
반응형
'엑셀(Excel) > VBA' 카테고리의 다른 글
엑셀 VBA 함수 StrComp 문자열 비교하기 (0) | 2023.11.24 |
---|---|
엑셀 VBA 함수 Str 숫자를 문자열로 변환하기 (0) | 2023.11.24 |
엑셀 VBA 함수 CDbl 부동 소수점으로 형변환하기 (2) | 2023.11.24 |
엑셀 VBA 함수 CInt 정수로 형변환하기 (2) | 2023.11.24 |
엑셀 VBA 함수 Date 현재 날짜 반환하기 (0) | 2023.11.22 |
엑셀 VBA 함수 InStr 문자열 내에서 특정 문자 또는 문자열 찾기 (0) | 2023.11.21 |
엑셀 VBA 함수 Format 이용해서 날짜, 시간, 숫자 형식 지정하기 (0) | 2023.11.21 |
엑셀 VBA 함수 DateAdd 날짜에 시간, 일 더하거나 빼기 (0) | 2023.11.21 |