テキストファイルへの書き込み

gstrMyFileにファイルへのパスが入っているとして、以下を実行すると
今あるファイルへ追記されてしまいます。
今ある行を削除をして新たにbuf()のデータを記入したいのですが、できますか？
fileNo = FreeFile
Open gstrMyFile For Append As #fileNo
For i = 0 To 50
Print #fileNo, buf(i)
Next i
Close #fileNo

No.2 ベストアンサー 回答者： chie65535 回答日時： 2013/09/06 14:51

＞追記されてしまいます。

OpenにAppendを指定してますから、当然です。

＞今ある行を削除をして新たにbuf()のデータを記入したいのですが、できますか？

出来ますよ。Appendの代わりにOutputって書きましょう。

書いてあるVBAコードが「何をするコードなのか？」は理解出来ていますか？

理解できていないから「追記されて困る」なんて事になっちゃうのです。

「VBAが何をやっているのか理解しないまま実行する」のはやめましょう。

何を実行するｋ理解せずに実行したら、実行したパソコンのデータが全消去されたり、起動できない状態になったりしますよ。

この回答へのお礼

ありがとうございます。
コードを実行して、意図しない結果になったら、
その都度調べながら、作っているので、
体系的な知識が無いのですね。

お礼日時：2013/09/06 21:34

No.1 回答者： MSZ006 回答日時： 2013/09/06 14:38

２行目の　Append　を　Output　にしたらどうでしょうか。