Nõuded:
- vba baasteadmised
- Tabelite/nimevahemike kasutamine
Töövihikutega sisse- ja väljalülitamisel võib mõnikord mõne kuu jooksul töövihiku uuesti külastamise vahel olla raske meelde jätta andmestruktuuri ja seadistatud valemit.
Nii lahendan selle probleemi ja tagan, et mul on mõne minuti jooksul ülevaade tehtud arvutustest.
Selles näites näitan, kuidas saab boonuste arvutamise valemit lihtsustada.
Valemi välimus ilma tabeli või UDF -iga
Valem:
= 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)))
Selle valemi loogikat võib esmapilgul raske välja tuua.
Valemi välimus tabeliga ja ilma UDF -iga
Valem:
= IF (SUM ([@[aastane müük]]/[@palk]) = 3; SUM (([[[[aastamüük]]]-[@palk]]*0,03); IF (JA (SUM ([ @[Aastamüük]]/[@Palk])> 1; SUM ([@[Aastamüük]]/[@Palk]) <3) = ÕIGE; SUM (([[[Iga-aastane müük]]-[@Palk) ])*0,02); 1)))
Tabelite abil muutus lugemine natuke lihtsamaks, kuna olete kursis arvutamisel kasutatud lahtritega
Valemi välimus tabeli ja UDF -iga
Moodulisse sisestatud kasutaja määratud funktsioon:
„Mul on pigem pikad ja kirjeldavad funktsiooninimetused kui lühikesed ja kirjeldamatud pealkirjad
Funktsioon calc_salary_to_sale_ratio_and_return_bonus (iga -aastane müük topelt, palk kahekordne)
Hämar palk_müügi_suhe Nagu kahekordne
Dim bonus_factor As Double
Dim return_bonus Topelt
palk_müügi_suhe = aastane müük / palk
Valige Juhtumi palk_müügi_suhe
Juhtum 1 kuni 3
boonustegur = 0,02
Juhtum on> 3
boonustegur = 0,03
Juhtum muidu
bonus_faktor = 0#
Lõpp Vali
return_bonus = (aastane müük - palk) * boonus_tegur
calc_salary_to_sale_ratio_and_return_bonus = return_bonus
Lõppfunktsioon
Funktsiooni kasutamine
Valem:= arvuta_palgatulu_müügi_suhe_ja_tagastusboonus ([@[aastane müük]]; [@palk])See ütleb teile esmapilgul täpselt, mis toimub, ja saate alati eripära lugemiseks koodi sügavamale minna. Lisatud on fail, mis näitab kõiki kolme stsenaariumi