엑셀(EXCEL) 함수 TIP 29 - (사용자정의 함수/visual basic 둘)

엑셀(EXCEL) 함수 TIP 29 - (사용자정의 함수/visual basic 둘)

 

심한 독감에 걸렸습니다. 하루는 전혀 일어나지도 못하고 누워만 있었습니다. 몸이 천근만근이고 머리는 지끈지끈아팠습니다. 평상시 건강하고 안녕한 것, 그 자체만으로도 행복이라는 것을 다시한번 깨닫게 되었습니다. 직장에서 자기계발을 위해 철저한 시간관리와 꾸준함으로 생활해야 하겠지만 건강을 잃게되면 아무런 소용이 없습니다. 성공한 사람들 중 어느 한 사람도 건강에 심혈을 기울이지 않은 사람이 없다고 합니다. 오늘 하루 출근해서 편안마음을 동료와 차 한잔 하는 그 행복감을 느끼는 것이 미래의 성공한 나를 위해 지나치게 몰두하는 것보다 더 소중하다는 것을............

 

● 사용자정의함수 사용예 - 둘

---

 

하단과 같이 [포인트]에 대한 계산결과값을 구하고자 합니다. 이 식은[판매단가 = 판매단가 *0.15(단, 판매단가가 10,000,000원 이상일 경우 적용]입니다. 이것을 함수와 수식을 사용하여 적용할려면 수식이 복잡해 지고 작업방법도 어렵습니다. 이를 micro visual basic 창에서 사용자정의 함수로 정의 한 간단하게 값을 구하는 방법을 계산해 보도록 하겠습니다.

 

▶ 원본데이터

 

 

▶ [개발도구 - 코드그룹 - visual basic - 삽입 - 모듈]

 

 

Function 포인트(판매단가) : 포인트는 함수 (판매단가)는 인수
If 판매단가 >= 10000000 Then : 수식으로 판매단가가 10000000원보다 크거나 같을 경우
포인트 = 판매단가 * 0.15 : 포인트값은 판매단가 *0.15이다
End If
End Function

 

 

▶[구하고자 하는 셀값 선택(F3) - 수식 - 함수삽입 - 함수마법사(창) - 사용자정의 - 포인트 - 확인]

 

하단과 같이 함수마법사 창에서는 micro visual basic 창에서 사용자정의 함수로 정의한 [판매단가]가 있습니다. 이 판매단가를 선택해서 작업을 하면 됩니다.

  

▶[함수인수 창에서 작업 - [포인트]하는 [함수]에 [인수]인 [판매단가(E3)를 입력하고 - 확인]

  

 

▶ 결과값

 

하단과 같이 E3에 판매단가가 나타나며 이때 사용한 함수는 [=판매단가(D3)]입니다. E3셀을 선택하여 하단으로 드래그하여 채우기를 하면 전체 판매단가에 대한 값이 구해집니다. 포인트가 1000만원 이상인 값에 대해서만 추출이 되었으며 1000만원 이상인 금액에 대해서는 판매단가*0.15 가 적용되었음을 확인 할수 있습니다.