198188

帖子: 438
主題: 67
精華: 0
積分: 531
點名: 0
作業系統: win7
軟體版本: office 2010
閱讀權限: 50
性別: 男
註冊時間: 2012-10-30
最後登錄: 2024-11-19

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2024-2-27 11:34 | 只看該作者

三個欄位對比資料及讀取資料

KH 表核對 Data 表

從KH 表第3行開始到最後一行，在Data 表内找尋下面三個對比都相同的
KH 表欄B 對比 Data 表欄A
KH 表欄C 對比 Data 表欄B
KH 表欄D 對比 Data 表欄C

上面三樣都相同的話，將KH 表的欄E 導入DATA 表的該行相同數據的欄D

如果3樣有任何1樣不同的，將KH 表的欄B - D 導入DATA 表最後一行的欄A-D

最後DATA 欄E 就計算，欄D 減去欄F - 最後一欄有數據的

範例a.rar (19.2 KB)

樓主熱帖

mdr0465

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 1
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2025-3-8

16^#

發表於 2024-3-3 22:44 | 只看該作者

回復 14# 准提部林

謝謝准大提供有用資料, 謝謝

TOP

198188

高中生 Rank: 3 Rank: 3

帖子: 438
主題: 67
精華: 0
積分: 531
點名: 0
作業系統: win7
軟體版本: office 2010
閱讀權限: 50
性別: 男
註冊時間: 2012-10-30
最後登錄: 2024-11-19

15^#

發表於 2024-3-2 13:03 | 只看該作者

回復 14# 准提部林

謝謝准大指點

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

14^#

發表於 2024-3-2 12:37 | 只看該作者

類似問題發了好幾帖, 就在這給檔案//
程式碼須自己一行一行去解讀, 後續維護還是要靠自己

Xl0000203-1.rar (22.19 KB)

TOP

mdr0465

中學生 Rank: 2

帖子: 163
主題: 45
精華: 0
積分: 246
點名: 1
作業系統: win7
軟體版本: ie
閱讀權限: 20
性別: 男
註冊時間: 2015-7-8
最後登錄: 2025-3-8

13^#

發表於 2024-3-1 22:10 | 只看該作者

回復 5# Andy2483

Andy 學兄,
謝謝你詳細和耐心的解釋,
大後輩獲益良多, 謝謝指導

TOP

198188

高中生 Rank: 3 Rank: 3

帖子: 438
主題: 67
精華: 0
積分: 531
點名: 0
作業系統: win7
軟體版本: office 2010
閱讀權限: 50
性別: 男
註冊時間: 2012-10-30
最後登錄: 2024-11-19

12^#

發表於 2024-3-1 14:52 | 只看該作者

回復 10# Andy2483

看了這些範例，跟著範例去修改，還有點懂，自己去創建，還需要更加深入了解知識才行。

TOP

198188

高中生 Rank: 3 Rank: 3

帖子: 438
主題: 67
精華: 0
積分: 531
點名: 0
作業系統: win7
軟體版本: office 2010
閱讀權限: 50
性別: 男
註冊時間: 2012-10-30
最後登錄: 2024-11-19

11^#

發表於 2024-3-1 14:50 | 只看該作者

回復 8# hcm19522

謝謝

TOP

Andy2483

　暱稱: 厚臉皮的學生

大學生 Rank: 4

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

10^#

發表於 2024-3-1 14:44 | 只看該作者

回復 6# 198188

謝謝前輩一起學習
其實如果字典key不會重複特性與5# 的字典特性懂了,常運用就會進步

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

TOP

Andy2483

　暱稱: 厚臉皮的學生

大學生 Rank: 4

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

9^#

發表於 2024-3-1 14:36 | 只看該作者

本帖最後由 Andy2483 於 2024-3-1 14:49 編輯

回復 7# shuo1125

謝謝前輩一起學習
是的! 字典很特別
Option Explicit
Sub TEST()
Dim Z, V&
Set Z = CreateObject("Scripting.Dictionary")
V = Z("關鍵字1") + Z("關鍵字2") + Z("關鍵字3") + Z("關鍵字4") + 100
MsgBox Z.Count '此時Z字典裡已經有4個key
MsgBox Z("關鍵字1") + Z("關鍵字2") + Z("關鍵字3") + Z("關鍵字4")
End Sub
要常應用字典才能與字典成為好友

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

TOP

hcm19522

大學生 Rank: 4

帖子: 1410
主題: 4
精華: 0
積分: 1420
點名: 0
作業系統: WIN
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2015-9-11
最後登錄: 2025-5-1

熱烈參與勳章

8^#

發表於 2024-3-1 14:31 | 只看該作者

參考(搜尋編號12459) google網址:https://hcm19522.blogspot.com/

google"EXCEL迷" blog 或google網址:https://hcm19522.blogspot.com/

TOP