안녕하세요. 코로나19 바이러스 이슈사 해결되는 듯 해결되지 않고 계속 지속되어 국민 모두가 힘든 시기입니다. 저와 같은 회사원들도 재택근무를 지속하느라 업무효율도 낮고 힘든 시기입니다.
얼마전에 제가 재택근무 필수 유틸로 '자리안비움' 이라는 유틸을 하나 올렸었는데요.
2020/03/09 - [DEV/c#] - 재택근무 필수 유틸 "자리안비움" - 윈도우 꺼짐 방지
회사의 보안 문제로 해당 유틸리티가 구동이 되지 않는 분들이 계서서 엑셀로 비슷한 기능을 하는 버전을 하나 만들어 보았습니다.
작동 하는 방법은 간단합니다.
타이머 간격 옆부분에 숫자를 입력합니다. 해당 숫자는 마우스가 움직이지 않는 시간을 지정합니다.
그런다음 '시작' 버튼을 누르면 동작 하게 되는데요.
마우스가 지정한 시간만큼 움직임이 없으면 잠깐 마우스 커서를 이동시키는 기능을 수행합니다.
'중지' 버튼을 누르면 처음 설정한 시간으로 시간이 리셋되고 기능 동작이 멈춥니다.
모니터 절전 방지 기능은 넣지 않았고요. 마우스만 제어가 됩니다.
모니터 절전 기능까지 동일하게 동작 됩니다. 시작을 누르면 ON 상태가 되며 중지를 누르면 OFF 로 바뀌도 기능이 중단 됩니다.
하드디스크 꺼짐, 최대절전모드 진입 등의 제어는 이루어지지 않으니 컴퓨터가 꺼진다면 확인해 보세요.
엑셀 한켠에 해당 파일을 열어두고 '시작' 버튼을 눌러 놓으면 시스템이 자리비움으로 변경되지 않는 것이지요.
'ㅎㅎ
물론 우리들은 누가 지켜보든 지켜보지 않든 열심히 일을 하지만 피치 못하는 상황으로 자리를 비워야 하는 일이 있을 수도 있지 않겠습니까? 그런데 회사에서는 자리를 지키고 앉아 있는지만 모니터링 하는 한심한 상사도 있게 마련이지요.
암튼 뭐 좋은 목적으로 사용하시리라 믿습니다.
아래 파일을 다운로드 받으셔서 사용하시면 되며 초기 구동시 엑셀 매크로에 대한 허용 권한을 허용해 주셔야 합니다.
해당 엑셀 파일에 vba 를 이용하여 마우스를 제어하는 코드도 들어있으니 공부하실 분들은 다운로드 받으셔서 살펴보시기 바랍니다 ^^
20200901 내용 추가
- 유틸 버전 자리안비움과 동일한 모니터 절전 기능을 추가하였습니다.
20230512 내용 추가
- 어플처럼 마우스 클릭 기능을 추가하는 방법을 소개해 드립니다. 직접 하시면 됩니다.
- 다운로드 받은 엑셀 파일을 열어놓고 alt+F11 키를 눌러줍니다 --> vba 편집창 나타남
- 중간코드 중에 waitTime 부분을 아래와 같이 수정합니다. Call click 추가
요렇게 하면 마우스가 이동한 뒤에 클릭! 원래 위치로 돌아와서 클릭! 하는 동작이 추가 됩니다.
스카이프 기반 메신저가 자리비움이 안먹는다는 분들이 계신데.. 요렇게 테스트 해보니 자리비움으로 바뀌지 않는 것을 확인했습니다.
정지 했다가 한번 다시 시작하시면 적용 됩니다.
그럼 이만~
2020/09/04 - [DEV/VBA] - [vba] 엑셀 이미지 리스트로 일괄 다운로드 받기
2020/06/22 - [DEV/VBA] - [vba] 초등학교 연산 자동 문제집 - 곱셈 추가
2020/01/08 - [DEV/c#] - Excel Automate, 엑셀 자동화 프로그램
2020/05/21 - [DEV/VBA] - [Excel] LCD 인치 정보로 가로 세로 길이 알아내는 방법
'DEV > VBA' 카테고리의 다른 글
[VBA] 선택한 셀의 이미지 파일 이미지 뷰어로 열기 (0) | 2022.06.16 |
---|---|
[vba] 엑셀 이미지 리스트로 일괄 다운로드 받기 (8) | 2020.09.04 |
[vba] 초등학교 연산 자동 문제집 - 곱셈 추가 (0) | 2020.06.22 |
[Excel] LCD 인치 정보로 가로 세로 길이 알아내는 방법 (0) | 2020.05.21 |
[VBA] 다른 시트의 내용과 비교하기 (12) | 2020.05.21 |