• 締切済み

複数のEXCELファイルを一度にインポートするには?

150個のEXCELのファイルがあります。 列はすべて同じデータで、行数だけがファイルによって違います。 だいたいどのファイルも30行ぐらいです。 これをすべてひとつのファイルにまとめたいのですが、どのような処理をすればいいのか、今ひとつ思いつきません。 EXCELのひとつひとつのファイルを開いて、新しいファイルにひたすらコピーしていくには時間がかかるし、Accessにひとつずつインポートしていくにも時間がかかってしまうので、複数のEXCELのファイルを一度にまとめる方法がありましたら、教えていただきたいのですが。。。 とにかく150×30行のデータを一つのファイルにつくりたいのですが、何かいい方法がありましたら、ヒントでもいただけたらお願いします。 Accessはクエリ程度、EXCELは関数を使える程度で、マクロは全く初心者です。 よろしくお願いいたします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.1

質問にインポートやアクセスという語が出てくるが、関係ないのでは。アクセスもやってますよということかな。 アクセスにインポートしても、それらファイルをまとめるやり方を知らなければ何も解決にならないでしょ。 問題は、手操作では時間がかかり、同じ型の操作なので、やる気がしないということでしょう。 ーー 手作業でやらないなら、プログラムの実行でやるより他にはない。 VBAできますか。問題はそこです。 VBAでやるとするなら ーー ファイル数が多いので、個別にファイル名指定をするやり方は、プログラムでは名前を150個取り込むのが面倒。 同一フォルダーにまとめてあって、同一フォルダの全ファイルを まとめてよい(余分なものは混在しない)という状態がやりやすい。 (1)フォルダ指定 (2)フォルダ内の全ファイル名を1つずつ捉えるやり方 (3)(2)のファイル名で、ブックをオープン (4)最終行を知る。先頭行ー最終行をコピー。最終行ー先頭行+1=コピー行数 (5)まとめるブックに(4)のコピー分を張り付け。 次ぎの張り付け先頭行を計算。 前先頭行+(4)のコピー行数=次ぎ先頭行 (6)(2)以下繰り返し。 技術的には A.フォルダ内のファイル名の悉皆列挙 B。コピー先先頭行を指定しての張り付け。(コピー先が別ブックであることが特徴)。 C.最終行を知る A.はWEB照会すれば、沢山実例が載っています。 Bも「Copy」の問題なので、その関連を調べると出てくるでしょう。 Cは本コーナーでも実例はいっぱいある。

