同一フォルダ内にある複数のExcelブックから特定シートの特定セル値を抽出して一覧表にまとめるExcel マクロ(VBA)を教えてください。
よく似ている質問、回答を読んだのですが、私のレベルではとても応用できず質問させていただきます。
全く同じものがあれば、そのアドレスを回答いただくだけでも助かります。
【前提】
・実行する端末のOSはWindows XP(SP3)、Excelは2003
・対象フォルダはネットワーク接続フォルダ「\\share\target」
この中に、複数のExcelブックがあります。
・抽出したい対象は、各ブック内の「概要」シートの「C3」セルで統一されています。
【抽出一覧作成イメージ】
・「集約.xls」ブックの「Sheet1」の2行目から抽出した結果を一覧表示する。
・表示はA列に抽出元ブック名(=ファイル名)、B列に抽出元C3セルの値。
・C3セル値を「集約.xls」ブックの「Sheet1」に貼り付ける際には「値で貼り付ける」が望ましい。
というようなイメージです。
とても勝手なお願いではありますが、宜しくお願いいたします。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
作成例:
sub macro1()
dim myPath as string
dim myFile as string
mypath = "\\share\target\"
myfile = dir(mypath & "*.xls")
do until myfile = ""
workbooks.open mypath & myfile
with workbooks("集約.xls").worksheets("Sheet1").range("A65536").end(xlup)
.offset(1, 0).value = myfile
.offset(1, 1).value = workbooks(myfile).worksheets("概要").range("C3").value
end with
workbooks(myfile).close savechanges:=false
myfile = dir()
loop
end sub
集約ブックを開いて置いて実行する
通常は集約ブックにマクロを登録しておくのが良い
新しいマクロの記録で、目的のブックを実際に開く操作を記録マクロに録って、ファイルの指定の正しい記述を一回確認してマクロに反映すること。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelの複数ファイルの複数行を別ファイル1つのシートにVBA、マクロで集約する方法 5 2022/09/13 06:30
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
- Excel(エクセル) EXCEL マクロで 同じフォルダ内の複数ファイルの複数行全体を選択して1つのファイルに集約 4 2022/09/27 18:41
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
- Excel(エクセル) マクロVBA別Excelブックにデータ転記 2 2022/07/10 23:35
- その他(プログラミング・Web制作) pythonでクラスで複数のメソッドを利用する方法 2 2022/04/15 04:17
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/02/07 09:58
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) 複数セルデータを別シートの単一セルにコピーしたい。(詳細をご参照ください) 1 2022/12/14 15:08
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
フォルダ内の複数ファイルから、特定セルだけを抽出し、並び替えて集約したい
Excel(エクセル)
-
ブックを開かずに、フォルダ内にある複数ブックの、特定セルの値を抽出した
Excel(エクセル)
-
複数ファイルから特定シートのコピー
Excel(エクセル)
-
-
4
複数エクセルから特定シートの特定行だけを別シートに抽出するマクロ
Excel(エクセル)
-
5
複数のExcelファイルにある同名シートを1つのシートに一括でまとめるには?
Excel(エクセル)
-
6
Exel VBA 別ブックから該当データを検索し、必要なデータを取得する方法について
Visual Basic(VBA)
-
7
【Excel】別のブックにある複数のシートからデータを抽出するには?
Excel(エクセル)
-
8
Excel、同じフォルダ内のExcelファイルの特定シートのみを1つのファイルに集約したい
Excel(エクセル)
-
9
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
10
【Excel】数式をそのまま他のシートにコピーする方法
その他(Microsoft Office)
-
11
マクロを複数シートに実行するには?
Excel(エクセル)
-
12
【VBA】フォルダ内の複数Excelのセルと列をコピー
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
マクロの保存先、開いてるすべ...
-
【Excel VBA】マクロでExcel自...
-
エクセル関数>参照ファイル名...
-
【Excel】マクロの保存先について
-
EXCELマクロで、開いてはいるが...
-
エクセル;相対パスを絶対パスへ...
-
excelで直前に参照していたブッ...
-
マクロ 自動でパスワード及び指...
-
【Excel】特定セルの内容をテキ...
-
ファイル名変更後も、マクロを...
-
複数のbookから特定のセル(行...
-
複数のExcelファイルの印刷設定...
-
エクセルVBAで作成した別ブック...
-
エクセルで未保存に対するメッ...
-
EXCELのボタンによるマクロの登...
-
ExcelVBAで困っています。
-
同一フォルダ内のファイルを開く
-
エクセルVBA 個人用マクロブッ...
-
個人用マクロブックが消えました
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
エクセル関数>参照ファイル名...
-
【Excel VBA】マクロでExcel自...
-
マクロの保存先、開いてるすべ...
-
エクセル;相対パスを絶対パスへ...
-
【Excel】マクロの保存先について
-
excelで直前に参照していたブッ...
-
EXcelのマクロで相対パスでファ...
-
エクセルVBAで作成した別ブック...
-
【マクロ】必要な項目(列)の...
-
複数のExcelファイルの印刷設定...
-
エクセルのvbaにて thisworkboo...
-
エクセルで未保存に対するメッ...
-
名前の変わるブックをアクティ...
-
ファイル名変更後も、マクロを...
-
エクセルVBA 個人用マクロブッ...
-
EXCELのボタンによるマクロの登...
-
個人用マクロブックが消えました
-
【Excel】特定セルの内容をテキ...
-
【マクロ】マクロが保存されて...
おすすめ情報