返回列表 上一主題 發帖

[發問] 利息分攤試算表二問

paddyliu

帖子
44 
主題
22 
精華
0 
積分
79 
點名
0  
作業系統
Win7 
軟體版本
office2007 
閱讀權限
20 
性別
女 
註冊時間
2011-1-22 
最後登錄
2017-5-9 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-6-23 18:25 | 只看該作者

[發問] 利息分攤試算表二問

小妹從事會計工作，欲做應付票據利息費用分攤表，
但試算分攤過程遇到以下問題：

(1)破月問題：因需從開始日次月計算，目前做法是加一輔助欄算出全年，再依比例/12*剩餘月份換算
(2)逐月分攤問題：以102年來說，需用上述的金額再除以剩餘月份，都要逐筆去修改剩餘月份，且最後一個月還會有尾差問題，

之前資料量少還覺得逐筆修改OK，但現在資料量大且又加上輔助欄改到有點眼睛快花掉了，
能否請版上高手指點作法看能否以一欄即算出或表格需做怎麼的修正才比較適當，感謝~

利息分攤計算.rar (8.57 KB)

收藏 分享

softsadwind

帖子
129 
主題
3 
精華
0 
積分
178 
點名
0  
作業系統
XP 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2010-12-28 
最後登錄
2018-11-10 
2#
發表於 2013-6-24 22:41 | 只看該作者
回復 1# paddyliu


    試看看
  1. Function fl(amount, rate, start, year)
  2. If year = 1 Then '第一年利息計算
  3. fl = amount * ((1 + rate) ^ year - (1 + rate) ^ (year - 1)) * (12 - Month(start)) / 12
  4. Else
  5. fl = amount * ((1 + rate) ^ year - (1 + rate) ^ (year - 1)) * Month(start) / 12 + amount * ((1 + rate) ^ (year - 1) - (1 + rate) ^ (year - 2)) * (12 - Month(start)) / 12

  7. '我個人覺得公式要修正成後面這一個...
  8. 'fl = amount * ((1 + rate) ^ year - (1 + rate) ^ (year - 1)) * (12 - Month(start)) / 12 + amount * ((1 + rate) ^ (year - 1) - (1 + rate) ^ (year - 2)) * Month(start) / 12
  9. End If
  10. End Function
複製代碼
用自定義函數 可以把每年的利息算出來
你說的利息攤月 我就不懂...你自己再變化吧
利息分攤計算.rar (15.17 KB)
50 字節以內
不支持自定義 Discuz! 代碼

TOP

        靜思自在 : 話多不如話少，話少不如話好。
返回列表 上一主題