요구 사항 :

-vba에 대한 기본 지식-테이블 / 명명 된 범위 사용 통합 문서를 켜고 끌 때 때로는 통합 문서를 다시 방문하는 몇 달 사이에 데이터 구조와 수식 설정을 기억하기 어려울 수 있습니다.

이것이 제가이 문제를 해결하는 방법이며 몇 분 안에 수행 된 계산에 대한 개요를 확인할 수 있습니다.

이 예에서는 보너스 계산 공식을 단순화하는 방법을 보여줍니다.

image

테이블 또는 UDF가없는 공식 모양 공식 :

IF (SUM (C2 / D2) ⇐ 1; 0; IF (SUM (C2 / D2)> = 3; SUM C2-D2) 0,03); IF (AND (SUM (C2 / D2)> 1; SUM (C2 / D2) <3) = TRUE; SUM ((C2-D2) 0,02); 1)

이 공식의 논리는 언뜻보기에 추출하기 어려울 수 있습니다.

테이블이 있고 UDF가없는 공식 모양 공식 :

IF (SUM ([@ [연간 매출]] / [@ Salary]) ⇐ 1; 0; IF (SUM ([@ [연간 매출]] / [@ Salary])> = 3; SUM [@ [연간 판매]]-[@ Salary]) 0,03); IF (AND (SUM ([@ [연간 판매]] / [@ Salary])> 1; SUM ([@ [연간 판매]] / [@ 급여]) <3) = TRUE; SUM (([@ [연간 매출]]-[@ Salary]) 0,02); 1)

테이블을 사용하면 모듈에 삽입 된 테이블 및 UDF 사용자 정의 함수를 사용하여 계산 공식 모양에 사용 된 셀에 대한 정보를 얻을 수 있으므로 조금 더 쉽게 읽을 수 있습니다.

‘짧고 설명이없는 제목보다 길고 설명적인 기능 제목을 사용합니다 Function calculate_salary_to_sale_ratio_and_return_bonus (yearlySales As Double, salary As Double) As Double Dim salary_to_sale_ratio As Double Dim bonus_factor As Double Dim return_bonus As Double salary Case_to_sale_ratio = yearly To 3 bonus_factor = 0.02 Case Is> 3 bonus_factor = 0.03 Case Else bonus_factor = 0 # End Select return_bonus = (yearlySales-salary) * bonus_factor calculate_salary_to_sale_ratio_and_return_bonus = return_bonus End Function 함수 사용 공식 :

calculate_salary_to_sale_ratio_and_return_bonus ([@ [연간 매출]]; [@ Salary])

이것은 한눈에 무슨 일이 일어나고 있는지 정확하게 알려주며, 항상 코드에 더 깊이 들어가 세부 사항을 읽을 수 있습니다. 첨부 파일은 세 가지 시나리오를 모두 보여주는 파일입니다