返回列表 上一主題 發帖

奬金要如何用vba計算呢

奬金要如何用vba計算呢

奬金要如何vba計算呢??
在檔案裡有相關的條件..請參閱

3333.rar (7.88 KB)

1

評分人數

    • GBKEE: 重複發帖金錢 -2

回復 38# GBKEE


    謝謝大大的回覆..感謝

TOP

回復 44# sillykin
對不起 眼花了, 42帖; 金額數字少了1個0 獎金上限 As Integer 要改成如luhpro說 獎金上限 As Long
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復  sillykin


    獎金上限 = IIf(部門 = "營業單位", 150000, IIf(部門 = "管理單位", 120000, 10 ...
sillykin 發表於 2013-7-30 21:25


有溢位是正常的啊.

請參看 ExcelVBA 說明中的 "資料型態摘要"
裡面有說到 :

Integer 佔2 個位元組, 可表示數字範圍從 -32,768 到 32,767
而 Long(long integer)  則佔 4 個位元組, 可表示數字範圍從 -2,147,483,648 到 2,147,483,647

所以你只要把程式中 Dim 後面有 As Integer  的改成 As Long  應該就可以了

TOP

回復 43# sillykin


    獎金上限 = IIf(部門 = "營業單位", 150000, IIf(部門 = "管理單位", 120000, 100000))
我把奬金上限更改為150,000 ; 120,000 ; 100,000
為何會產生溢位情形????

未命名.JPG (11.63 KB)

未命名.JPG

TOP

回復 42# GBKEE


    謝謝大指教,我會努力學習
責任額能否從總表去抓責任額,總表責任額由人工自行輸入

TOP

回復 41# sillykin
營業單位責任額不一定為500,有少數人員會更動 少數人是哪些人,要有名單可參考

程式碼要了解一下,這樣是不會進步的
  1. '獎金上限 = IIf(部門 = "營業單位", 15000, 12000)
  2.         獎金上限 = IIf(部門 = "營業單位", 15000, IIf(部門 = "管理單位", 12000, 10000))
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 40# sillykin


    大大不好意思,請問小問題
營業單位責任額不一定為500,有少數人員會更動
能否不去判斷責任額
還有營業單位上限為150,000
管理單位上限為120,000
資訊單位上限為100,000
能否解決呢,謝謝

TOP

回復 38# sillykin


    Tset.rar (20.84 KB)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

本帖最後由 sillykin 於 2013-7-29 21:08 編輯

回復 37# GBKEE


    條件如圖

例如
責任額100
奬金計算方式
達成額130
達成比率130%
達成100%加發250元
計算方式為(達成額/責任額)*100 = 逹成比率(%)   ==>奬金計算為((逹成比率(%) - 100)*達成100每一點加發5元)+達成100%加發250元

非幹部計算方式為(130/100)*100 = 130   ==>奬金計算為((130 - 100)*5)+250 = 400元
  幹部計算方式為(400/200)*100 = 200   ==>奬金計算為((200 - 100)*5)+500= 1,000元
是否能在條件sheet中加設欄位值;方便更正
營業部上限最多奬金150,000元
管理部上限最多奬金120,000元
資訊部上限最多奬金100,000元
及資訊定控制項目
請大大指教

資.JPG (55.39 KB)

資.JPG

TOP

        靜思自在 : 小事不做、大事難成。
返回列表 上一主題