엑셀 VBA에서 파일을 수정하거나 저장하게 되면, 누가 작업을 했는지 알수있는 방법이 있나요?

VBA
작성자
엑셀입문
작성일
2020-03-31 12:00
조회
1378

안녕하세요 엑셀 입문해서 공부하던 도중 궁금증이 생겨 문의드립니다

 

간단하게 먼저 말씀드리면

엑셀파일을 수정하거나 저장했을때 다른시트나 다른 파일에서

누가 작업을 했는지 로그를 남기고 싶습니다.

구글링 해보니 sb writelog 를 사용하라고 되있는데 다른 내용은 확인은 안되고

사용법도 모르겠어서 이렇게 도움요청 드립니다.

 

아시는 분은 알려주세요 ㅠㅠ

전체 4

  • 2020-04-01 00:07

    안녕하세요?^^
    아래 명령문을 해당 통합문서 WorkBook 모듈에 붙여넣기 하신 뒤, 실행해보시겠어요?
    파일을 실행한 사용자명과 접속시간이 '실행로그' 시트에 차례대로 기록됩니다.
    아래 코드를 상황에 맞춰 적절히 수정 후 사용해보시기 바랍니다.
    예제파일 같이 첨부해드리니 확인해보시겠어요?^^

    Private Sub Workbook_Open()

    Dim r As Long

    With Sheet2
    r = .Cells(.http://Rows.Co" target="_blank">Rows.Count, 1).End(xlUp).Row + 1
    .Cells(r, 1).Value = Environ("Username")
    .Cells(r, 2).Value = Format(Now, "yyyy-mm-dd hh:mm:ss")
    MsgBox "현재 접속자: " & Environ("Username") & vbNewLine & Format(Now, "yyyy-mm-dd hh:mm:ss")
    End With

    End Sub

    제 답변이 도움이 되셨길 바랍니다.
    감사합니다.

    엑셀-로그-기록.png

    첨부파일 : 엑셀-접속로그-기록-예제.xlsm


    • 2020-10-14 05:02

      @오빠두엑셀 님 혹시 이거 추가로 어떤 변경이 있었는지도 기록할 수 있는 기능이 있을까요? 감사합니다!


      • 2020-10-15 04:00

        @Wendy 님 안녕하세요.

        어떤 변경이 기록되는 지는 상황마다 전체 명령문을 적어드리기는 어렵습니다만 WorkSheet_Change 이벤트를 사용하시면 됩니다.^^

        아래 명령문을 해당 시트모듈에 붙여넣기 한 뒤 셀의 내용을 변경하면 셀 주소와 시간이 메지시박스로 출력됩니다.

        Private Sub Worksheet_Change(ByVal Target As Range)
        MsgBox Target.Address & "변경" & vbNewLine & "시간: " & Now
        End Sub

        답변이 도움이 되셨길 바랍니다.


  • 2020-04-02 09:54

    감사합니다! 이제 누가 언제 접속해서 수정햇는지 알수 있을거 같애요ㅠㅠ너무감사합니다!!


전체 4,633
번호 카테고리 제목 작성자 작성일 추천 조회
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (8)
오빠두엑셀 | 2021.10.28 | 추천 12 | 조회 664
트로피 오빠두엑셀 2021.10.28 12 664
24099 함수/공식
New 입력한 값에 따라 IMAGE 자동입력 함수 문제 관련
유지연 | 00:11 | 추천 0 | 조회 5
유지연 00:11 0 5
24098 VBA
New 워드 Format(숫자, "#,###") (1)
argus | 2021.11.28 | 추천 0 | 조회 10
argus 2021.11.28 0 10
24097 VBA
New 각각 형식이 다른 여러 시트에서 원하는 값들만 가져와서 한 시트에 보기 쉽게 합치고 싶습니다. 첨부파일 (1)
축전 | 2021.11.28 | 추천 0 | 조회 12
축전 2021.11.28 0 12
24096 VBA
New 엑셀 재고관리툴 만들기 VBA영상 시청중 오류 발생관련 문의입니다. 첨부파일
가을전어 | 2021.11.28 | 추천 0 | 조회 7
가을전어 2021.11.28 0 7
24093 기능/도구
New 작업표시줄 클릭으로 클립보드에 복사 문제 관련
어루 | 2021.11.28 | 추천 0 | 조회 10
어루 2021.11.28 0 10
24091 VBA
New 도와주세요! 뭐가 문제인지 못찾겠습니다.
y**** | 2021.11.28 | 추천 0 | 조회 14
y**** 2021.11.28 0 14
24089 VBA
New 엑셀 vlookup vba 문의드립니다. (1)
ㅈㄱㄹ | 2021.11.28 | 추천 0 | 조회 16
ㅈㄱㄹ 2021.11.28 0 16
24088 함수/공식
New 개인별 회비 납부 현황에 따라 월별 납부액 결정 관련 함수 또는 VBA (미납, 매월 16일 이후 납부할 경우 월회비 10% 가산) 첨부파일
007 | 2021.11.28 | 추천 0 | 조회 25
007 2021.11.28 0 25
24081 함수/공식
New 영문주소를 한글주소로 변경 희망합니다. (1)
루s cos 개인대행 | 2021.11.28 | 추천 0 | 조회 21
루s cos 개인대행 2021.11.28 0 21
24072 VBA
New 수식이 있는 데이터에서 매크로를 사용하여 다른시트에 결과값만 붙여넣고 싶습니다. 첨부파일 (5)
호랑이파워 | 2021.11.28 | 추천 0 | 조회 43
호랑이파워 2021.11.28 0 43
24068 파워쿼리/피벗
New 파워쿼리 간단한 '값 바꾸기' 에 대해서 질문드립니다. 첨부파일 (3)
월마리아 | 2021.11.28 | 추천 0 | 조회 28
월마리아 2021.11.28 0 28
24065 피벗테이블
New 열과 행 바꾸는 쉬운 방법있나요? 첨부파일 (5) 답변완료
jyj6**** | 2021.11.27 | 추천 0 | 조회 41
jyj6**** 2021.11.27 0 41
24060 VBA
New 메모리가 부족하다고 뜹니다. 첨부파일
선물 | 2021.11.27 | 추천 0 | 조회 25
선물 2021.11.27 0 25
24059 VBA
New 첨부파일을 서버 업로드 (1)
권원재 | 2021.11.27 | 추천 0 | 조회 24
권원재 2021.11.27 0 24
24053 파워쿼리/피벗
New 엑셀 배열 순서를 바꾸고 싶습니다. 첨부파일
jyj6**** | 2021.11.27 | 추천 1 | 조회 29
jyj6**** 2021.11.27 1 29
VBA
New Re:엑셀 배열 순서를 바꾸고 싶습니다.
Yukon | 2021.11.27 | 추천 1 | 조회 36
Yukon 2021.11.27 1 36
피벗테이블
New Re:Re:엑셀 배열 순서를 바꾸고 싶습니다. (1)
jyj6**** | 2021.11.27 | 추천 0 | 조회 22
jyj6**** 2021.11.27 0 22
24048 VBA
New 재고관리 툴 만들기 질문이요 첨부파일 (3)
선물 | 2021.11.26 | 추천 0 | 조회 35
선물 2021.11.26 0 35
24046 함수/공식
New 날짜별로 근태 정리를 하려면 어떻게 해야할까요 첨부파일 (2)
ㅁㅁㅁㅁㅁ | 2021.11.26 | 추천 0 | 조회 49
ㅁㅁㅁㅁㅁ 2021.11.26 0 49
24042 VBA
New 한 코드를 가진 사람의 계약일자 최소값 최대값 구하기 첨부파일 (2)
seorin | 2021.11.26 | 추천 0 | 조회 31
seorin 2021.11.26 0 31
24039 함수/공식
New 다중 조건 및 가장 낮은 일시에 매칭되는 값 불러오기 첨부파일 (6)
감사하모니카 | 2021.11.26 | 추천 0 | 조회 33
감사하모니카 2021.11.26 0 33
24038 VBA
New ZAN IMAGE PRINTER 프로그램에서 JPG 파일명을 내 마음대로 (3)
goodman | 2021.11.26 | 추천 0 | 조회 22
goodman 2021.11.26 0 22
24033 문서서식
New 조건부 서식 특정열 단어포함시 해당 행의 서식 변경 방법 첨부파일 (2) 답변완료
아빠의꿈 | 2021.11.26 | 추천 0 | 조회 31
아빠의꿈 2021.11.26 0 31
24032 함수/공식
New 함수 초보 질문있습니다. (2) 답변완료
윤태종 | 2021.11.26 | 추천 0 | 조회 31
윤태종 2021.11.26 0 31
24029 VBA
New 엑셀로그인 프로그램 사용자 개인별 시트만 보이게 하는 방법 첨부파일 (1)
엑셀이 | 2021.11.26 | 추천 0 | 조회 37
엑셀이 2021.11.26 0 37
24014 VBA
New Private Sub Worksheet_Change(ByVal Target As Range) 조건문의 (1)
yg | 2021.11.26 | 추천 1 | 조회 35
yg 2021.11.26 1 35
24011 VBA
vba 고급필터후 인쇄 자동화 첨부파일 (1)
naver_6180ef1e63220 | 2021.11.26 | 추천 0 | 조회 39
naver_6180ef1e63220 2021.11.26 0 39
24010 문서서식
양이 많은 '병합하고 가운데 맞춤 '버튼을 눌러서 할일을 쉽게 하는방법 첨부파일 (3)
아빠의꿈 | 2021.11.26 | 추천 0 | 조회 46
아빠의꿈 2021.11.26 0 46
24009 함수/공식
오빠두 강의 중 마지막셀 이동에 관하여 질문드립니다. (MATCH함수) (2)
월마리아 | 2021.11.25 | 추천 0 | 조회 38
월마리아 2021.11.25 0 38
24006 함수/공식
조건부 서식 함수 첨부파일 (1)
AFOPWEOI1213 | 2021.11.25 | 추천 -1 | 조회 44
AFOPWEOI1213 2021.11.25 -1 44
24005 파워쿼리/피벗
파워쿼리에서 다중조건 평균구하기 (1)
황선규 | 2021.11.25 | 추천 0 | 조회 28
황선규 2021.11.25 0 28
24002 기능/도구
엑셀 요 기능 이름이 뭐죠?ㅜㅜ (2) 답변완료
냥냥 | 2021.11.25 | 추천 0 | 조회 44
냥냥 2021.11.25 0 44