ファイル操作

質問

ExcelVBAでテキストファイルを読み込み、特定の文字を置換したいと思っています。

Openステートメントでinputを使うと読み込みで、outputを使うと書き込みなのは、わかります。

ただ更新の仕方がわからないのです。
よろしかったら教えてください。

回答No.2

imogasi

＃１でおっしゃることは、大切なことです。
置換については、変数にレコードの文字列を入れたものを対象に
（１）置換対象文字を見つけなければなりません
Ｉｎｓｔｒ関数で見つけます
（２）見つかった位置の前までの文字列をＭｉｄ関数で切り出します
（３）置換対象文字列は捨てます
（４）それ以後の文字列をＭｉｄ関数で切り出します
（５）（２）＋置換後の文字列＋（４）を＆で連接します．
置換文字列が複数ありえるときは、（２）＋置換後の文字列。
残りの文字列に対し（１）、（２）、（５）を繰り返す。
（６）新しいレコードとして書き出します。Ｐｒｉｎｔ　＃ステートメントを使う。
（７）レコード内に置換文字列が２つ以上あるときは、ＩＮＳＴＲの第１引数のスタート位置を変えて、順次尺取虫のように、置換文字列が見つからなくなるまで、上記を繰り返します。ただし（４）は最後だけ行うになります。

回答No.1

BLUEPIXY

固定長レコードでない一般的な不定長のテキストファイルの場合
そのファイル自身をいきなり更新ということはできません。
入力ファイルを読込、更新して出力ファイルに書き出し
終了後入力ファイルを削除、出力ファイルを入力ファイル名に名前の変更のような手順になると思います。