CSVカンマ区切りのテキストファイルをエクセルにインポートしたいのですが、
エクセルの1行目の列タイトルの下の行からデータを挿入する方法はありますか?
使っているのはエクセル97です。

このQ&Aに関連する最新のQ&A

A 回答 (3件)

EXCEL2000での確認なので出来ないかも知れませんがカーソル行(アクティブセル)から挿入するには「データ」-「外部データの取り込み」-「テキストファイルのインポート」を実行して見てください。

    • good
    • 0
この回答へのお礼

試してみましたが、97ではできませんでした。
でも方法があるということが分かったので勉強になりました。
どうもありがとうございました。

お礼日時:2001/11/21 08:49

yanmaaさんの方法でOKのようです。

エクセル2000で
やって見ました。
メモ帳で作ったファイルを下記プログラムでテストしましたら、走りました。こんな簡単なプログラムでも、お考えのようなことが出きるようです。ご参考までに。
"a","b","c","d"のようなファイルや、文字と数値が混じるケースについては、ゆっくり考えてみます。
Private Sub Workbook_Open()
retu = 4 '項目数
i = 3 '読みこむ開始行
j = 1 'A列より読みこみ
Open "c:\my documents\aaabb.txt" For Input As #1
'-------
p1:
For k = 1 To retu
Input #1, a
If EOF(1) = -1 Then GoTo p2
Worksheets("sheet1").Cells(i, j) = a
j = j + 1
Next k
i = i + 1
j = 1
GoTo p1
'-------
p2:
Close #1
End Sub
    • good
    • 0
この回答へのお礼

どうもありがとうございました。

お礼日時:2001/11/21 08:51

>エクセルの1行目の列タイトルの下の行からデータを挿入する方法はありますか?



これはセルA2から、ということですか?

残念ながらできません。
項目名をテキストファイルに入力しておくか、インポート後に行挿入して
項目を入力すればいいのではないでしょうか。
    • good
    • 0
この回答へのお礼

ありがとうございました。

お礼日時:2001/11/21 08:45

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aと関連する良く見られている質問

QAccessでタブ区切りのテキストをインポートすると、71項目目以降のデータがインポートされない

WindowsXP
Access2000

いつもお世話になります。
どう対処してよいかわからなくなってしまったので質問
させてください。

社内システムから、ダウンロードしてきた、
テキストデータ(1登録あたり106項目、タブ区切りで保存、
登録データの切れ目は改行)があります。

エクセルに貼り付けてみると、↓のような見た目になります。
■=データ有りの意味


 A┃B┃C┃D・・┃・┃・┃BS┃BT┃BU┃BV┃・┃・┃DB
1■┃■┃■┃■・・┃■┃■┃■┃・┃・┃・┃・┃・┃・
2■┃■┃■┃■・・┃■┃■┃■┃・┃・┃・┃・┃・┃・
3■┃■┃■┃■・・┃■┃■┃■┃・┃・┃・┃・┃・┃・
・■┃■┃■┃■・・┃・┃・┃■┃・┃■┃■┃■┃・┃■
・■┃■┃■┃■・・┃・┃・┃■┃・┃■┃■┃■┃・┃■
・■┃■┃■┃■・・┃・┃・┃■┃・┃■┃■┃■┃・┃■

※BTの列は全て空白です。

それを、アクセスに取り込み、管理しようとしています。

登録数は特に決まっていません。
また、106項目は全て埋まっているわけではなく
空白の項目も多々あります。

インポート用のテーブルを用意し、インポートすると
何のエラーもなくインポートが完了するのですが、
なぜかBSの列までのデータは取り込むものの、
BT以降のデータは空白になります。

今回、200件弱のテスト用データで試したところ、
全てのデータにおいて、BT以降のデータが
空白になりました。

インポートできるデータには「○項目めまで」という
決まりがあるのでしょうか?

WindowsXP
Access2000

いつもお世話になります。
どう対処してよいかわからなくなってしまったので質問
させてください。

社内システムから、ダウンロードしてきた、
テキストデータ(1登録あたり106項目、タブ区切りで保存、
登録データの切れ目は改行)があります。

エクセルに貼り付けてみると、↓のような見た目になります。
■=データ有りの意味


 A┃B┃C┃D・・┃・┃・┃BS┃BT┃BU┃BV┃・┃・┃DB
1■┃■┃■┃■・・┃■┃■┃■┃・┃・┃・┃・┃・┃・
2■┃■┃■┃■・・┃■┃■┃■┃・┃・┃・┃・┃・┃・
3■┃■┃■...続きを読む

Aベストアンサー

回答がつかないようですので、たぶん見当違いでしょうが、コメントさせてもらいます。

Excel上で「※BTの列は全て空白です。」というのが気になりますね。

1行目のデータが70項目目の後ろで改行されている、ということはないのでしょうか。

そんなことはないのなら、データの先頭行はフィールド名ではないように見えますので、先頭に仮のフィールド名(例えば、a、b、c、・・・)のデータを1件分106項目、空白なしで加えて、インポートされてみてはいかがでしょうか。それでもだめでしたら、ごめんなさい。

Qエクセルでテキストファイルからフォームのテキストボックスにテキスト挿入するマクロ

