[VBA] 두께 길이 폭 밀도 중량 계산기

안녕하세요. 뜨란입니다.

 

회사에서 소재의 중량과 두께, 길이, 폭, 밀도(혹은 비중)를 이론 상으로 계산해야할 때가 가끔 있었습니다.

 

계산식이 들어간 엑셀 파일에서 계산을 하긴 하지만 각 항목별로 다른 수식을 사용해야 하다보니 이 수식 저 수식 사용하는게 귀찮기도 하고, 입력 단위도 헷갈릴 때가 있고 했습니다.

 

단위 헷갈리지 말고 간편하게 사용할 수 있는 파일을 하나 만들어보자는 생각과 이참에 VBA도 익혀보자는 생각이 맞물린 결과물이 이번 포스팅의 주제입니다. 

 

 

 

 

* * *   * * *

 

 

 

 

 VBA로 구현한 무게, 길이, 폭, 두께, 밀도 계산기 

 

 

기본 공식은 [ 무게 = 부피 x 밀도 ]를 적용한 형태로 5가지 요소 중에서 구하고자 하는 항목을 선택한 후 나머지 정보를 입력하고 계산하는 방식입니다. 

 

계산 버튼을 누르면 계산식이 출력되고, 계산 결과란에 순차적으로 내용이 기입되도록 구성한 형태입니다.

 

판의 형태(직육면체 형태)를 베이스로 제작하다보니 그 외의 소재(파이프나 환봉 형태 등)에 대해서는 적용이 어렵겠네요. 이건 추후에 보강해볼 생각입니다.

 

 

[중량 계산기 실행 화면]

 

 

* 본 파일은 EXCEL 2019버전에서 제작되었습니다.

* 엑셀 파일 올려드리니 필요하신 분은 사용하세요. 

* 수정 및 재배포는 자유롭게 하시되 출처는 남겨주시면 감사하겠습니다.

길이 무게 폭 두께 밀도 계산기_ver.1.xlsm

0.06MB

 

* 계산 결과란에 빈 칸이 있을 경우, 후속 계산식 출력 중 일부가 빈 칸에 들어가서 틀어지게 됩니다. 이 부분은 별도의 처리를 처리를 하지 않은 상태이므로 사용시 주의해주시기 바랍니다.

[계산 결과 출력시 빈 칸에 채워진 모습]

 

 

 

* * *   * * *

 

 

 

 

다음 포스팅에서는 계산기 파일의 제작 과정에 대해서 다뤄볼 생각입니다. 처음 VBA를 다루는 분들도 따라할 수 있게 최대한 간단하고 쉽게 설명을 해보려 합니다. 문제는 제가 프로그래밍 지식이 깊지 않아서... 딱 제가 이해하고 있는 정도로만 풀어 나가보도록 하겠습니다.