多條件計算交易明細 - Excel程式區

shuo1125

中學生 Rank: 2

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

31^# 跳轉到 »

發表於 2023-12-20 23:45 | 只看該作者

回復 30# singo1232001
慶大好~
這麼晚了還幫忙一直調試。
抽空我在看，對SQL相當陌生....
早點休息先，感謝你了~

TOP

singo1232001

　暱稱: 熱狗慶

中學生 Rank: 2

帖子: 354
主題: 5
精華: 0
積分: 387
點名: 0
作業系統: windows7
軟體版本: vba,vb,excel2007
閱讀權限: 20
性別: 男
註冊時間: 2017-1-8
最後登錄: 2024-8-2

論壇榮譽勳章論壇贊助勳章

32^#

發表於 2023-12-21 02:01 | 只看該作者

回復 31# shuo1125

Xl0000108_TESTv01z05.zip (680.51 KB)

也可以參考多行放工作表版 SQL語法全部改放工作表的寫法

Sub 查放工作表精簡版() '可搭配表"SQL GPT4prompt" 跟 "SQL" 工作表問GPT放語法
i = Split("Provider=Microsoft.,Jet.OLEDB.4,.0;Extended Properties=Excel ,8,.0;Data Source=", ",")
If Application.Version > 12 Then i(1) = "ACE.OLEDB.12": i(3) = 12
Set cn = CreateObject("adodb.connection"): cn.Open Join(i, "") & ThisWorkbook.FullName

Set sj = Sheets("交易明細2"): Set SQ = Sheets("SQL")
For i = 8 To 40 Step 16
Set s = Sheets(sj.Cells(i - 2, "B").Value)
E1 = "'%" & sj.Cells(i - 2, "E") & "%'"
B1 = "[" & sj.Cells(i - 2, "B") & "$A1:T] "
For j = 1 To 9
sj.Cells(i, SQ.Cells(j, 3).Value).Resize(12, 1) = 0
repSQL = Replace(Replace(SQ.Cells(j, 2), "'%GN%'", E1), "[M明細帳$A1:T]", B1)
sj.Cells(i, SQ.Cells(j, 3).Value).CopyFromRecordset cn.Execute(repSQL)
Next
Next
End Sub

TOP

shuo1125

中學生 Rank: 2

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

33^#

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

回復 12# 准提部林
准大不好意思再打擾~~
請問[交易明細!AL:BF]餘額，這裡有個狀況....
若該月無交易明細，可以讓餘額承襲前期數字嗎?
<說明>
-----------------------------------------------------------------------------
1月餘額$100，然後中間都無變化...到12月餘額變$150，
此時1月有餘額$100，若中間都沒變化，那2-11月都會是一樣餘額$100，
只有12月當月餘額會變為是$150。
11201 $100
11202 $100
11203 $100
11204 $100
11205 $100
11206 $100
11207 $100
11208 $100
11209 $100
11210 $100
11211 $100
11212 $150
-----------------------------------------------------------------------------
若以您原提供的代碼有辦法實現嗎?
感謝您!!!

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

34^#

發表於 2024-1-19 14:32 | 只看該作者

回復 33# shuo1125

加一段//

Xl0000108_TESTv02.rar (416.14 KB)

TOP

shuo1125

中學生 Rank: 2

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

35^#

發表於 2024-1-19 15:11 | 只看該作者

回復 34# 准提部林
我想破頭都無法實現，
准大真的太神了....完全符合需求，太感謝了!!!!

TOP

Andy2483

　暱稱: 厚臉皮的學生

碩士班 Rank: 5 Rank: 5

帖子: 1480
主題: 40
精華: 0
積分: 1504
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 100
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2025-10-27

36^#

發表於 2024-1-19 15:55 | 只看該作者

回復 34# 准提部林
回復 35# shuo1125

請教前輩
雖然12月沒有交易,但是如果AV19這餘額的值要承襲AV18的餘額 8686996 該如何處理

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

37^#

發表於 2024-1-19 17:21 | 只看該作者

回復 36# Andy2483

將 and m >= mx 去掉~~

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

38^#

發表於 2024-1-19 17:25 | 只看該作者

回復 35# shuo1125

最大月份要歸零
y = 0: Erase Brr: Mx = 0

TOP

Andy2483

　暱稱: 厚臉皮的學生

碩士班 Rank: 5 Rank: 5

帖子: 1480
主題: 40
精華: 0
積分: 1504
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 100
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2025-10-27

39^#

發表於 2024-1-19 17:28 | 只看該作者

回復 38# 准提部林

謝謝前輩我再找時間試試看

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

shuo1125

中學生 Rank: 2

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

40^#

發表於 2024-1-20 08:46 | 只看該作者

回復 36# Andy2483
回復 38# 准提部林
感謝Andy大把可能性都想進去了.....
也感謝准大再三幫忙!!
測試發現有個較特殊的狀況餘額會異常，就是當該月交易後餘額剛好為0，且往後月份皆無交易..
會導致當月及後續餘額也異常...
以下例子:
1-10月有其交易與餘額，11月交易後餘額變0，12月剛好也無交易，
變成11211.11212餘額都異常了。
-----------------------------------------------------
實際實際
11201 $150 11207 $150
11202 $130 11208 $150
11203 $110 11209 $150
11204 $100 11210 $150
11205 $150 11211 $0
11206 $140 11212 $0
------------------------------------
執行
11201 $150 11207 $150
11202 $130 11208 $150
11203 $110 11209 $150
11204 $100 11210 $150
11205 $150 11211 $150
11206 $140 11212 $150
------------------------------------
Brr(x + 4)(M, 0) = 0 這段判斷式的關係...不知道如何修正?
謝謝!!!

TOP

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

[收藏此主題] [關注此主題的新回復]

[通過 QQ、MSN 分享給朋友]