- ベストアンサー
excelでのインポート
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
こんな感じでしょうか？ Sub hoge() ii = 0 'Sheet2をクリアーします Sheets("Sheet2").Select Cells.Select Selection.ClearContents ' 未使用のファイル番号を取得します。 Fno = FreeFile ' シーケンシャル入力モードで開きます。 Open "c:\\okweb\\TESTFILE.txt" For Input As #Fno ' ファイルの終端までループを繰り返します。 Do While Not EOF(Fno) ii = ii + 1 ' データを 5 つの変数に代入します。 Input #Fno, col1, col2, col3, col4, col5 'セルに代入します Cells(ii, 1) = col1 Cells(ii, 2) = col2 Cells(ii, 3) = col3 Cells(ii, 4) = col4 Cells(ii, 5) = col5 Loop Close #Fno ' ファイルを閉じます。 End Sub
その他の回答 (1)
- BLUEPIXY
- ベストアンサー率50% (3003/5914)
マクロの記録で 「データ」「外部データの取り込み」「データの取り込み」でテキストファイルを選んで、取り込む手順を記録したところ。 ２回目以降の更新は「データ」の「データの更新」でできます。 その記録したマクロで実行する場合は、 列が挿入されてしまうのが難点ですが、 これは、挿入されて、古くなった列を削除する マクロを書けばいいと思います。 勘違いコメントだったらすみません
お礼
ありがとうございます。 参考にさせていただきました。
関連するQ&A
- MS AccessでExcelファイルのインポートは？
AccessのVBAでExcelファイルをインポートするにはどうすればいいのでしょうか？ ちなみに DoCmd.TransferText acImportDelim, , "Tmp名簿", strInPutPath & "\名簿.csv", True （strInPutPathは、ダイアログから取得したパスです） では、CSVファイル（TXTファイル）しか読み込めません。 （もちろん、そのため拡張子が「.csv」にしていますが 読み込むファイルをテキストファイルにしたら「.txt」でもいいです） 「ファイル」メニュー（コマンド）の「外部データの取り込み」→「インポート」では、Excelファイルも読み込めるので悔しいです。 これをVBAでやりたいんですが。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excelマクロ/ファイル名を指定してインポート
テキストファイルからExcelへインポートする作業を自動化させたいのですが。 毎回インポート元のファイル名（格納しているフォルダは同じです）が異なるので、マクロ記録ではうまく作成できません。VBAでないと無理でしょうか？ できればファイル名をその都度入力するようなダイアログボックスが表示されれば理想的です。VBA初心者なので教えてください。
- ベストアンサー
- オフィス系ソフト
- VBA で EXCELファイルをインポート
VBAに詳しい方お助けください。VBAを使用して、データベースをつかってインポート（データベースファイルを開かずにデータの取り込み）を行いたいのですが良く分かりません。データベースは一つはＣＳＶファイル、一つはＸＬＳファイルです。取り込み先のEXCELファイルのSHEET1にCSVファイルのデータベース（SHEET1)、取り込み先のEXCELファイルのSHEET2にXLSファイルファイルのデータベース（SHEET1)とインポートするにはどのようなVBAの記述が必要ですか？色々と調べているのですがうまく行きません。EXCELは2003を使用しています。
- ベストアンサー
- オフィス系ソフト
- エクセルでのテキストファイルインポートの設定について教えてください！
エクセルでのテキストファイルインポートの設定について教えてください！ 仕事でエクセル上で毎回異なるcsvファイル等を読み込んで作業をするということが多いのですが、 「テキストファイルのインポート」を用いると、「ファイル名」に前回読み込んだファイル名が自動選択されてしまう他、「ファイルの種類」がtxt.がデフォルト設定になっており、毎回ファイル名のデリートと、ファイルの種類を「すべてのファイル」に変更して読み込むファイルを選択していますが、この作業をわずらわしく感じています。 ファイル名を未選択、ファイルの種類をすべてのファイルとデフォルトでなるように設定することはできますでしょうか？ これができれば、読み込むファイル名を選択するだけで済むのですが。。 識者のみなさん、よろしくお願いします。
- 締切済み
- その他MS Office製品
- EXCEL- ＶＢＡ（CSVファイル→インポート）
Ａ列～Ｆ列になる複数（100個以上）のＣＳＶファイルをエクセルファイルにインポートして更に個別にエクセルファイルとして保存したいのですが ＶＢＡでできるのでしょうか？ 記憶マクロでやったらどうにもうまくいきません。 エクセルのＶＢＡについては ほとんど知識ゼロなので困っております。 大変厚かましくありますが どなた様かご教授お願いできたらと思います！！ 【元のファイルの状態】 ◆ファイル名「*.CSV」*は文字数それぞれ違います。 ＜例：tanaka.xls だったり 09福島.xls＞ ◆入っているドライブ TEXT;C:\Documents and Settings\ＡＡ＿Ｂ\デスクトップ\練習 ◆Ａ～Ｆ列にデータが入っている 【やりたいこと】 (1)Ａ～Ｆ列はカンマ区切りで全て文字列としたい (2)元のファイル名でエクセルとして保存したい「*.XLS」
- ベストアンサー
- オフィス系ソフト
- CSVファイルをエクセルファイルにインポートさせるには？
おせわになります CSVファイルをエクセルファイルにインポートさせたいのですが 方法は ユーザーフォームをにテキストボックスと参照ボタン、実行ボタンを作成し 参照ぼたんでCSVファイルを選ぶ テキストボックスには参照先の住所が記載され 実行ボタンでsheet1にB2から貼り付けさせたいのですが可能ですか？ 又、CSVの情報が不要な列もあります 必要な列のみ落とし込みをしたいです 当方初心者でVBAコードがあれば幸いです。 わかる方よろしくおねがいします
- 締切済み
- オフィス系ソフト
- Excelで全銀協のFBデータをインポートしたい
各銀行で共通使用している全銀協の FBデータをExcelでインポートしたいと思っています。 一度、CSVファイルに変換するのかExcelで一旦取込後、VBAで桁数を指定して区切っていくのか正直分かりません。 どなたか教えて頂けないでしょうか？ 何卒、宜しくお願い致します。
- ベストアンサー
- Excel（エクセル）
- ACCESSで、テキストファイルをインポートしたい
宜しくお願い致します。 ACCESSで、テキストファイルをインポートしてテーブルを作成したいのですが、ファイル→インポートを選択して、ウィザードを開く方法は分かるのですが、マクロを作成してインポートは出来ないでしょうか？ excel、CSVファイルでしたら、「ワークシート変換」、「テキスト変換」のマクロでインポートしたりエクスポートしたり出来ると思うのですが・・・、 (1)テキストファイルをインポートしたり、エクスポートしたりする場合、どのようなマクロがあるのでしょうか。 （ためしに、「出力」マクロで、あるテーブルをCSVファイルにエクスポートしてみたのですが、カンマ区切りにできず、excelのような枠付きのテキストファイルになってしまいました。） (2)容量が大きいデータの場合は、テキストファイルでエクスポートしたほうが良い・・・という認識に間違いはありませんでしょうか。 質問が一つ増えてしまいましたが、宜しくお願い致します。
- ベストアンサー
- その他(データベース)
- インポートできません
昨日はできたのですが、今日はできなくなりました。 エクセルでｏｕｔｌｏｏｋ ｅｘｐｒｅｓｓのアドレス の順番に姓 名 電子メールとタイトルをうち、リストを つくり、ｃｓｖで保存したいのですが、項目がないので、テキスト（タブ 区切り）で保存、結局テキストファイルで保存。ｏｕｔ ｌｏｏｋのアドレスをひらきインポート、その他の アドレスをクリック、ファイルをテキストファイル（ｃｓｖ）で指定、インポートするフィールドの割り当て、 の画面でテキストフィールドに姓、名、電子アドレスとなっており、割り当て、の変更をクリックシ、フィールド に、姓、をクリックするとアドレス帳フィールドに 姓と印字され、つぎに名を選択すると、アドレス帳 フィールドの姓が消去し、名がでてきます、次に 電子メールをしていすると、名が消去され、インポート すると、ばらばらではなく一塊の姓名電子メールが インポートされます。昨日やったときは、テキスト フィールドのしたに名、その下に電子メールが印字 されていたように思いますが、今日は上手く行きません。 エクセルで保存のとき、タブ区切りのテキストでしか 保存できませんのでそれがいけないのでしょうか 教えていただきたいと思います。 遅くなりましたが、ウインドウズＭＥです。
- ベストアンサー
- その他（メールサービス・ソフト）
- CSVファイルからEXCELへのインポート
下記の項目のＣＳＶファイルをＥＸＣＥＬにインポートしようと思っております。 得意先コード、得意先名(漢字)、商品コード、商品名、売上数量、売上金額 このＣＳＶファイルをＥＸＣＥＬにインポートする際、得意先ごとに別のシートにしたい(シート名は得意先名としたい)場合どのようにすればよいのか、アドバイスいただければと思っております。 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございました。 とても参考になりました！