ブック(1)のシート(1)にある複数の離れたセル(B2,D2,C3,F3,B4:F4)をコピーし、別ブックのシート(1)のセル(B2,D2,C3,F3,B4:F4)へリンク貼り付けを実行するためのマクロを教えてください。
なお、ブック(1)とブック(2)はイントラの共有フォルダ上の同一階層に置いてあります。
このブック(1)と同一フォーマットのブックが複数存在し、上記同様にブック(2)の離れたセルをコピーして別ブックのシート(2)のセルへリンク貼り付け。
続いて、ブック(3)の同じセルをコピーし別ブックのシート(3)へリンク貼り付けと言うように、同じセルをコピーし別シートの同じセルへリンク貼り付けの作業を繰り返し行います。
まったく同じ位置のセルをコピー&リンク貼り付けを繰り返し行いたいので、マクロを使って自動実行させたいと思っています。
離れたセルのリンク貼り付けは出来ないのかもしれないですが、アドバイスを頂けると助かります。
宜しくお願い致します。
No.2ベストアンサー
- 回答日時:
マクロの一例です。
アクティブシートにリンク式を書き込みます。
Sub test1()
Dim mylink As String
Dim lnkrrng As Range
Dim lnkcell As Range
mylink = "='D:\[ブック(1).xls]シート(1)'!"
Set lnkrrng = Range("B2, D2, C3, F3, B4:F4")
For Each lnkcell In lnkrrng
lnkcell.Formula = mylink & lnkcell.Address
Next
End Sub
この回答への補足
早々のご回答をありがとうございます。
早速試してみた所、希望通りの結果を得ることができました。
このリンク貼り付けのマクロをファイル開く度に同時に自動実行させたいと思っておりますが、出来ますでしょうか?
お手数お掛けいたし大変恐縮ではございますが、宜しくお願い致します。
No.3
- 回答日時:
> マクロをファイル開く度に同時に自動実行させたいと思っておりますが、出来ますでしょうか?
もちろん出来ますよ。
Sub Auto_Open()
'行いたい処理のコード
MsgBox "自動実行しました。", , " ( ̄ー ̄)v"
End Sub
早々のご回答をありがとうございました。希望通りの結果を得ることができました。また質問等をさせていただくこともあるかと思いますが、宜しくお願い致します。
No.1
- 回答日時:
マクロではありませんがこんな方法もあります。
新規でフォルダーを作りフォルダー(a)とします。元のブック(1)とブック(2)をフォルダー(1)に移動します。
フォルダー(a)をコピーしてフォルダー(b)とします。
フォルダー(b)内のブック(1)とブック(2)はフォルダー(a)内のブック(1)とブック(2)と同じ関連を保っています。
注意:フォルダー(b)内のブック(1)とブック(2)のブック名を変えるとブック(2)開く時に警告が出ます。
この場合 「リンク元の変更」をすれば解決します。
「更新する」を選び「リンクの編集」そして「リンク元の変更」です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) マクロVBA別Excelブックにデータ転記 2 2022/07/10 23:35
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/03/25 08:33
- Excel(エクセル) エクセルのマクロでコピー後の貼り付け先を毎回指定したところにしたい 5 2022/08/12 10:47
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/01/26 09:50
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Excel(エクセル) エクセル ブック間のコピー 5 2022/04/24 08:11
- Excel(エクセル) 複数のExcelブックのシート1の内容を1つのExcelブックにコピー貼り付けたいのでvbaコードを 7 2023/02/10 23:20
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルを共有するとPCによっ...
-
WorkBooksをオープンさせずにシ...
-
VBAでブックを非表示で開いて処...
-
エクセルの関数 ENTERを押...
-
フォルダ内の複数ファイルから...
-
【マクロ】【VBA】別ブックへの...
-
Excelでブックの共有を掛けると...
-
エクセルシートの一部を送りたい
-
VBA バックグラウンドで別ブッ...
-
エクセルで参照しているデータ...
-
Excelで指定範囲のデータ...
-
Excelファイルを開いても何も表...
-
Excel起動時に特定のワークシー...
-
エクセルファイルのバージョン...
-
エクセル 複数のブックを一度...
-
ブックのピボットを別ブックに...
-
シートを別のブックに複数自動...
-
VBAでブック保護非保護を判定す...
-
Excel VBA セルと同じ名前のブ...
-
エクセルで別ブックをバックグ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルの関数 ENTERを押...
-
VBAでブックを非表示で開いて処...
-
エクセルを共有するとPCによっ...
-
WorkBooksをオープンさせずにシ...
-
エクセルで参照しているデータ...
-
エクセルで「ディスクがいっぱ...
-
Excelでブックの共有を掛けると...
-
Excelで複数ブックの同一セルに...
-
Excel(2010)のフィルターが保...
-
エクセルで別ブックをバックグ...
-
エクセルにおける,「ブック」...
-
同じフォルダへのハイパーリン...
-
ブックのピボットを別ブックに...
-
エクセルファイルを開かずにpdf...
-
エクセル2016です。「ブッ...
-
ブックの保護ができないんです...
-
エクセルで50行ごとに区切った...
-
エクセルシートの一部を送りたい
-
フォルダ内の複数ファイルから...
-
エクセル 複数のブックを一度...
おすすめ情報