Data type
Posted: Tue Dec 25, 2012 9:07 am
ในการสร้างสูตร
1. ทั้ง Principal, PerDay และฟังค์ชั่น TOAVERAGE เป็นเพียง จำนวนเงินบาท และมีทศนิยมที่แน่นอนคือ 2 ตำแหน่งเท่านั้น การที่กำหนดเป็น Double มันเกินความจำเป็นหรือไม่ครับ แล้วที่เหมาะสมควรกำหนดเป้นอย่างไรจึงจะเหมาะสมครับครับ
2. ในฟังค์ชั่น TOAVERAGE
Principal บางจำนวน ให้ค่า PerDay ไม่เป็นทศนิยม 2 ตำแหน่ง ควรปรับปรุงอย่างไรเพื่อให้ PerDay ได้ทศนิยม 2 ตำแหน่งครับ
Code: Select all
Function TOAVERAGE(Principal As Double, StartDate As Date, EndDate As Date) As Double
Dim TotalDays As Integer
Dim PerDay As Double
TotalDays = EndDate - StartDate + 1
2. ในฟังค์ชั่น TOAVERAGE
Code: Select all
PerDay = Application.Round((Principal / TotalDays), 2)