Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2764 / 76735

←次へ　｜　前へ→


	【79611】データを別のブックのシートにペーストするVBA

VBASHOSHIN - 18/2/6(火) 14:31 -


	引用なし

	パスワード

お世話になっております。

以下のVBAを作ったのですが、"ActiveSheet.Paste Destination:=Worksheets("当月").Range("A3")"がエラーになってしまいます。どのように修正すればよいか
教えてください。

Sub CH()
Columns("a:e").Copy
Application.FindFile
Workbooks("B").Worksheets("当月").Activate
ActiveSheet.Paste Destination:=Worksheets("当月").Range("A3")
End Sub

やりたい事
1)開いているブックのシートにあるA列からE列をコピー。
2)貼り付けるブックを選択。
3)貼り付け先のブックの「当月」シートをActivateにする。
4)「当月」シートのA3から貼り付けたい。

よろしくお願いします。

5 hits

▼

【79611】データを別のブックのシートにペーストするVBA VBASHOSHIN 18/2/6(火) 14:31