Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


75368 / 76738 ←次へ | 前へ→

【5808】Re:読み出し→読み込み?
質問    - 03/6/2(月) 9:29 -

引用なし
パスワード
   ▼こう さん:
>ま さん,こんにちわ。
>
>「読み出し」って??「読み込む」の解釈で良いですか?

はい、「読み込む」です。
すいません。

>>「テキストファイルを用意し、適当なデータを3行分作って保存する。
>これもVBAで行いますか?

これは、VBAでは行いません。
>
>>ボタンを押すと、テキストファイルを読み出し、セル1〜セル3に3行分のデータを表示する。」
>「読み出し」→「読み込み」ですか?
>セル1,セル2とは?たとえば「セル1=A1,セル2=A2」とかですか?

はい、「セル1=A1,セル2=A2」になります。

デスクトップに作成した、テキストファイルの中身を
Excelから読み込み、Excelのセル上に表示させるというものです。
質問の表現の誤りでご迷惑お掛け致しました。

>ちなみに,すでに存在するテキストファイルを読み
>A1セルから下方セルに表示するなら,
>
>  ファイル名 = ThisWorkbook.Path & "\" & "テキストファイル.txt"
>  Open ファイル名 For Input As #1
>  i = 1
>  Do Until EOF(1)
>    Input #1, rdat
>    Cells(i, 1) = rdat
>    i = i + 1
>  Loop
>  Close #1
>
>で可能です

こちらで実施すると、「オブジェクトが必要です」と言われてしまいました。
ちなみに、ファイル名=(テキストファイルの名前)を入れる
"テキストファイル.txt"=(テキストファイルの名前)を入れる

後のコードはそのままコピーしました。
VBAに関しては、ほんとに初めてなので質問等が分かりにくく
理解にも時間がかかってしまい、ご迷惑お掛けしております。

よろしくお願い致します。
5 hits

【5735】テキストファイルの読み出し 03/5/29(木) 9:50 質問
【5744】Re:テキストファイルの読み出し Jaka 03/5/29(木) 12:28 回答
【5782】Re:テキストファイルの読み出し 03/5/30(金) 14:43 質問
【5788】Re:テキストファイルの読み出し Jaka 03/5/30(金) 16:02 回答
【5802】Re:テキストファイルの読み出し 03/5/31(土) 19:29 質問
【5810】Re:テキストファイルの読み出し Jaka 03/6/2(月) 11:31 回答
【5811】Re:テキストファイルの読み出し Jaka 03/6/2(月) 11:37 回答
【5850】Re:テキストファイルの読み出し 03/6/3(火) 14:32 お礼
【5803】読み出し→読み込み? こう 03/5/31(土) 20:33 回答
【5808】Re:読み出し→読み込み? 03/6/2(月) 9:29 質問
【5822】Re:読み出し→読み込み? Hirofumi 03/6/2(月) 19:53 回答

75368 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free