文字を置き換えるには Replace関数を使用します。
「健全化推進事業団」の 事業団 の部分を 推進機構 に置き換えるには以下のようにします。
Replace(“健全化推進事業団”, “事業団”, “機構”) → 健全化推進機構
ただ実際には、パチンコ関係のVBAを作成する中ではこのような使い方はほとんどありません。
機種名「CR海千山千 ZX」にスペースが含まれている場合このスペースを取り除く場合に使用します。
Replace(“CR海千山千 ZX”, “ ”, “”) → CR海千山千ZX
また、エクセルVBAで一覧を作成して遊技機名をファイル名にして保存する場合があります。
windowsではファイル名に使用できない文字(記号)があります。
¥ / : * ? ” < > |
遊技機名には稀にこれらの記号が含まれている場合があります。
例) Re:ゼロから始める新社会人生活
「名前を付けて保存」をプログラムで行うときこの機種名をファイル名にした場合VBAのエラーが発生します。
「Re:ゼロから始める新社会人生活」の場合、:(コロン)がエラーの原因になります。
プログラムの処理では機種名から:(コロン)を取り除く処理を行います。
Replace関数を使って以下のようにします。
Replace(“Re:ゼロから始める新社会人生活”, “:”, “”) → Reゼロから始める新社会人生活
Replace関数は文字を置き換えるより取り除く使用方法の多いです。
覚えておくべき関数の一つです。