准提部林

回復  Andy2483
回復  准提部林
感謝Andy大把可能性都想進去了.....
也感謝准大再三幫忙!!
測試發現有 ...
shuo1125 發表於 2024-1-20 08:46

If Brr(x + 4)(M, 0) = 0 And M <= Mx Then Brr(x + 4)(M, 0) = Brr(x + 4)(M - 1, 0)  
刪去"最大月份"的判別即可!!!
但是,,這樣的數據是失真的!!! 未來式餘額???

shuo1125

回復 41# 准提部林
准大好~
And M <= Mx該段是必須要存在的..
Brr(x + 4)(M, 0) = 0 這段一開始有想到，但我怎試都出不來...
您添增M,Mx及判斷式讓資料更完善...只是以下狀況會有問題....
(一)當該月交易後餘額剛好為0，往後皆無發生交易。
(二)1月有交易，2-12月都無交易。
以上，不知道怎解....謝謝准大!!!

准提部林

回復 42# shuo1125


若只記錄到"最大月份"為止, 看38#的補充~~Mx在下次回圈前要歸零

Andy2483

回復 41# 准提部林
回復 42# shuo1125


    謝謝 准提部林前輩
請教 准提部林前輩:
AV20的公式要怎麼下才能在AV20顯示 8686996 ,而不是0,  或者VBA要怎麼改才能讓AV20填入最後年度餘額 8686996
我猜樓主的需求應該是這個

shuo1125

回復 42# shuo1125
抱歉更正一下…
（二）這個紀錄最大月就不會有該問題
也謝謝Andy大提問，感謝！！

准提部林

回復 44# Andy2483

只是一個判斷//
Xl0000108_TESTv03.rar (396 KB)

下載次數: 2

2024-1-20 11:30

Andy2483

If Brr(x + 4)(M, 0) = 0 And M
准提部林 發表於 2024-1-20 09:20

    謝謝前輩,如果承襲前一個月的餘額是失真了
如下所示VBA怎麼設計第20列的值

下載 (74.77 KB)

2024-1-20 11:39

假設1049124之後的9月剛好餘額是0而且10~12月無交易,20列要寫入0
假設8686996之後的12月是無交易 ,20列要寫入8686996
樓主應該是要AV20~BF20呈現每項的年度最後餘額,如果VBA執行完後再下公式抓餘額會有問題,所以應該要在VBA把AV20~BF20寫入最後餘額
謝謝前輩指導

准提部林

回復 47# Andy2483


那一行是公式//
=IF(OR(AV8:AV19,0),LOOKUP(1,0/AV8:AV19,AV8:AV19),0)

Andy2483

回復 48# 准提部林


    AV20~BF20呈現每項的年度最後餘額,如果VBA執行完後再下公式抓餘額會有問題,所以應該要在VBA把AV20~BF20寫入最後餘額

下載 (85.46 KB)

2024-1-20 12:56

不好意思問得不好

准提部林

回復 49# Andy2483


公式是預先置入, 不用程式去填,  如其它欄位的 SUM 公式
Xl0000108_TESTv03.rar (397.09 KB)

下載次數: 4

2024-1-20 13:10