返回列表 上一主題 發帖

計算金額幾年為負數

yc1031

帖子
106 
主題
35 
精華
0 
積分
146 
點名
0  
作業系統
Window 7 
軟體版本
2007 
閱讀權限
20 
性別
女 
註冊時間
2011-8-30 
最後登錄
2024-3-26 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2024-3-20 15:36 | 只看該作者

計算金額幾年為負數

本帖最後由 yc1031 於 2024-3-20 15:41 編輯

大家好,

我有一個表格(如附件), 我想請問大家像這樣的表有沒有辦法直接用公式算出B欄的金額到第幾年會用完? 謝謝! 計算本金幾年花完.rar (7.63 KB)
收藏 分享

yc1031

帖子
106 
主題
35 
精華
0 
積分
146 
點名
0  
作業系統
Window 7 
軟體版本
2007 
閱讀權限
20 
性別
女 
註冊時間
2011-8-30 
最後登錄
2024-3-26 
2#
發表於 2024-3-21 13:46 | 只看該作者
回復 1# yc1031



有人可以幫忙嗎? 謝謝

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1446 
主題
40 
精華
0 
積分
1470 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-10-21 
3#
發表於 2024-3-22 13:30 | 只看該作者
回復 1# yc1031

謝謝前輩發表此主題與範例
後學藉此帖練習自訂函數,學習方案如下,請前輩參考
[G1]輸入 =Y(9000000, 70000, 0.03, 0.06, 216000) 執行結果:


Option Explicit
Function Y&(本金&, 每月花費&, 通膨#, 配息#, 退休金&)
Dim i&, 整年花費加通膨&
For i = 1 To 10000
   整年花費加通膨 = 每月花費 * 12 * (1 + 通膨) ^ i
   本金 = 本金 - (整年花費加通膨 - (本金 * 配息) - 退休金)
   If 本金 < 0 Then Y = i + 1: Exit For
Next
End Function
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1446 
主題
40 
精華
0 
積分
1470 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-10-21 
4#
發表於 2024-3-22 14:46 | 只看該作者
本帖最後由 Andy2483 於 2024-3-22 16:43 編輯

回復 3# Andy2483

沒有考慮到 花不完 的情況,學習方案如下:
Option Explicit
Function Y(本金&, 每月花費&, 通膨#, 配息#, 退休金&)
Dim i&, 整年花費加通膨&, 原本金&
原本金 = 本金
On Error Resume Next
For i = 1 To 10000
   整年花費加通膨 = 每月花費 * 12 * (1 + 通膨) ^ i
   本金 = 本金 - (整年花費加通膨 - (本金 * 配息) - 退休金)
   If 本金 < 0 Then
      Y = i + 1: Exit Function
   End If
Next
End Function
'======================================
補充:以上這邏輯好像不對,如果花費50000,前幾年本金會增加(本金>9000000),但是第18年開始會減少(本金<9000000)
不知道怎麼處理?? 請各位前輩指教
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

yc1031

帖子
106 
主題
35 
精華
0 
積分
146 
點名
0  
作業系統
Window 7 
軟體版本
2007 
閱讀權限
20 
性別
女 
註冊時間
2011-8-30 
最後登錄
2024-3-26 
5#
發表於 2024-3-26 10:28 | 只看該作者
回復 3# Andy2483


感動!  有人回覆了

測試是沒問題的,  原來要用到VBA才能算..

再次謝謝你

TOP

        靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。
返回列表 上一主題