[發問] 多條件計算交易明細

shuo1125

各位前輩好!
資料庫為明細帳，依交易明細中的交易對象.科目.日期.條件計算相對應之交易情形，
※明細帳A.R等欄位資訊不正確...因範例是篩選撈出的。(該資料不需用到)
有先試做一版，但遇到問題是，若交易對象不同則需對每個交易對象以各別的程式碼處理，以及資料若不先經排序也會出錯，
想請問是否有比較便捷的做法嗎...?
需求如下:sheets(交易明細)
收入淨額(N)=銷貨收入(H)-上期自調(I)+本期自調(J)-退回/折讓(L)。
營業成本(Q)=5開頭之費用。(非全部)。
營業費用(S)=6開頭之費用。(非全部)。
進貨(X)=1215+1218+5132(不含入庫未請款及在途)。
上月暫估(V)=1215+5132+1218入庫未請款及在途貸方沖銷數。
期末暫估(AB)=1215+5132+1218入庫未請款及在途。
固資購(AG)=固定資產科目借方增加數。
固資售(AI)=固定資產科目貸方增加數。
目前都暫不考慮原幣數，因為外幣都只填在摘要而已，不知道如何處理..
附上附檔..在勞煩能者出手簡化了，感謝不盡!

shuo1125

回復 68# 准提部林
我才剛注意到小計數字...准大又先提示修改了。
謝謝您了!!!

准提部林

這也應改改//
        For M = 1 To Mx
            If Brr(x + 4)(M, 0) <> "" Then Srr(x + 4) = Brr(x + 4)(M, 0) '記錄最後一月餘額
        Next M

shuo1125

回復 66# 准提部林
回復 56# Andy2483
感謝准大一再指導...
也謝謝Andy一直幫助釐清需求~
一直都被既定的想法侷限了...兩位的做法千變萬化!
依據不同需求各有不同解法，需求描述不清我會再檢討....
感謝兩位幫助!!!!

准提部林

回復 65# shuo1125

Xrr@(1 To 12, 0) 這造成很大的困擾, 有交易沒交易都是0, 無法作判斷,
改成 Xrr(1 To 12, 0),  最後"空格"都取代為0
Xl0000108_TESTv06.rar (416.5 KB)

下載次數: 5

2024-1-22 15:18

shuo1125

回復 64# 准提部林
造成兩位花費不少時間理解深感抱歉....
我上傳個範例，並對某科目做餘額差異對照，希望這樣能較清楚表達!!
謝謝你們花費時間幫忙!!!
Xl0000108_TESTv05E1.zip (541.71 KB)

下載次數: 2

2024-1-22 14:54

准提部林

模擬資料要能測出各種狀況,
否則言辭往返都是多花時間~~

准提部林

加入"有交易月份"的陣列參數Mrr//
Xl0000108_TESTv05.rar (404.98 KB)

下載次數: 3

2024-1-22 14:24

shuo1125

回復 61# 准提部林
准大好~
34#我有用過沒問題~
但Brr(x + 4)(M, 0) = 0
會有個狀況是...當該月交易後餘額剛好為0。
會變成承襲上期了.....謝謝你!!

准提部林

34# 不是給段代碼了, 將無交易的月份沿用上月或更上月的餘額
1//只填至有交易最大月份
        For M = 2 To 12
            If Brr(x + 4)(M, 0) = 0 And M <= Mx Then Brr(x + 4)(M, 0) = Brr(x + 4)(M - 1, 0)
        Next M
2//填滿12個月
        For M = 2 To 12
            If Brr(x + 4)(M, 0) = 0 Then Brr(x + 4)(M, 0) = Brr(x + 4)(M - 1, 0)
        Next M

只要從2月開始斷即可, 1月若無交易, 要取去年底的,
那明細表中就要先建立一個上期餘額, 且交易日為一月一日, 類似會計帳的"上期結轉"