[算表] VB選取原檔案之資料 複製 貼上

看板Office作者 (Endless Fighting)時間1年前 (2022/10/27 15:02), 編輯推噓2(206)
留言8則, 3人參與, 1年前最新討論串1/1
軟體:excel 版本:office 365 我是VB新手,在錄製巨集,想要用巨集將 A檔案的庫存資訊 存入 B檔案之中 庫存資訊大概是兩個資訊,料號及數量 料號 數量 100-100-100 50 100-100-200 49 100-100-300 30 因為隨著新產品開發,會有新的料號產生,但是若執行巨集 只會將原本錄製的三列複製到B檔案之中 (以上面的例子就是 B2:B4) 想要請問VB有辦法寫出找到 A欄最後有值的欄位 (例如我又進了兩個貨) 料號 數量 100-100-100 50 100-100-200 49 100-100-300 30 100-100-400 20 100-100-500 25 以這個例子,是B2:B6的值複製到 B檔案去嗎? 不然每次有新產品,我就得進VB去修改,就沒有巨集的方便性了 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.194.137.131 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1666854174.A.B0B.html

10/27 16:50, 1年前 , 1F
UsedRange 參考看看?
10/27 16:50, 1F

10/27 16:52, 1年前 , 2F
如果是新手我覺得先複製全部列數的內容
10/27 16:52, 2F

10/27 16:52, 1年前 , 3F
然後把複製後的"料號 數量"那列刪掉可能比較簡單
10/27 16:52, 3F

10/27 20:50, 1年前 , 4F
r = Columns("A:E").Find("*", , -4163, , 1, 2).Row
10/27 20:50, 4F

10/27 20:50, 1年前 , 5F
r = Columns("B:B").Find("*", , -4163, , 1, 2).Row
10/27 20:50, 5F

10/27 20:51, 1年前 , 6F
debug.print r
10/27 20:51, 6F

10/28 11:09, 1年前 , 7F
〔A65536〕.end (xlup).row
10/28 11:09, 7F

10/28 11:09, 1年前 , 8F
先定義A欄最後一列
10/28 11:09, 8F
文章代碼(AID): #1ZMYqUiB (Office)
文章代碼(AID): #1ZMYqUiB (Office)