みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Excelマクロ テキスト貼り付け

テキストファイル(*.txt)を開き、A1に貼り付けるマクロを教えてください。
B列には計算式があるため、A列にテキストの内容を貼り付けたいです。

また、テキストのファイル名はランダムなため、
フォルダを開いて、テキストを開きたいのですが教えてください。

投稿日時 - 2009-08-18 20:09:32

QNo.5217626

暇なときに回答ください

質問者が選んだベストアンサー

テキストファイルを読み込むサンプルです

Dim strBuf As String
Open "ファイル名" for input #1

do While(1)
If Eof(1) Then Exit do
End if
Line input #1 strBuf
Loop
Close #1

マクロの記録でテキストファイルを開いてやる。
そのマクロのファイル名を先のテキストファイル読み込みサンプルのファイル名に指定する。
ファイル名を変数に入れ込んで行うと大丈夫と思います。

投稿日時 - 2009-08-18 20:37:08

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問