![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
お世話になります。質問を締め切ってしまい、回答者の方からご連絡いただいたので改めて投稿させていただきます。
同一フォルダ内にある複数のファイル(.xlsx)を一つのファイルに統合するマクロを考えております。
以下内容でツールを作りたいと思っています。何かヒントになるソースコードがありましたらご教示いただけないでしょうか?(現段階で、1つのファイルをコピー複製し、それに他ブックのデータを、配列などを用い追記できないかと考えていますが、まだそこに至っておりません。)
ファイル数は毎回変わります(20~30程度)
データ数はマージした後で最大でも10万レコードはいかない程度
シート数は10程度、見出し内容は固定で1~3行目までが見出し(項目により、行結合してあったり2段になっていたりしますが、データの左上端は必ずセルA3です)
シートごとにデータをマージしたいです。
フォルダ指定について
フォルダ指定は、参照ボタンでユーザーに選択してもらう
出力先もボタンを押し、毎回ユーザーに選択してもらいます
以上どうぞよろしくお願いいたします。
自分の考えた方法ですが、まずはじめの、ファイルを複製する方法については、別投稿で質問させていただきました。
![「複数ファイルのデータの統合について」の質問画像](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/6/542937677_627f1b617462b/M.jpg)
No.2
- 回答日時:
No1の補足3についてです。
添付図の場合、最大行数は10行になりますが、A列を基準にして求めると、
最大行数は9行になります。(A列に歯抜けのセルがあるため)
このような事態が発生すると正しく行数を算出できなくなります。
全てのシートについて、「A列に歯抜けのセルがあるケースはない」
前提で良いでしょうか。
![「複数ファイルのデータの統合について」の回答画像2](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/2/543026052_627f2c4bee613/M.png)
ありがとうございます。見出し行のイメージを追加しました。見出し行に歯抜けはない状態です。見出し項目数(列の数)は60程度あります。
No.1
- 回答日時:
以下の前提であってますか。
1.すべてのシートについて、見出し行が3行分あり、データは4行目から開始する。
2.マージする際は、最初のファイルについては、見出しを含めてマージ先のシートに格納し、2番目以降のファイルについては4行目以降をマージ先のシートに追加する。
3.各シートの行数は、全てA列で決定を行うものとする。
従って、A列のデータ(4行目以降)に歯抜けのデータはない。
(歯抜けとは途中の行が空白になっているセル)
4.マージしたファイルのファイル名は、何でしょうか?
5.ファイルをマージする順番は、Dir関数で取得した順になりますが、
それでよろしいでしょうか。
https://oshiete.goo.ne.jp/qa/12945379.html
の質問は、ファイルのマージについてでしたので、
フォルダの指定については、想定していませんでした。
フォルダの指定については、後ほど追加で補足要求させていただきます。
まずは、ファイルのマージの際の要件を確認したいと思っています。
ご回答ありがとうございます。前提はすべて合っております。シート数は10程度で、データがブランクの場合もあります。
おっしゃる通り、フォルダ指定については、前回の質問では一旦は置いておこうと思っていたため触れておりませんでした><
ファイル名は仮で【AAA】売上管理表_yyyymmdd_01.xlsx
となります。同日の出力データがあると01,02,03などと連番になります。
仮に02があるとしてもレコードがいっぱいになって02になるわけではなく
同日のうち2回データを取得すると02のブックが作成されるようです。
(レコードの重複の有無については、、すみません、未確認です。)
例
【AAA】売上管理表_20220420_01.xlsx
【AAA】売上管理表_20220420_02.xlsx
【AAA】売上管理表_20220421_01.xlsx
統合後のファイル名は冒頭に「マージ」とつける等にしたいと考えております。
どうぞよろしくお願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel VBA 複数ブックシートごとにデータを統合する方法について 4 2022/05/20 14:23
- Visual Basic(VBA) 複数ブックの統合について Excel VBA 1 2022/05/13 09:48
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Excel(エクセル) Excel、同じフォルダ内のExcelファイルの特定シートのみを1つのファイルに集約したい 8 2022/09/07 15:12
- Excel(エクセル) EXCEL マクロで 同じフォルダ内の複数ファイルの複数行全体を選択して1つのファイルに集約 4 2022/09/27 18:41
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/06 17:46
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 11:27
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【Excel】[Expression.Error] ...
-
特定のエクセルファイルを起動...
-
共有フォルダに誰が何にアクセ...
-
Batch: フォルダ内の特定のファ...
-
VBAでCSVファイルが使用中かど...
-
AccessVBAで作成したExcelファ...
-
大量のCSVデータを行列の変換を...
-
事務の派遣で働いています。多...
-
CSVファイルのデータがA列にま...
-
tmpファイル なぜできる?削除...
-
iniファイル内の行を削除する方法
-
Accessのエラー対処法
-
access関数を説明できる方いま...
-
XMLデータを変換し印刷する方法
-
月が変わったら自動でシートが...
-
(Excelマクロ)datファイルをエ...
-
Access VBA を利用して、フォル...
-
【アクセス】「ほかのユーザー...
-
ファイルの途中に文字列を挿入
-
phpで連番
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【Excel】[Expression.Error] ...
-
共有フォルダに誰が何にアクセ...
-
特定のエクセルファイルを起動...
-
VBAでCSVファイルが使用中かど...
-
Batch: フォルダ内の特定のファ...
-
(Excelマクロ)datファイルをエ...
-
月が変わったら自動でシートが...
-
mdbファイル フォームを開くと...
-
tmpファイル なぜできる?削除...
-
AccessVBAで作成したExcelファ...
-
ファイルの途中に文字列を挿入
-
Access VBA を利用して、フォル...
-
excelを共有ファイルにすると行...
-
拡張子が「cda」のファイルを聞...
-
Excel VBA 処理後データが重た...
-
【アクセス】「ほかのユーザー...
-
社内Excel共有ブックでの保存ト...
-
大量のCSVデータを行列の変換を...
-
XMLデータを変換し印刷する方法
-
Dream weaverで、誤ってファイ...
おすすめ情報
訂正 ファイルのデータ部分、左上端はA3ではなくA4でした。
統合するデータの見出しイメージです。