2021-11-29

211129 엑셀) 급조한 교무실 RFID열쇠 관리 엑셀 VBA 자료

 작년에 전체 출입문 교체공사를 하며 미닫이문에 자물쇠뭉치를 출입문에 부착하였는데, 평소 잘 안잠그고 다니다보니 사용이 불편함이 있었나보다.. 그래서 도어락키로 한두실을 바꾸고 있는데 열쇠를 가지고다니지 않아 편한점도 있지만 번호를 누를때 노출될 우려가 있고 카드키를 들고 다니면 어차피 열쇠를 가지고 다니나 별 차이도 안날텐데 흠..

 일단 나눠준 열쇠를 회수받는 방법을 생각해보다가 수기로 적으면 누가 반납안한지 알수가 없을거 같아서 물건 관리에 사용하는 RFID를 이용해보기로 한다.
우선 샘플로 동일한 사양의 RFID키링을 하나 주문해보았다. 스티커 형태도 있지만 열쇠 몸체나 기존 키링에 부착하면 좋겠지만 실리콘 비슷한 플라스틱이라 쉽게 떨어지거나 스티커가 훼손될 우려가 있어서 조금더 비싼 플라스틱 완제품으로 1도 로고 인쇄까지해서 견적을 받으니 개당 2,750원 정도 하네.. 최소 100개라고 해서 예비용까지 생각하여 주문을 넣어두었다.

 그리고 기존에 사용하던 RFID리더기를 통해 고유번호를 읽을 방법을 생각하여 엑셀 VBA로 간단히 또 짜집기하여 만들었다.
우선 RFID 키를 리더기에 태그하여 고유번호를 읽은다음, 교무실과 선생님 이름을 입력하여 등록을 한다.
이후 회수하여 몇건이 회수되었는지도 카운트하여야 하는데 그건 또 연구중이다.
우선 만든 기능은 등록하여 나눠주고 그 열쇠고리의 이력을 계속 관리하는 것이다.
예를들어 9504번 카드를 올해는 누가 사용했고 내년에는 누가 사용하여 분실되지 않고 관리됨을 기록하는 것이다

추가할 기능은
1. 등록하여 배부후 회수했을때 수정하는 기능 - 고유번호를 이용하여 체크박스를 변경하면 될듯



▷ 인터넷 쇼핑몰에서 구입한 RFID 키링과 RFID 13.56Mhz 리더기 이다.
바코드보다 쉬워 요긴하게 활용중이다.

▷ 우선 만들어본 기능, 등록과 조회 기능만 만들었다

댓글 없음: