idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2015-4-12 15:44 | 顯示全部帖子

[發問] EXCEL VBA 的問題

請問附表的檔案中，如何在工作表1中表格，使用VBA找出甲、乙、丙的最後一列數值和日期寫到工作表2中，請叫有路過的大哥可以指導一下，謝謝

另再請教，假如甲乙丙丁(欄位)有很多個，那VBA的語法又該如何調整呢

tt.rar (7.22 KB)

TT

樓主熱帖

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

2^#

發表於 2015-4-13 08:30 | 顯示全部帖子

感謝大大的回復，我來研究試試看，不懂的，希望您可以接受我的請益
謝謝

TOP

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

3^#

發表於 2015-4-13 12:59 | 顯示全部帖子

請問阿lpk187大大
執行的結果有點不一樣
另外loop好像太多次

TOP

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

4^#

發表於 2015-4-13 14:06 | 顯示全部帖子

大大，謝謝，可以和你線上請益依下嗎

TOP

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

5^#

發表於 2015-4-13 14:22 | 顯示全部帖子

哇謝謝版主出手回應
小弟才學粗淺，可能要好好的研讀了
還是十分感謝版主

TOP

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

6^#

發表於 2015-4-13 20:08 | 顯示全部帖子

回復 9# lpk187

想就教，你的第3行的語法，是否可以稍做說明一下
謝謝

TOP

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

7^#

發表於 2015-4-13 23:59 | 顯示全部帖子

謝謝，請教，VBA的畫面中，您有使用即時監看視窗來輔助您的程序直行嗎

TOP

idnoidno

中學生 Rank: 2

帖子: 52
主題: 12
精華: 0
積分: 63
點名: 0
作業系統: window
軟體版本: XP
閱讀權限: 20
註冊時間: 2014-8-15
最後登錄: 2023-3-24

8^#

發表於 2015-4-14 00:09 | 顯示全部帖子

For Each Rng In 工作表1.Range("B1", 工作表1.Cells(1, Columns.Count).End(xlToLeft).Address) '第一列"動態"讀取做循環
這一列中用法，您可否再予以指導說明一下
另外動態讀取做循環的中文意思有點不清楚
真的感謝您可以回復，謝謝

TOP

idnoidno