vba 로 log 파일을 남기고 싶은데 정상적으로 동작했던 시간 이력을 알고 싶어요
안녕하세요 간만에 질문 이렇게 하나 남겨 보네요
요지는 이렇습니다
Sub works_To_Do()
'---------------------------------------------------------------
Realtime_chart_work '실시간 차트 함수 호출
'---------------------------------------------------------------
Application.OnTime Now + TimeValue("00:00:" & Sec & ""), "works_To_Do"
ActiveWorkbook.Save
LogFileSave
End Sub
sub LogFileSave
debug.print now '--------------- Sec 단위별로 Debug.print 가 디버깅 창에 출력됨
End Sub
위 코드에서 debug.print now
에 뿌려진 "직접실행" 창 내용을 Txt 파일로 저장하는 방법이 있을 거 같은데
그게 아니면
Sub LogFileSave()
Dim s As String
Dim n As Integer
n = FreeFile()
Open "D:\Test\log\log.txt" For Output As #n
s = Now
Debug.Print s ' write to immediate
Print #n, s ' write to file
Close #n
End Sub
이렇게 하면서 저장할때 기존 내용 이후 엔터치고 현 저장 시간을 계속 입력하는 방법 (현재 해당파일은 연속으로 실행시켜도 계속 기존내용 덮어 쓰네요)
두가지 방법 다 가르쳐주시면 금상첨화
감사합니다
번호 | 카테고리 | 제목 | 작성자 | 작성일 | 추천 | 조회 |
[📚진짜쓰는 실무엑셀] IT/오피스 '1위' 베스트셀러! 엑셀 공부, 이 교재로 마스터하세요! (313)
![]() ![]() |
![]() ![]() |
2022.02.03 | 572 | 600113 | ||
공지사항 | 문서서식 |
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐
(197)
오빠두엑셀
|
2021.10.28
|
추천 310
|
조회 34929
|
![]() ![]() |
2021.10.28 | 310 | 34929 |
78418 | 함수/공식 |
New [퀴즈] 텍스트 압축/변형하기
![]() ![]() ![]() |
![]() |
14:20 | - | 3 |
78416 | VBA |
New 시트보호된 상태에서 매크로 작동시 Range 클래스 중 Insert 메서드에 오류가 있습니다.
![]() ![]() |
![]() |
13:42 | - | 17 |
78414 | 파워쿼리/피벗 |
New 다른 엑셀 파일에서 필요한 값만 불러오는 방법
![]() ![]() |
![]() |
13:34 | - | 16 |
78413 | 함수/공식 |
New 경과주 구하는 수식 문의
![]() |
![]() |
13:19 | - | 14 |
78411 | 문서서식 |
New 숫자 문자인식 숫자변환하는 법
![]() ![]() |
![]() |
10:37 | - | 40 |
78410 | VBA |
New [매크로관련] 특정셀 자동증가하며, 연속출력할수 있을까요?
![]() ![]() |
![]() |
10:34 | - | 42 |
78408 | 문서서식 |
New 숫자 서식 변경하기
![]() ![]() |
![]() |
09:59 | - | 22 |
78407 | 기능/도구 |
New 원드라이브 MICROSOFT 365 사용중 공동작업시 필터
![]() ![]() |
![]() |
00:31 | - | 41 |
78402 | 함수/공식 |
New 괄호안의 시간:분 데이터를 분으로 합산하는 방법 질문드립니다.
![]() ![]() ![]() |
![]() |
2025.04.28 | - | 58 |
78400 | 함수/공식 |
New 2차배열에서 countif
![]() ![]() |
![]() |
2025.04.28 | - | 72 |
78399 | 함수/공식 |
New 한달의 마지막주 스케쥴 작성시 전주까지의 휴무 누적 합계 구하는 방법이 궁금합니다.
![]() ![]() ![]() |
![]() |
2025.04.28 | - | 44 |
78398 | VBA |
New VBA 매크로 여러 엑셀 파일에서 사용
(1)
![]() |
![]() |
2025.04.28 | - | 69 |
78396 | 함수/공식 |
New 직원별로 근태 합계를 확인하고 싶어요
![]() ![]() |
![]() |
2025.04.28 | - | 94 |
78395 | 함수/공식 |
New 특정 단어를 포함한 행 골라내는 방법에 대해 문의드립니다.
(3)
답변완료
![]() |
![]() |
2025.04.28 | - | 59 |
78392 | 함수/공식 |
New 도와주세요... ( 특정값에 해당하는 반 번호 찾아 목록만들기)
![]() ![]() ![]() |
![]() |
2025.04.28 | - | 66 |
78389 | 기능/도구 |
New 오빠두LIVE 196회 - 엑셀 프로젝트 관리 _ 일,주 바꾸는법
![]() ![]() |
![]() |
2025.04.28 | - | 58 |
78387 | 함수/공식 |
New 엑셀 관련 질문입니다. SUM과 IFERROR 입니다 ㅠ
(6)
![]() |
![]() |
2025.04.27 | - | 107 |
78382 |
New Excel 추세선 이상
![]() ![]() |
![]() |
2025.04.27 | - | 79 | |
78381 | 함수/공식 |
New 같은 이름 N 번째 데이터
![]() ![]() ![]() |
![]() |
2025.04.27 | 1 | 115 |
78380 | 함수/공식 |
New On Error Resume Next 문구를 삽입하는 위치는?
(2)
답변완료
![]() |
![]() |
2025.04.27 | - | 85 |
78376 | 함수/공식 |
New 지역별 증감금액 확인
![]() ![]() |
![]() |
2025.04.26 | - | 76 |
78374 | 함수/공식 |
New index를 활용한 조건에 맞는 금액을 찾는 방법
![]() ![]() ![]() |
![]() |
2025.04.26 | - | 93 |
78372 | 기능/도구 |
New 표서식 차이 문의
![]() ![]() |
![]() |
2025.04.25 | - | 65 |
78370 | 피벗테이블 |
New (피벗테이블) 2024년 2025년 판매 TOP10 비교데이터
![]() ![]() |
![]() |
2025.04.25 | - | 89 |
78369 | 구글시트 |
New 엑셀을 구글 시트와 연동하는 법
(1)
![]() |
![]() |
2025.04.25 | - | 71 |
78368 | 함수/공식 |
New 곱하기 계산시 0일때도 계산하고 싶습니다
![]() ![]() |
![]() |
2025.04.25 | - | 89 |
78366 |
New 엑셀 일정 범위 내 최대값 가져오기 함수식 문의 (조건 있음)
![]() ![]() |
![]() |
2025.04.25 | - | 64 | |
78358 |
New 파워포인트 글씨 굵게
(1)
![]() |
![]() |
2025.04.24 | - | 46 | |
78354 | 문서서식 |
New 구글스프레드시트 숨기기 질문이에요!
![]() ![]() |
![]() |
2025.04.24 | - | 63 |
78352 | 피벗테이블 |
New 여러 피벗테이블 하나의 슬라이서로 동작과 테이블간 관계 만들기 문의
![]() ![]() ![]() |
![]() |
2025.04.24 | - | 87 |
@밍장군 님 안녕하세요.
LogFileSave 명령문을 아래와 같이 변경해보세요.
@오빠두엑셀 님 해당 내용 실행하니까 의도한대로
debug.print "내용문구"
이런 데이터가 제일 위에 한줄만 남고 그담에는 안만들어 집니다
해당 함수는 ontime 을 써서 5초 단위로 생성을 하니까
매 5초 간격으로
debug.print "내용문구"
문구가 만들어 지는데 여기선 안되네요
@밍장군 님 죄송합니다. 명령문을 잘못 적어드렸네요.
아래 수정된 명령문을 적절히 실무에 적용해서 사용해보시면 될 듯 합니다.
답변이 도움이 되셨길 바랍니다.^^ 감사합니다.