![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
No.1ベストアンサー
- 回答日時:
良くコピーで処理しようとする質問が多いですが、判りやすい、書式等含めて移るなど良い点もありますが、反面コピーの貼りつけは、VBA学習していて、難しい面もあります。
(1)下記例ではブックaa2のシートAabで、セル値を
ブックaa3のシートAabに渡せる状態になったときに
実行すれば、値がコピーされます。
Sub test04()
Workbooks("aa2.xls").Worksheets("sheet1").Range("c10") = _
Workbooks("aa3.xls").Worksheets("Aab").Range("c3")
End Sub
(2)コピー貼りつけなら
ブックaa3のシートAabでの範囲A1:C3を、
ブックaa2のシートSheet1のC10から(E12に)に貼りつける。
Sub test05()
Workbooks("aa3.xls").Worksheets("Aab").Range("A1:c3").Copy
Workbooks("aa2.xls").Worksheets("sheet1").Activate
ActiveSheet.Range("c10").Select
ActiveSheet.Paste
End Sub
最後の3行の部分(直ぐPasteしない点)が失敗経験後学んだものです。
No.2
- 回答日時:
Bファイルの名前を Book_B とします。
Book_BはAファイルと同じ場所にあるものとします。
Aファイルの処理結果はSheet1にあるものとします。
コピーは値と書式のみとします。
以上の前提ですと、Aファイルの標準モジュールに下記のマクロを組みこみ、処理が終った段階で実行すればそのようになり、Bファイルは保存されて自動終了します。
Sub test()
mypath = ThisWorkbook.Path
Workbooks.Open Filename:=mypath & "\Book_B.xls"
Sheets.Add
ThisWorkbook.Sheets("Sheet1").Cells.Copy
ActiveSheet.Cells.Select
Selection.PasteSpecial Paste:=xlValues
Selection.PasteSpecial Paste:=xlFormats
ActiveSheet.Name = Format(Date, "yymmdd")
ActiveWorkbook.Save
ActiveWindow.Close (False)
Application.CutCopyMode = False
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Excel(エクセル) VBA ふたつの同じ様式シートのセルをコピーしたい 2 2023/03/08 15:28
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2022/03/25 17:03
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/06/04 09:39
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2022/08/04 13:56
- Excel(エクセル) Excelのマクロについてご教授ください 2 2023/02/25 09:43
- Excel(エクセル) Excel、同じフォルダ内のExcelファイルの特定シートのみを1つのファイルに集約したい 8 2022/09/07 15:12
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/24 08:33
- Excel(エクセル) 【マクロ】エラーが発生⇒実行時エラー58既に同名のファイルが存在 5 2022/08/31 10:03
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/04 10:48
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセル 複数ファイルの一括...
-
フォルダ内のexcelファイルを順...
-
エクセルマクロで不特定なファ...
-
エクセルのシートの数を数えた...
-
エクセルのxls形式からxlsx形式...
-
ワード2007で複数ファイル自動...
-
ファイルの保存場所を変えたら...
-
エクセル(マクロ)のファイル...
-
ファイルを開かずにマクロを実行
-
ファイル名を変更するマクロ
-
【マクロ】名前を保存する際に...
-
VBAでワークブックの名前を変数...
-
新規 xlsmファイルにする方法...
-
【Excel VBA】ファイル名が一...
-
VBAでフォルダ内の全てのcsv...
-
フォルダ内のブック全部にパス...
-
VLookupで参照する範囲を変数で...
-
Excelファイルを開いた時に、特...
-
ISOファイルとMDSファイル
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセルマクロで不特定なファ...
-
フォルダ内のexcelファイルを順...
-
VBAでワークブックの名前を変数...
-
エクセル(マクロ)のファイル...
-
エクセルのxls形式からxlsx形式...
-
エクセル 複数ファイルの一括...
-
エクセルのシートの数を数えた...
-
【マクロ】名前を保存する際に...
-
【Excel VBA】ファイル名が一...
-
ファイルを開かずにマクロを実行
-
accessフォルダを移動したらフ...
-
フォルダ内のブック全部にパス...
-
vlookup関数の引数を変数で指定...
-
Excel VBA でファイルが開かれ...
-
ファイルの保存場所を変えたら...
-
Accessのaccdbファイルを起動で...
-
リンク切れチェックを行うマクロ
-
エクセルマクロ 異なるファイ...
-
データ参照先が別ファイルの場...
おすすめ情報