반응형
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 영어 첫 글자만 대문자로 변경하는 방법 (2) | 2024.11.20 |
---|---|
엑셀 VBA 영역을 입력받는 RefEdit 컨트롤 사용하는 방법 (0) | 2024.11.11 |
엑셀 VBA 데이터 입력하는 텍스트 박스(Text Box) 사용하는 방법 (4) | 2024.11.02 |
엑셀 VBA 셀을 병합하는 Merge 함수 사용하기 (1) | 2024.10.31 |
엑셀 VBA 작은 따옴표, apostrophe 일괄적으로 삭제하는 방법 (1) | 2024.10.25 |
엑셀 VBA 변수 생명 주기 지정하는 방법, Static 정적 변수 사용법 (1) | 2024.10.23 |
엑셀 VBA 개별 파일 시트 복사해서 하나의 파일에 통합하기 (2) | 2024.10.23 |
엑셀 VBA 여러 시트 데이터 합치기 (18) | 2024.10.15 |