[VBA ] 如何將百分比數值 轉換成整數
Function score1(market_share)
Select Case market_share
Case Is < 0.0837
score1 = 1
Case 0.0837 To 0.1574
score1 = 2
Case 0.1574 To 0.2311
score1 = 3
Case 0.2311 To 0.3048
score1 = 4
Case Is > 0.3785
score1 = 5
End Select
End Function
原始資料是 百分比的數字
我想把不同區間的百分比
做個評分
如8.5%以下給一分
可是這樣回傳回來 就是百分率 不會給整數1分
請問怎麼樣寫才能以整數回傳?
謝謝大家
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.119.46.19
推
05/04 16:32, , 1F
05/04 16:32, 1F
推
05/05 20:41, , 2F
05/05 20:41, 2F