Excelで他のExcelファイルからデータ抽出
- Excelのマクロを使って他のExcelファイルからデータを抽出する方法を教えてください。
- データ抽出の際にパスワード入力を省きたいです。また、特定の期間のデータを抽出する方法を知りたいです。
- 抽出先のセルにデータがない場合は、データを返さないようにしたいです。
- ベストアンサー
Excelで、他のExcelファイルからデータ抽出
はじめまして。 タイトル通り、Excelのマクロで、他のExcelファイルのデータを抽出するマクロを作っています。 http://okwave.jp/qa/q3681193.html 上記ベストアンサーQ&Aを参考にして、他のExcelファイルからデータを持ってくるマクロを作ることは出来たのですが ・パスワードのかかったファイルから抽出する際は、パスワードの入力を省きたい(パスワードは全て同一)。 ・シート名は月日表示(0129など)になっており、何月何日から何月何日までのデータを持ってくるか指定出来るようにしたい。 ・抽出先のセルに何もデータがないときは何もデータを返さないようにしたい(現状は"0"が返ってきます)。 上記3点が上手く出来ず、詰まっている状態です。 何かいい方法があれば、ご教授願いたく質問をさせていただきました。 よろしくお願いいたします。
- sjzh_982
- お礼率0% (0/2)
- その他MS Office製品
- 回答数1
- ありがとう数0
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
Sub Sample1() Dim o As Object Dim w As Workbook Dim d1 As Date, d2 As Date Dim d, n Do d1 = Application.InputBox("start date", Type:=1) If d1 = 0 Then Exit Sub Loop Until IsDate(d1) Do d2 = Application.InputBox("end date", Type:=1) If d2 = 0 Then Exit Sub Loop Until IsDate(d2) On Error Resume Next n = 0 Set o = CreateObject("Excel.Application") Set w = o.Workbooks.Open(Filename:="c:\test\book1.xls", Password:=1) For d = d1 To d2 ThisWorkbook.Worksheets("Sheet1").Range("A1").Offset(n).Value = w.Worksheets(Format(d, "mmdd")).Range("A1").Value n = n + 1 Next d w.Close False Set o = Nothing End Sub
関連するQ&A
- Excelマクロ 他のファイルからデータ抽出・・
パソコンに疎いため、とんちんかんな質問でしたらすみません。。 マクロによって、複数のExcelファイルよりデータを抽出することが可能かと思います。 Excelファイルではなく別の拡張子のファイルを読みに行くことは可能ですか? プロパティで「ファイルの種類」がESDファイルとなっているファイルからデータを抽出したいのですが、マクロでこのようなファイルの指定が可能なのか知りたいです。このESDファイルはexcelで開けるので、問題ないような気がしているのですが不安です。 宜しくお願いします。
- ベストアンサー
- Excel(エクセル)
- 他のExcelファイルのデータを、抽出して表示
あるフォルダにあるExcelファイルのデータの中から、特定のデータだけ持ってくるマクロを考えています。 持ってくる側のExcelファイルのデータは A B C -------------------------- 1| AAA 123 あいう … 2| AAA 456 えお … 3| BBB 789 あいう … 4| CCC 012 あいう … という風になっており、A列の単語で指定して、B列のデータを持ってくる…というマクロです。 ("AAA"という単語で指定した場合、"123"と"456"のデータが抽出される) Excelデータの場所と、単語は入力して指定できるようにしたいです。 ご教示頂けると幸いです。
- 締切済み
- オフィス系ソフト
- 大量のワードファイルからデータをエクセルに抽出したい
初心者です。 アンケートのようなワードファイルが大量にあり、 そこから結果をエクセルで使用したいため、データをエクセルに抽出したいのですが、何かいい方法はありますか? ちなみに、私のレベルとしては、 エクセルのマクロは仕事で使っています。
- 締切済み
- オフィス系ソフト
- エクセルのデータの抽出
仕事で1000個ぐらいの地名と住所がセットになったエクセルのデータを別のシートの決まった場所に抽出したいのですが、どうすればいいでしょうか? 自分でいろいろと調べたところマクロを使えばいいということですが、普通にマクロを使っても最初のデータしか抽出されず、残りの999個は結局Macro2, Macro3, Macro4, Macro5......Macro1000のマクロをつくらなければなりません。 いったいどうすればいいでしょうか? エクセルデータは次のようになっています 地名 住所 1 ○×消防署 △○区000 2 ×□公園 ■○区 1111 3 ●●小学校 ●×区 2222 4 ××神社 ×●区3333 ・ ・ ・ 1000 △●公園 ●□区101010 いちいち一つずつマクロを作っていては直でキーボードから入力するのとあまり変わりません。 ひとつのマクロで済ませられる方法があればどうか教えてください。
- ベストアンサー
- その他(ITシステム運用・管理)
- EXCEL関数でフィルタの様にデータ抽出したい
以下のサイトで http://okwave.jp/qa/q6674262.html ベストアンサーに選ばれている方法だと古いものから順に抽出されるのですが、新しいものから古い方へ抽出させるにはどうすればよいのでしょうか? small関数をlarge関数に変えたり、×1000を1/1000にしたりしたのですが、上手く行きません。 ご教示下さい。
- ベストアンサー
- Excel(エクセル)
- ディレクトリ内にある複数のエクセルファイルデータを抽出したいです。
ディレクトリ内にある複数のエクセルファイルデータを抽出したいです。 ディレクトリ内にある複数のエクセルファイルがあります。 各ファイルのSheet1の列Aと列Bと列Cと列Gと列Hのデータをインポートして1つのエクセルファイルにエクスポートしたいと考えています。 こういうことをマクロで実現することはできますでしょうか。
- ベストアンサー
- その他MS Office製品
- エクセル 当月分のデータを抽出したい
Sub データ抽出() Selection.AutoFilter Field:=9, Criteria1:=">=2009/9/1", Operator:=xlAnd, _ Criteria2:="<=2009/9/30" End Sub 上記はI列の2009年9/1~9/30のデータをオートフィルタで抽出するという単純なマクロの自動記録ですが、例えば今日上記のマクロを実行すると2009年10/1~10/31、来月上記のマクロを実行すると2009年11/1~11/30、来年の1月上記のマクロを実行すると2010年1/1~1/31というように常に当月分のデーターを抽出したいのです。アドバイスをお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルでデータ抽出するには?
まったくのエクセル初心者です。 エクセルで、シート1のデータの特定科目を抽出してシート2にコピーしたいのです。 シート1のデータは 5/1 消耗品 2500 5/3 水道光熱費 8000 5/5 消耗品 700 5/7 消耗品 1200 この中から消耗品と記入されている行をシート2に抽出したいのです。 マクロは全然わかりません。。簡単にできる方法は無いでしょうか?よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルでデータ抽出後の元データを自動削除する方法
エクセルで下記のような抽出方法を質問したのですが、 http://okwave.jp/qa/q6856275.html さらに、(2)のようなことが可能でしょうか。 (1)sheet1のA1からA100に入力された文字をsheet2のA1に抽出したい文字をいれると、 sheet2のA2以下に抽出したい文字を含んだ行を抽出。(解決済み) (2)上記、抽出時に抽出された元データを自動的に削除したい。 宜しくお願いします。
- ベストアンサー
- その他MS Office製品
- エクセル2000 データ抽出
毎回、関数についての質問コーナーは閲覧させて頂いております。 昨日より、私が解決できないエクセルでのデータ抽出方法を色々と検索して、探して見ましたが見当たりません。どなたか詳しい方がいましたらアドバイスを頂ければと思ってます。 私が、エクセルでデータ抽出したいのはですね。。 一つのエクセルファイルは、日々更新されて(手入力で)いく、いわゆる、進捗管理表。 入力項目:日付、名前、学校名、合・否・条件付き・補習、その他色々。。 もし、その生徒が合格or条件付きor補習だったら(不合格以外)、学校ごとの他のエクセルファイルへ、データを自動で抽出できる。。 そんな、機能的な数式はありますか? アクセスは、使ってはいけないそうです。 教えてください。または、以前これと同じ様な質問をして回答されたページを教えてください。 お願いいたします。
- 締切済み
- その他(学問・教育)