Excelで、別のCSVデータの取り込み方法

質問

Excel2010 で、別ファイルにあるCSVのデータを取り込むにはどうしたらいいでしょう。

たとえば、
temp.txtの内容が以下の1行とします。
りんご,200,5

これを、林檎計算.xlsxを開くと、自動的にtemp.txtを読み込んで
A1～A3に、りんご,200,5　が入るようにしたいのです。

エクセルで「データ」→「外部データの取り込み」→「テキストファイル」で設定し、プロパティで「ファイルを開く時にデータを更新する」としてみても、ファイル(林檎計算.xlsx)を開いただけでは自動で読み込まれず、「更新」などの手続きが必要になります。

この「更新」を押す一手間を省きたいのですがどうしたらよいでしょう。

回答No.4

某HN クロメート(Chromate)（@CoalTar） · ベストアンサー

#3です。質問を完全に見落としてましたm(_ _)m
当方XL2003/2002なので使えるのかわかりませんが
[Alt]+[F11] VBE起動
ThisWorkbook をダブルクリックして
↓をコピペ

Private Sub Workbook_Open()
ActiveWorkbook.RefreshAll
End Sub

添付図はXL2002(実際使用しているもの)

お礼

どうもありがとうございました。
このVBAでは解決しませんでしたが、むしろ問題であったのは、セキュリティの方でした。お手を煩わせてしまいましてどうもすみません。
別のPCのtxtを読み込んでいたせいか、セキュリティの警告が出ておりまして、「ファイル」→「情報」からアクティブコンテンツに関しての設定を変えると、当初の目的通りに動くようになりました。
大変申し訳ありませんでした。

補足

ありがとうございます。
いま2010をいじれない状態なので、また後ほど確認させていただきたいと思います。
VBAは敷居が高くて、なかなか自分から調べて動かすことができませんのでありがたいです。

回答No.5

noname#204879

[No.2お礼]へのコメント、

》 実はEXCEL2000では問題なくできていました

テキストファイルの“横”１行を Excel 2000 のワークシートの“縦”１列に「自動的に」「問題なく」取り込めるとは知りませんでした。
ぜひ その手順を教えてください。

補足

あまり縦横意識しないで書いていましたのですみません。
本質的な話しではないのでもうこれ以上書いても仕方ないかもですが、
ご指摘のことについては、たとえばA1～C1に取り込んだ後に、
A2　=B1
A3　=C1
とすると、簡単にA1～A3に入ります。

回答No.3

某HN クロメート(Chromate)（@CoalTar）

データ範囲のプロパティ(添付図XL2003)
で [レ]ファイルを開くときにデータを更新する

お礼

どうもありがとうございます。
確かにそれがキーポイントですよね。

質問にも書きましたが、それは確かにチェックしているんです。
なのに、開いた時には更新されない為、やむなく
「データ」→「すべて更新」などをクリックして更新しています。
EXCEL2000ではうまくいっていたのですが。

回答No.2

noname#204879

[No.1お礼]へのコメント、

》 …一部のセルにインポートしたいのです。

質問文の「A1～A3に、りんご,200,5　が入るようにしたい」の「A1」だけに着目して、「ただそのままエクセルに読ませ」ればＯＫだと早とちりしてました。

何れにしても、１行のテキストをワークシートの「A1～C1」にでなく、「A1～A3」の１列に「自動で読み込」むなんてのは、ＶＢＡに頼らない限りは無理難題ではなかろうかと。

お礼

ありがとうございます。
実はEXCEL2000では問題なくできていました。EXCEL2010が悪いのか、新しい環境が悪いのかよく分からないでいます。
たしかにVBAの知識があればできそうなのですが、そこはちょっと敷居が高いんです。

回答No.1

noname#204879

ファイル temp.txt の拡張子「txt」を「csv」に書き替え（リネーム）すればよろしいのでは？

お礼

回答ありがとうございます。
ただそのままエクセルに読ませるのであればそれでいいのですが、別のエクセルのファイルの一部のセルにインポートしたいのです。
わかりにくい書き込みで申し訳ありません。