vba マクロの神きてくれ

1 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:33:35.335 ID:XTqO1+c10.net

Book1のsheet1にあるデータを
コピーしてBook2のsheet1にコピーしたい

RangeとCellsを組み合わせて、位置をforで動かしながらコピペしたい
なぜか1004エラーが出まくって動かねえ
助けてくれ

2 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:34:40.928 ID:VUJT8tbL0.net

取り敢えず今どんな感じになってるのか、ソース貼ったほうが具体的なアドバイスもらえると思うよ

3 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:34:43.689 ID:TMiohETf0.net

下々の者だけど、エラーメッセージでググればヒントにはなるんでないかしら？

4 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:34:52.754 ID:3eQ3bBnY0.net

コード全部貼ってくれないと指摘できない

5 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:35:05.036 ID:ilowmio9r.net

同じフォルダにあるの？

6 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:35:35.594 ID:r1c/ZTtr0.net

会社で毎週作る資料がそんな感じの処理してたわ
思い出せたらかくわ

7 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:35:57.080 ID:3fyI7byMM.net

google先生に聞け

8 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:36:06.306 ID:XTqO1+c10.net

コード貼りたいけど、かいしゃのpcだから今は取り出せねえ

9 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:37:04.433 ID:XTqO1+c10.net

>>5
いや、別のフォルダだけど、
fileをopenして同時にどっちのブックも立ち上がるようにしてる

10 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:37:15.597 ID:XTqO1+c10.net

>>6
頼むぜ

11 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:37:35.290 ID:DS9uVZcDM.net

参照エラーだから見に行った先に期待するものがなくて発狂してるんだよ

12 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:37:53.140 ID:Ee1gLSMY0.net

1 「実行時エラー ‘1004’」エラーがおこる原因・対処方法とは
1.1 存在しないファイルを開こうとしたとき
1.2 Cellsプロパティの選択範囲に値を入れ忘れてしまったとき
1.3 コピー元とコピー先のセル範囲が違うとき
1.4 アクティブになっていないシートのセルを選択したとき

1.4じゃない？　シートを入れ替えて処理するときにアクティブになってない

13 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:38:09.697 ID:3eQ3bBnY0.net

どうせシート名に半角スペースが隠れてるとかそんなオチじゃねえの

14 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:38:33.276 ID:ilowmio9r.net

>>9
それならパスが合ってないとか権限がないとかってことはないさそうだな

15 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:39:13.424 ID:XTqO1+c10.net

>>12
なるほど
片方アクティブにして、マクロ側のエクセルをThisworkbookで指定する感じにしてるんだがそれでは無効なのかな

16 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:39:40.290 ID:mE+feQ720.net

Activate抜けてるかBook名忘れてるか

17 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:40:14.308 ID:XTqO1+c10.net

>>13
シート名とかパスの指定は合ってるみたいで
一応ちゃんとどっちのファイルも開くんだよな

18 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:40:26.110 ID:VUJT8tbL0.net

>>15
そんなんしないでもブックを変数にいれて直接指定したらよくね

19 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:41:06.376 ID:3eQ3bBnY0.net

どこでエラー吐くかちょこちょこmsgbox入れて調べてみたら？

20 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:41:07.170 ID:XTqO1+c10.net

Activateするなら、コピー元からコピー先どっちをアクティブにすれば良いのかな

21 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:41:44.843 ID:XTqO1+c10.net

>>18
ごめん、その形式でやってた
表現がおかしかった

22 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:41:48.827 ID:VUJT8tbL0.net

Activateなんてすな遅くなる
直接指定しろ

23 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:42:13.640 ID:XTqO1+c10.net

>>19
それやってみるとコピペ元を参照できてないっぽいんだよ

24 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:42:24.752 ID:6Pd9qCLRa.net

三夜連続マクロ🤗

25 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:43:25.699 ID:XTqO1+c10.net

くっそー
ここにいる人らなら、ソースさえあれば一撃で解決できそうなのになあ

26 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:43:28.314 ID:VUJT8tbL0.net

F8でステップ実行してどこで引っかかるか見てみたら

27 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:44:00.553 ID:XTqO1+c10.net

>>26
コピーするとこで止まっちゃう

28 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:45:08.381 ID:VUJT8tbL0.net

>>27
あーソースがあればなー

29 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:45:40.180 ID:ilowmio9r.net

貼り付けじゃなくてコピーの時？
セルの指定がおかしいんじゃない？

30 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:45:58.185 ID:cCR4ARdC0.net

むしろ何で転けてるかが分からん
コピー元、ペースト元の位置指定は正しく出来てるの？

31 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:47:47.623 ID:l1de4l1La.net

コピーする時ってファイルオープンした直後でしょ？
変にファイル指定せずにアクティブシートでコピーすればいいんじゃないの？

32 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:48:13.315 ID:XTqO1+c10.net

>>29
wb ワークブック名
ws ワークシート名

wb.ws.Range(cells(1,i),cells(3,i)).copy

としてる
wbとwsと変数になってる
この２つの中身は合ってることが確認できてる

33 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:49:11.289 ID:XTqO1+c10.net

>>31
開いた後特定のシートを指定してから、そのシートのセルをコピーする処理をしてる

34 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:51:35.150 ID:VUJT8tbL0.net

>>32
copyの後はどうしてる？
てかいちいちcopyしないで直接代入するんじゃ駄目なん？

35 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:52:01.761 ID:3eQ3bBnY0.net

じゃあアクティブワークブック.シート名でいいんじゃねえか

36 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:53:43.669 ID:geDiezPv0.net

レベル低すぎてワロタ

37 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:58:25.124 ID:TFDKLtqh0.net

ソース貼れ、話はそれからだ

38 ：以下、？ちゃんねるからVIPがお送りします：2020/02/18(火) 21:59:53 ID:UmFfcu/y0.net

(´･ω･`)きたぞ