Excel 매크로 : "yyyy-MM-dd hh:mm:ss" 형식으로 타임스탬프를 가져오려면 어떻게 해야 합니까?

Excel 매크로 : "yyyy-MM-dd hh:mm:ss" 형식으로 타임스탬프를 가져오려면 어떻게 해야 합니까?

사용 중DateTime.Now현재 타임스탬프를 표시할 수 있습니다.

타임스탬프는 "dd-MM-yyyy hh:mm:ss" 형식으로 표시됩니다.

대신 "yyyy-MM-dd hh:mm:ss" 형식으로 타임스탬프를 가져오려면 어떻게 해야 합니까?

사용:format(now(), "yyyy-MM-dd hh:mm:ss")

DateTime.Now데이터 유형의 값을 반환합니다.Date날짜 변수는 컴퓨터에 설정된 짧은 날짜 형식 및 시간 형식에 따라 날짜를 표시합니다.

유효한 날짜 형식으로 표시할 수 있도록 문자열 형식을 지정할 수 있습니다.Format다른 답변에 언급된 기능

Format(DateTime.Now, "yyyy-MM-dd hh:mm:ss")

Format(Now(), "yyyy-MM-dd hh:mm:ss")

일부 코드 사용자의 언어 설정 형식이 다를 경우 작동하지 않을 수 있습니다.따라서 저는 언어에 관계없이 "yyymmddhhMMSS" 형식으로 타임스탬프를 제공하는 다음 코드를 사용합니다.

Function TimeStamp()
Dim iNow
Dim d(1 To 6)
Dim i As Integer


iNow = Now
d(1) = Year(iNow)
d(2) = Month(iNow)
d(3) = Day(iNow)
d(4) = Hour(iNow)
d(5) = Minute(iNow)
d(6) = Second(iNow)

For i = 1 To 6
    If d(i) < 10 Then TimeStamp = TimeStamp & "0"
    TimeStamp = TimeStamp & d(i)
    If i = 3 Then TimeStamp = TimeStamp & " "
Next i

End Function

이것은 나에게 가장 효과적이었습니다.

        Cells(partcount + 5, "N").Value = Date + Time
        Cells(partcount + 5, "N").NumberFormat = "mm/dd/yy hh:mm:ss AM/PM"

이 형식 yyyy-mm-ddhh를 복사하여 붙여넣습니다.MM:유형 아래에서 세관 범주를 클릭하여 셀 형식을 지정합니다.

워크북 경로 저장 중 타임스탬프, ":변경해야 합니다."를 사용했습니다.:" -> ".그 말은 내가 확장자를 다시 추가해야 한다는 것을 의미합니다."xlsx".

wb(x).SaveAs ThisWorkbook.Path & "\" & unique(x) & " - " & Format(Now(), "mm-dd-yy, hh.mm.ss") & ".xlsx"

이렇게 쉽게 작동할 수 있습니다. 원하는 위치를 선택하십시오. 이 경우 D3를 선택합니다.

Sheets("Put your Sheet's name here").Range("D3") = Now

예를 들어, 내 시트의 이름은Sources

Sheets("Sources").Range("D3") = Now

포맷 기능을 사용합니다.

Format(Date, "yyyy-mm-dd hh:MM:ss")

언급URL : https://stackoverflow.com/questions/5457069/excel-macro-how-can-i-get-the-timestamp-in-yyyy-mm-dd-hhmmss-format