查看完整版本 : 超新手 vba copy求救

DDay13 2017-10-21 02:11 PM

超新手 vba copy求救

我有大量excel files (多於50),需要從每一個excel入面copy指定cell (JAN code, FOB) 到一個Result總表. 每個files產品數量不同,有機會去到3000行,希望做到效果JAN code, FOBh 各一個column方便vlookup, 如下圖
[attach]7484153[/attach] [attach]7484154[/attach]
由於初學VBA,現時我只能上網抄資料和簡單地寫出如何copy指定資料到Result, 請各位指教幫忙改動現有vba 而做到自動copy, 謝謝

[[i] 本帖最後由 DDay13 於 2017-10-23 11:17 PM 編輯 [/i]]

煙民母親生賤種 2017-10-22 01:41 AM

你段野 work 唔 work ? 如唔 work, 邊度唔 work ?

DDay13 2017-10-22 04:01 PM

[quote]原帖由 [i]煙民母親生賤種[/i] 於 2017-10-22 01:41 AM 發表 [url=http://www.discuss.com.hk/redirect.php?goto=findpost&pid=469736083&ptid=27005961][img]http://www.discuss.com.hk/images/common/back.gif[/img][/url]
你段野 work 唔 work ? 如唔 work, 邊度唔 work ? [/quote]
手動work 呀,但仲有成千幾個cell 要打,因為database 去到3000行,有無方式可以自動loop 到最後?請指教,謝謝

煙民母親生賤種 2017-10-23 03:56 AM

[quote]原帖由 [i]DDay13[/i] 於 2017-10-22 04:01 PM 發表 [url=http://computer.discuss.com.hk/redirect.php?goto=findpost&pid=469758109&ptid=27005961][img]http://computer.discuss.com.hk/images/common/back.gif[/img][/url]

手動work 呀,但仲有成千幾個cell 要打,因為database 去到3000行,有無方式可以自動loop 到最後?請指教,謝謝 [/quote]
你 D cell number 好似無特定 logic , 咁點自動 loop?:fst_016:

wtf_name 2017-10-23 08:01 AM

目測係copy every 14row, for i =0 to 999
range(“g”&14*i +9).value = ........
Next i

c0210021 2017-10-23 10:33 AM

[quote]原帖由 [i]DDay13[/i] 於 2017-10-22 04:01 PM 發表 [url=http://computer.discuss.com.hk/redirect.php?goto=findpost&pid=469758109&ptid=27005961][img]http://computer.discuss.com.hk/images/common/back.gif[/img][/url]

手動work 呀,但仲有成千幾個cell 要打,因為database 去到3000行,有無方式可以自動loop 到最後?請指教,謝謝 [/quote]

CHING,我唔係幾明你意思,你想成個COLUMN抄,還是只想抄指定CELL???

成個COLUMN抄都無問題,問題係你想點。

c0210021 2017-10-23 11:04 AM

[quote]原帖由 [i]DDay13[/i] 於 2017-10-21 02:11 PM 發表 [url=http://computer.discuss.com.hk/redirect.php?goto=findpost&pid=469705893&ptid=27005961][img]http://computer.discuss.com.hk/images/common/back.gif[/img][/url]
我有大量excel files (多於50),需要從每一個excel入面copy指定cell 到一個Result總表. Result 會有兩個人column, Column A: barcode, Column B: price

由於初學VBA,現時我只能上網抄資料和簡單地寫出如何copy指 ... [/quote]


呢個我平時用開,你睇下岩唔岩。

PM....。

kimbaby1234 2017-10-23 02:52 PM

*** 作者被禁止或刪除 內容自動屏蔽 ***

DDay13 2017-10-23 11:19 PM

[quote]原帖由 [i]煙民母親生賤種[/i] 於 2017-10-23 03:56 AM 發表 [url=http://computer.discuss.com.hk/redirect.php?goto=findpost&pid=469787175&ptid=27005961][img]http://computer.discuss.com.hk/images/common/back.gif[/img][/url]

你 D cell number 好似無特定 logic , 咁點自動 loop?:fst_016: [/quote]
Ching, sorry開頭講得唔清楚,而家重新放上圖片,這樣好點嗎?謝謝幫忙

DDay13 2017-10-23 11:20 PM

[quote]原帖由 [i]c0210021[/i] 於 2017-10-23 11:04 AM 發表 [url=http://computer.discuss.com.hk/redirect.php?goto=findpost&pid=469796057&ptid=27005961][img]http://computer.discuss.com.hk/images/common/back.gif[/img][/url]



呢個我平時用開,你睇下岩唔岩。

PM....。 [/quote]
thanks ching, 明天回公司試

煙民母親生賤種 2017-10-24 05:06 AM

[quote]原帖由 [i]DDay13[/i] 於 2017-10-23 11:19 PM 發表 [url=http://computer.discuss.com.hk/redirect.php?goto=findpost&pid=469826229&ptid=27005961][img]http://computer.discuss.com.hk/images/common/back.gif[/img][/url]

Ching, sorry開頭講得唔清楚,而家重新放上圖片,這樣好點嗎?謝謝幫忙 [/quote]
咁好易搞姐。只係 copy gen code , fob 去另一個表:fst_011:

DDay13 2017-10-24 08:01 AM

[quote]原帖由 [i]煙民母親生賤種[/i] 於 2017-10-24 05:06 AM 發表 [url=http://www.discuss.com.hk/redirect.php?goto=findpost&pid=469833302&ptid=27005961][img]http://www.discuss.com.hk/images/common/back.gif[/img][/url]

咁好易搞姐。只係 copy gen code , fob 去另一個表:fst_011: [/quote]
Ching, 可唔可以幫我寫呀、感激不盡

kanpanlo 2017-10-26 07:24 AM

好易…
段code 咁長無用
你mail 個板、同預覽結果比我

kanpanlo 2017-10-26 08:14 AM

方法是張所有excel 放在一個 folder, 用vba loop續個 開、until "", 而每開一個 excel 就找fob, jan , 用 offset copy 資料去總表

kimbaby1234 2017-11-17 11:51 PM

*** 作者被禁止或刪除 內容自動屏蔽 ***
頁: [1]
查看完整版本: 超新手 vba copy求救