shuo1125

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

singo1232001

回復 31# shuo1125


    Xl0000108_TESTv01z05.zip (680.51 KB)

下載次數: 4

2023-12-21 01:59

也可以參考多行放工作表版 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

shuo1125

回復 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
-----------------------------------------------------------------------------
若以您原提供的代碼有辦法實現嗎?
感謝您!!!

准提部林

回復 33# shuo1125

加一段//
Xl0000108_TESTv02.rar (416.14 KB)

下載次數: 10

2024-1-19 14:32

shuo1125

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

Andy2483

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


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

准提部林

回復 36# Andy2483


將 and m >= mx 去掉~~

准提部林

回復 35# shuo1125

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

Andy2483

回復 38# 准提部林


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

shuo1125

回復 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 這段判斷式的關係...不知道如何修正?
謝謝!!!