|
こんにちは。かみちゃん です。
>テキストファイルの書き出しは無事にできました。
>しかし今度はやはり読み込みでつまづいています。
>セルに読み込んでしまうと、文字列が途切れてしまうと思います。
>直接フォームのテキストボックスに反映させる方法というのはあるのでしょうか?
Input # ステートメント
Line Input # ステートメント
をあわせてヘルプで確認してみてください。
だいたい以下のような感じでできると思います。
Private Sub CommandButton2_Click()
Dim strData As String
Open ThisWorkbook.Path & "\TES0319.TXT" For Input As #1
Line Input #1, strData
Close #1
'読み込んだ内容をTextBox1に反映
Me.TextBox1.Value = strData
End Sub
>[#35927]の内容は[#35912]の内容と同様で、[#35912]の方へご回答をいただきました。[#35927]は操作ミスで誤ってダブって投稿してしまったものです。
それであれば、誤ってレスをつける人もいるかと思いますので、削除できる(パスワードが必要)ようであれば、
削除するか、できなければ、上記説明を加えて、ご自分でスレッドを締められた
ほうがよろしいかと思います。
|
|