マクロでブック間の移動に関して

以下のようなマクロを組んだのですが、動かすパソコンによってブック○○○に移動できないでエラーになってしまうことがあります。
原因がわからなくて困っています。
詳しい方、対処法教えてください。よろしくお願いします。

Columns("A:AM").Select
Application.CutCopyMode = False
Selection.Copy

Workbooks("○○○").Worksheets("×××").Activate
Columns("B:B").Select
ActiveSheet.Paste

No.2 回答者： keithin 回答日時： 2010/04/09 11:49

＞動かすパソコンによってブック○○○に移動できない

移動できないパソコンの画面を，あなたはご自分の目で見て確認していますか？
１つの可能性として，マクロの動いているブックが動いているエクセルと，別に起動したエクセルでブック○○の方を開いて使おうとしているかも知れません。

正しい手順
１．マクロを動かしているブックを開く
２．そのエクセルのファイルメニューの開くで○○ブックを開く
　　または○○.xlsをＷクリックして開く
３．ファイルメニューの整列を行い，確かに１つのエクセル画面の中で２つのブックが並んでいることを確認する
４．マクロを動かす

この回答へのお礼

拡張子の表示設定を変えることで解決しました。
回答ありがとうございましたm(_ _)m

お礼日時：2010/04/09 12:16

No.1 回答者： KURUMITO 回答日時： 2010/04/09 11:34

次にように１部分を変えてみてはどうでしょう。

Workbooks("○○○").Activate
Sheets("×××").Select
Columns("B:B").Select
ActiveSheet.Paste

この回答へのお礼

拡張子の表示設定を変えることで解決しました。
回答ありがとうございましたm(_ _)m

お礼日時：2010/04/09 12:16