関連するQ&A

  • ACCESSでエクセルのインポート

    ACCESSでマクロを用いてタイトル行が付いているエクセルデータをタイトル行抜きでインポートをする方法を教えて下さい マクロのアクションのデータベース変換ではエクセルが選べなかたので・

  • アクセスへのインポートについて

    こんにちは。アクセスへインポートするエクセルファイルが 以下の構造になっており、どうした物か分からず困っており ます。 エクセルの1シート上にA列~IF列まで、行数は1~1200 行まで使用したデータがあります。 各セルに入力されているデータは、全て半角の文字10文字です。 又、不規則にブランクがあります。   A   B C ・・・・IF 1行目 123-456  456-321 213-901 2行目 ブランク ブランク 438-698 3行目 ブランク 361-465 ブランク  ・  ・ 1200行 このデータをアクセスのテーブル、1つのフィールドに 全部インポートするやり方が分からず、途方に暮れて おります。 アクセス、エクセルお詳しい方、何卒宜しくお願い致します。

  • Access97 Excelファイルのインポート

    はじめまして、こんにちわ。 早速ですが、質問させてください。 Access97で既存のテーブルにExcelファイルをインポートした際にエラーがでてインポートできないファイルがありました。その原因を調査している次第です。 Excelファイルは様々な担当者に作成いただく予定ですので、エラーの再現性を確認して、原因となる作業を予め禁止しておきたいと考えております。 (1)ファイル→外部データ取込→インポートからインポートするExcelファイルを選択し、インポートボタンを押したところ、『ファイル○○にアクセスできません。このファイルが存在するか、またファイルの形式が正しいか確認してください』と言うエラーが出ます。 実際にそのファイルは開けますし、同じように作成したファイルはインポートできるものもあります。 中身を全てコピーし、新規作成したExcelファイルに貼り付けて名前をつけて保存したものをインポートすると、問題なくインポートできました。 どういった作業をすると、上記エラーが出るようなファイルになってしまうのでしょうか。 (2)ファイル→外部データ取込→インポートからインポートするExcelを選択し、インポートボタンを押した後、ワークシートインポートウィザードで『先頭行をフィールド名として使う』をチェックすると、『先頭行にAccessフィールド名に使用できない文字が含まれています。』というエラーが出ます。 調べてみると、空白の列がフィールドとしてインポートされるようになっています。Excel上では何も表示されていない列で、その列を削除すればエラーがなくなります。 どういった作業をすると、空白の列や行がインポートされるようになってしまうのでしょうか。 お手数ですがよろしくお願い致します。

  • アクセス インポートファイルの再インポートを防ぐ

    アクセス2003を使用しています。 アクセスにて、エクセルファイルをインポートしています。 既にインポートしたエクセルファイルを再度インポートしないように、再取込みを行おうとした場合、 「既に取り込んでいるファイルです」とエラーメッセージを表示させて、取込み防止を行おうとしています。 クエリの重複チェックを設定していたのですが、行き詰ってしまいました。 アクセスのテーブル先頭フィールドの日付データ(yyyy/mm/dd)でチェックしたいと思っています。 教えてください。よろしくおねがいいたします。

  • ACCESSへエクセルデータのインポートについて

    お世話になります。 ACCESSのデータとしてエクセルをインポートしたいのですが、エクセルのデータ は、11行目がフィールド名になり、13行目からデータが始まっている状態です。 このようなファイルはACCESSにインポートすることが可能でしょうか 可能であれば、定期的にインポートをしたく、情報の信憑性を保ちたいと考えております。 宜しくお願い致します。

  • マクロを使ったcsvファイルのインポートの方法

    お世話になります。 ( Windows 98 Second Edition : Access 2000 ) csvファイルをマクロを使ってインポートしたいのですが アクション種類、方法がわかりません。 初心者なのですが教えてください。 決まったフォルダーにcsvファイルを入れ あとはアクセスのメニュー画面で一括処理を行なう予定です。 (拡張子はcsvですがファイルの画像はエクセルの場合エクセルと考えたほうが いいのでしょうか) ファイル名はmeisai.csv user.csv head.csvの3種類です。 全て1行目はヘッダーとして使用しています。(ファイル名、ヘッダーの名称は 変わることはありません) インポートのvbaは作れるのですがこれをマクロでどのように設定使用するかが 分かりません。 一連の作業の流れとして(これは注文データです) ・メールできた暗号化ファイルを解凍しフォルダーへいれる ・3つのファイルをインポートする ・クエリでheadとmeisaiとuserを組み合わせる ・注文票としてレポート印刷する (開くたびにサイズがデフォルトに戻ってしまうのですが解消できますでしょ うか) ・更新クエリーを使い履歴を残す ・削除クエリーを使い元のテーブルを空にする 終了 以上の作業をメニュー画面のボタン一つで出来ればと考えています。ご教授お 願いいたいます。

  • Excel → Access データをインポート

    OS WinXP Pro SP2 Office 2000 SP3 はじめまして。 マクロ(Excel VBA)を記述しているExcelファイル(Xls_Macro.xls)とインポート用データのExcelファイル(Xls_Data.xls)は別々のファイルになっていて、マクロを実行するとExcelファイルとインポート用データのExcelファイルのデータをAccessファイル(Access.mdb)にインポートする仕組みを開発しています。 インポート用データのExcelファイル(Xls_Data.xls)をADOで接続しレコードセットでデータを取得し、Accessファイル(Access.mdb)もADOで接続しレコードセットの「.AddNew」でAccessファイル(Access.mdb)に更新しようと考えています。 この考え方で問題ないのでしょうか!? もっと簡単な方法があるという方や、何か良い方法をお持ちの方 いらっしゃいましたら、よろしくお願いいたします。

  • datファイルをAccessでインポートする方法

    1行目がヘッダーです。2行目からのデータを読み込むマクロを作成したいのですがどなたかご伝授お願いいたします。VB初心者。当初、ファイル名をtxtに直したものをExcelで2行目から読み込み、保存した物をAccess2000でインポートしようと思いましたが最初からAccess2000で読み込みたいと思います。宜しくお願いいたします。

  • エクセルからアクセスへのインポートについて

    エクセルにある複数のファイルをアクセスへインポートしようとしています。エクセルには数百のシートが存在し、アクセス上で個々のテーブルにインポートしたいと考えています。一つ一つやればいいのですが、マクロなどを使って、自動的にインポートする方法はないのでしょうか?何卒よろしくお願いいたします。

  • Excelインポート時にエラー

    お世話になります。 Access2010 Excel2010 あるExcelファイル(2003形式)をAccessにインポートした際、以下のエラーが出ました。 「ファイル '<パス\ファイル名.xls>' の情報にアクセスできません。ファイルが存在し、形式が正しいことを確認してください。 」 調べたところ以下の情報がありましたが、当該Excelファイル以外のインポートは問題無くでき、他のPCでも同症状が出るので、該当しないとの認識です。 http://support.microsoft.com/kb/283881/ja Accessへのインポート作業は毎日行っておりますが、先日より急にエラーがでるようになりました。 色々試したところ、 ・エラーの出るExcelファイルを開き、別の名前で保存し、そのファイルをインポートしてもエラー。 ・エラーの出るExcelファイルを「開いて修復する」で修復して保存し、そのファイルをインポートしてもエラー。 ・新規Bookを作成し、エラーの出るExcelファイルのシートコピーし、その新規Bookをインポートすると問題無し。 ・エラーの出るExcelファイルを開いて.xlsx形式で保存し、そのファイルをインポートすると問題無し。 ・上記の.xlsxファイルを.xls形式で保存し、そのファイルをインポートすると問題無し。 上記の結果から、作成し直すことによりエラーは解消されておりますが、原因としてはどのようなことが考えられますでしょうか。 インポート時にエラーの出るExcelは  ・フィールド(見出し)は100程度  ・行は50,000行程度  ・ファイルサイズは46MB です。 行数やサイズの問題かと思い、行を削除しサイズを減らした状態でインポートしてみましたが、やはりエラーとなってしまいました。 また、表外の列及び行も念のため削除しましたが状況変わらずでした。 なお、エラーの出るExcel自体は普通に開くこともでき、追加/修正/削除も可能で保存もできます。 ご教授の程、宜しくお願い致します。

専門家に質問してみよう