로그 파일에 로그 메시지와 시간을 기록하는데 초보다 더 상세한 단위로 기록을 하고 싶어져서 찾아보니 출처에 방법이 나와 있군요.
Timer 함수가 자정 이후의 시간을 1초 미만의 소수 단위로 반환하니까 이를 Format해서 기록하면 됩니다.
다음과 같이 작성하면 되겠네요
Private Sub Log(ByVal szLog As String)
Print #1, Format(Time, "hh:mm:ss.") & Right(Format(Timer, "#0.000 "), 4) & szLog
End Sub
Print #1, Format(Time, "hh:mm:ss.") & Right(Format(Timer, "#0.000 "), 4) & szLog
End Sub
'Office > VBA' 카테고리의 다른 글
VBA에서 16진수를 10진수로 바꾸는 간단한 방법 (0) | 2016.08.29 |
---|---|
VBA 한 줄에 변수 여러개 선언 (0) | 2016.07.23 |
VBA에서 상수에 따라 크기가 변하는 배열 선언 불가 (0) | 2016.06.06 |
VBA 투명 그림 사용하기 (0) | 2014.10.03 |
VBA에서 Enumeration 타입 사용하기 (0) | 2014.09.28 |