マクロでフォームのテキストボックスに直接テキストファイルからテキストを挿入したいのですが出来ますか?
opentextでエクセルシートに入れてからフォームにコピーすることはできたのですが、それだと重くなってしまうので直接取り込みたいんですがうまくいきません。
VBやJAVAのreadlineのようなものは使えないんでしょうか。

Aベストアンサー

>VBやJAVAのreadlineのようなものは使えないんでしょうか。

LineInput がありますよ。
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_110_030.html
http://rd.search.goo.ne.jp/click?DEST=http%3A%2F%2Fofficetanaka.net%2Fexcel%2Fvba%2Fstatement%2FLineInput.htm&no=2

QACCESSでCSVファイルをインポートすると最初の列が1桁になってしまう

ACCESS2002でCSVファイルをインポートしたところ、
7桁あるはずの最初の列が1桁になってしまいます。
具体的には下記のとおりです。
不足する情報があればおっしゃってください。

<<CSVファイル>>
"社員番号","○○○","○○○",・・・・・
"6002343","nnnnn","nnnnn",・・・・・

<<インポート後>>
社員番号|○○○|○○○|・・・・・
6    |nnnnn |nnnnn|・・・・・

なお、"は文字列の区切り文字としています。
試しに"を文字列の区切り文字としないでインポートしたところ、
|"社員番号"|"○○○"|"○○○"|・・・・・
|"6002343" |"nnnnn"|"nnnnn"|・・・・・
となりました。
excelで出来るように置換で"を消せればそれでもokです。
ご回答をお願いします。

Aベストアンサー

この点、良く質問に出ます。他に良い方法が無ければ、また下記のようなことに興味があればご参考に。
(例 CSVデータ)メモ帳で
"111","sdf","223","gfh","2345"
"223","dfg","4566","hjkk","534"
"0023","dwwfg","456","hjkk","134"
"0003","dddfg","566","hkk","3234"
(アクセスのモジュール)
Sub test01()
Dim d(100)
Dim dbs As Database
Dim rst As Recordset
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("data2")
rst.MoveFirst
'--------
Dim a
Open "a14.csv" For Input As #1
While Not EOF(1)
Line Input #1, a
st = 1
i = 1
p01:
p = InStr(st, a, ",")
If p = 0 Then
w = Mid(a, st, Len(a) - st)
d(i) = Mid(w, 2, Len(w) - 2)
' MsgBox d(i)
GoTo p02
Else
w = Mid(a, st, p - st)
d(i) = Mid(w, 2, Len(w) - 2)
' MsgBox d(i)
st = p + 1
i = i + 1
End If
GoTo p01
p02:
'------------mdb更新
rst.AddNew
rst![あ] = d(1)
rst![い] = d(2)
rst![う] = d(3)
rst![え] = d(4)
'------
rst.Update
rst.MoveNext
'------------
Wend
Close #1
rst.Close
End Sub

(結果)テーブル
IDあういえ
14111223sdfgfh
152234566dfghjkk
160023456dwwfghjkk
170003566dddfghkk

この点、良く質問に出ます。他に良い方法が無ければ、また下記のようなことに興味があればご参考に。
(例 CSVデータ)メモ帳で
"111","sdf","223","gfh","2345"
"223","dfg","4566","hjkk","534"
"0023","dwwfg","456","hjkk","134"
"0003","dddfg","566","hkk","3234"
(アクセスのモジュール)
Sub test01()
Dim d(100)
Dim dbs As Database
Dim rst As Recordset
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("data2")
rst.MoveFirst
'--------
Dim a
Open "a14.csv" For Input A...続きを読む

Qエクセル 3列おきに列を挿入したい

いつもお世話になります。

1行目に営業所コードがあり、そのコードを3列おきに表示するにはどうしたらいいでしょうか。

  A  B  C  D  E  F  G  H  I  J
  2   3   4   5   7   8  11  12  14  15

             ↓

  A  B  C  D  E  F  G  H  I  J
  2          3         4         5

営業所コードは2~150の数字で、100ほどの営業所コードが存在します。
よろしくお願いします。

Aベストアンサー

一例です。
(1)A2に=OFFSET($A$1,0,COLUMN(A1)/3)を入力、A2:C2を選択して右方向にコピー
(2)2行目選択コピー→形式を選択して貼り付け→値を選択→OK、1行目を削除

QAccess97 テキストインポート

Access97でテキストファイルのインポートができません。

現象は…
 ・インポートのファイルの種類でテキストを
  選択できません(ありません)
 ・インストール時に
  データアクセス>データベースドライバ
  では、テキスト・HTMLにチェックがついており、
  セットアップ済みとなっています。
  削除→インストール
  レジストリ削除→インストールでも、セットアップ済みとなってます。

どなたかよい方法をご存知ではないでしょうか?

環境はWin98+Office97proです。
お願いします。

Aベストアンサー

最近、IEを何かしたことがありますか?

IEが更新するものに「ODBC」が含まれてるそうです。
(ブラウザがなぜOSのモジュールを変更するのか、不満です)

ODBCといえばデータソースでテキストは見えますか?
とりあえずはテキストのDSNを作っておくとか。


このカテゴリの人気Q&Aランキング

おすすめ情報