ExcelVBAのReplace関数でセルの文字列の一部を置換する
この記事では当方がExcelVBAプログラミングの仕事で必要になった処理をまとめております。
住所を番地までCONCATENATEの関数で結合して上書き保存してしまった。住所を番地の手前で分けたい。けれども、どうしていいかわからない方向けの記事です。
目次
ExcelVBAのReplace関数でセルの文字列の一部を置換する方法
「Excelに住所と番地を分けて入力していたが、CONCATENATE関数で住所と番地を結合して上書き保存してしまった。元に戻すことは可能ですか？」とご相談いただきました。Windowsでボリュームシャドウコピーを設定していれば可能でしたが、Windowsでボリュームシャドウコピーを設定されていなかったのでExcelVBAで置換することにしました。
手入力だとデータの件数が多くて時間がかかりすぎることでもExcelVBAだと一瞬でできたりします。
事前準備としまして下記のデータをご用意ください。
セルの文字列の一部を置換するコードの作成
「開発」タブをクリック
「Visual Basic」をクリック
「セルの文字列の一部を置換する」コードの入力
セルの文字列の一部を置換するコードの解説
今回作成するコードのポイントは下記1点です。
- Replace関数で文字列を置換する
Replace関数の引数のイメージは下記になります。
Replace(文字列, 置換したい文字列, 置換後の文字列)
※コード作成になれるまでは必ず紙に書き出して考えるようにしましょう！
ボタンにセルの文字列の一部を置換するマクロの登録
手順については「ExcelVBAでブックのシート名を検索して見つかったときにシートをアクティブにさせる方法」の記事の「シート検索ボタンにマクロを登録」を参照ください。
セルの文字列の一部を置換するコードの実行
「置換」ボタンをクリック
住所と番地を再度分けることができました。
結論（まとめ）
「ExcelVBAのReplace関数でセルの文字列の一部を置換する方法」を解説しました。
- セルの文字列の一部を置換するコードの作成
- ボタンにセルの文字列の一部を置換するマクロの登録
- セルの文字列の一部を置換するコードの実行
The following two tabs change content below.
mouri49
代表取締役 ： デジネスラボ株式会社
100局1,000パーソナリティのリーダーホンマルラジオ本部プロデューサー恵澤舜元（えざわよしゆき）。
代表取締役を務めるデジネスラボ株式会社が1人社長で法人化後わずか2年以内に株式会社IOBI様より大阪市約11万社の中から大阪市を代表する企業100選に選出された。
【選出企業様記事一例】
ミズノ株式会社様（大阪市を代表する企業100選）
株式会社公文教育研究会（KUMON）様（大阪市を代表する企業100選）
パナソニックホールディングス（地域を代表する企業100選）
ホンマルラジオBMS局開局後2年半年以内で斎藤一人さんの弟子宮本真由美さんの『人生がオドロクほどなんとかなる！まゆみのなんとかなる♡ラジオチャンネル！』年間30万回再生を抑えて2週連続30分番組の全国総合ランキング1位を獲得ホンマルラジオ30分番組『みんなのビジネスネタが見つかるBMSラジオ』
ホンマルラジオBMS局開局後わずか5カ月以内で全国1位ホンマルラジオ10分番組『BMSビジネスネタチャンネル』年間10万回再生突破
