多條件計算交易明細 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 多條件計算交易明細

返回列表下一主題上一主題發帖

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

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2831
主題: 10
精華: 0
積分: 2887
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-5

61^# 跳轉到 »

發表於 2024-1-22 14:12 | 只看該作者

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月若無交易, 要取去年底的,
那明細表中就要先建立一個上期餘額, 且交易日為一月一日, 類似會計帳的"上期結轉"

中學生 Rank: 2

帖子: 121
主題: 8
精華: 0
積分: 170
點名: 62
作業系統: win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2021-1-21
最後登錄: 2024-8-20

62^#

發表於 2024-1-22 14:18 | 只看該作者

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

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2831
主題: 10
精華: 0
積分: 2887
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-5

63^#

發表於 2024-1-22 14:24 | 只看該作者

加入"有交易月份"的陣列參數Mrr//

Xl0000108_TESTv05.rar (404.98 KB)

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2831
主題: 10
精華: 0
積分: 2887
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-5

64^#

發表於 2024-1-22 14:27 | 只看該作者

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

中學生 Rank: 2

帖子: 121
主題: 8
精華: 0
積分: 170
點名: 62
作業系統: win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2021-1-21
最後登錄: 2024-8-20

65^#

發表於 2024-1-22 14:54 | 只看該作者

本帖最後由 shuo1125 於 2024-1-22 14:56 編輯

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

Xl0000108_TESTv05E1.zip (541.71 KB)

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2831
主題: 10
精華: 0
積分: 2887
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-5

66^#

發表於 2024-1-22 15:20 | 只看該作者

回復 65# shuo1125

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

Xl0000108_TESTv06.rar (416.5 KB)

中學生 Rank: 2

帖子: 121
主題: 8
精華: 0
積分: 170
點名: 62
作業系統: win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2021-1-21
最後登錄: 2024-8-20

67^#

發表於 2024-1-22 15:35 | 只看該作者

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

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2831
主題: 10
精華: 0
積分: 2887
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-5

68^#

發表於 2024-1-22 15:51 | 只看該作者

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

中學生 Rank: 2

帖子: 121
主題: 8
精華: 0
積分: 170
點名: 62
作業系統: win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2021-1-21
最後登錄: 2024-8-20

69^#

發表於 2024-1-22 16:07 | 只看該作者

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

靜思自在 : 人事的艱難與琢磨，就是一種考驗。

返回列表下一主題上一主題