このチュートリアルでは、Excelの複数の文字を、その位置に基づいて別の文字に置換する方法について詳しく説明します。 このタスクを実行するために、いくつかの関数とVisual Basicアプリケーションコードを適用します。

練習用ワークブックをダウンロードする

この練習用ワークブックをダウンロードして、この記事を読みながらエクササイズしてください。

複数の文字を代用する6つの適切な方法

1.SUBSTITUTE機能を使って複数の文字を代用する

エクセルでは SUBSTITUTE機能 は、指定された文字またはテキスト文字列の1つまたは複数のインスタンスを、別の文字に置き換えます。 以下のスクリーンショットでは、データセットが マイクロソフトワード 例えば、" "の代わりに、" "のバージョン名を使いたい。 ワード " と共に エクセル " を適用します。 SUBSTITUTE機能 してもらうことです。

の構文は、Excel SUBSTITUTE機能 は以下の通りです。

SUBSTITUTE(text,old_text,new_text,［instance_num］)。

テキスト - をクリックすると、変更を加えたい原文が表示されます。

古いテキスト - のように、代用したい文字がある場合は、その文字を削除してください。

新規テキスト - 旧字体の代わりに使用する新字体

インスタンス番号 - 置き換えたい古いテキストの出現率 このパラメータを空白にした場合、古いテキストのすべてのインスタンスが新しいコンテンツに置き換えられます。

例えば、以下の数式はすべて""を代入しています。 1 " と共に 2 " セル内 B5 が、最後の引数で指定した数値によって結果が異なる。

a) =SUBSTITUTE(B5, "Word", "Excel", 1) - の最初の発生を置き換えます。 ワード " と共に エクセル ".

b) =SUBSTITUTE(B5, "Word", "Excel", 2) - の2回目の発生を置き換えます。 ワード " と共に エクセル ".

c) =SUBSTITUTE(B5, "Word", "Excel") - の発生をすべて置き換えます。 ワード " と共に エクセル ".

以下のスクリーンショットでは、1回目の発生時の例を示しています。 これを行うには、次の手順に従うだけです。

ステップ1．

• セルに次の数式を入力します。

ステップ2．

• プレス 入力 をご覧ください。

ステップ3．

• 残りの2つの基準についても、前の手順を繰り返します。

その結果、1番目、2番目、およびすべての出現回数の値を連続して取得し、エクセルで複数の文字を置換することができます。

2.複数の文字を置換するSUBSTITUTE関数のネスト

複数の置換を行うには、1つの計算式の中で、複数のSUBSTITUTE関数を入れ子にすることができます。

例えば、""のようなテキスト値があるとします。 art, amend, cl. " セル内 B5 ここで、" アート .は""の略です。 論文 ", " を修正しました。 " は " の略です。 修正 " と " をクリックします。 " は " を意味します。 条項 ".

3つのコードをフルネームで代用するには、3つのSUBSTITUTE式を使用する必要があります。

=SUBSTITUTE(B5, "art.", "article")

=SUBSTITUTE(B5, "amend.", "amendments")

=SUBSTITUTE(B5, "cl.", "clause")

そして、それらを1つずつ入れ子にしていきます。

=SUBSTITUTE(SUBSTITUTE(B5, "art.", "article"), "amend.", "amendments"), "cl.", "clause")

してもらうためには、以下の手順で行います。

ステップ1．

• インセル C5 を入力し、次の数式を入力します。

ステップ2．

• 次に、 を押します。 入力 をクリックすると、その変化を見ることができます。

ステップ3．

• 他の必要なセルに数式をコピーします。

そのため、以下のスクリーンショットのように代入された値が表示されます。

3.INDEX機能でSUBSTITUTE機能を行い、複数文字の置換を行う

これまでの手法に加えて SUBSTITUTE機能 とのことです。 INDEX機能 で複数の文字を代入することができます。

例えば、赤と青を緑と白に連続的に置き換えたい。 SUBSTITUTE 関数 は入れ子にすることができ INDEX 関数は、別のテーブルから検索/置換ペアを送り込むために使用することができます。

の両方を適用して複数の文字を置換する場合 サブスティテュート とのことです。 INDEX機能 は、以下の手順で行ってください。

ステップ1．

• まず、セルに次の数式を入力します。 C5 ,

どこで

INDEX 範囲を見つける E5:E6

INDEX 範囲を見つける E5:E6

ステップ2．

• 次に、Hit 入力 をご覧ください。

• 最後に、この数式を他のセルにコピーします。

類似の読み物。

• Excelで複数の値を検索・置換する（6つのクイックメソッド）
• エクセルで特殊文字を置換する方法（6つの方法）
• Excelで条件に応じてセルの文字列を置換する（5つの方法）

4.REPLACE関数を適用して、複数の文字を置換する。

を適用する方法について説明します。 REPLACE機能 を使えば、Excelで複数の文字を置換することができます。 REPLACE機能 を使うと、文字列中の1文字または数文字を、別の文字または文字集合と入れ替えることができます。

の構文は、Excel REPLACE機能 は次のとおりです。

REPLACE(old_text, start_num, num_chars, new_text)

ご覧のように REPLACE機能 は4つの引数を持ち、これらはすべて強制的なものである。

古いテキスト - 文字を置換したい元のテキスト（または元のテキストがあるセルへの参照）を指定します。

開始番号 - の中の最初の文字の位置は 古文 .

数字（Num_chars - 置き換えたい文字の数を指定します。

新規テキスト - を置換テキストとする。

例えば、""という文字を代入する場合 顔 " を " 事実 "の場合は、以下の手順で行います。

ステップ1．

• まず、セルにおいて D5 は、次の式を入力します。

ステップ2．

• 次に、 を押します。 入力 をクリックすると、その変化を見ることができます。

ステップ3．

• 以下のスクリーンショットに示すすべての変更を行うには、必要なセルの数式をコピーしてください。

5.複数の文字を置換するREPLACE関数のネスト

同じセル内の複数の項目を変更することはよくあることです。 もちろん、1回だけ置換を行い、中間結果を新しい列に出力し、その後に REPLACE機能 しかし、ネストされた REPLACE 関数 と同様に、1つの数式で複数の置換を行うことができる、より優れた、より専門的なオプションです。 SUBSTITUTE機能 でネストを適用することもできます。 REPLACE機能 .

例えば、A列に電話番号のリストがあり、その書式が " 123-456-789 「を変更し、スペースを追加する。 123-456-789 " から " 123 456 789 ".

複数個所の文字を置換する場合は、以下の手順で行います。

ステップ1．

• セルに次の数式を入力します。 C5 最初は

ステップ2．

• 次に、 を押します。 入力 をクリックすると、セルの変化を見ることができます。 D5 .

ステップ3．

• 最後に、数式をコピーして、必要なセルに対してこの手順を繰り返します。

6.複数文字の置換を行うVBAコードの実行

面白いのは、応募できることです。 ブイビーエー また、前述した2つの機能のように、文字数や場所を気にすることなく自由に変更することができます。

を実行するには ブイビーエー のコードで複数の文字を代用する場合は、以下の手順で行ってください。

ステップ1．

• まず最初に アルト + F11 を開いてください。 マクロ対応ワークシート .
• に行ってみてください。 インサート タブで表示します。
• 次に、以下を選択します。 モジュール .

ステップ2．

• 以下をコピーしてください。 ブイビーエー のコードになります。

 Sub replaceAll() '作業するセルへの参照を保持するオブジェクト変数を宣言 Dim myCell As Range '文字列置換のパラメータ（置換する文字列と置換文字列）を保持する変数を宣言 Dim myStringToReplace As String Dim myReplacementString As String '作業するセルの特定 Set myCell = ThisWorkbook.Worksheets("VBA").Range("C5") '文字列置換用のパラメータを指定する(置換する文字列と置換文字列） myStringToReplace = "234-235-5689" myReplacementString = "234 235 5689" '作業するセル内の文字列内の出現箇所をすべて置換し、結果の文字列を範囲指定する。 '作業するセルの値プロパティ myCell.Value = Replace(Expression:=myCell.Value, Find:=myStringToReplace, Replace:=myReplacementString) End Sub 

• どこで

ThisWorkbook.Worksheets("現在のワークシート名")

Range("あなたの参照セル")

myStringToReplace = "置換したい値"

myReplacementString = "置換後の値"

• 次に、それをプログラムウィンドウに貼り付けます
• プレス 入力 をクリックすると、置換された数値の形式が表示されます。

結論

最後に、この記事では、Excelで複数の文字を置換するための詳細なガイダンスを提供したことを願っています。 これらの手順はすべて、あなたのデータセットに適用することを学ぶ必要があります。 練習ワークブックを見て、これらのスキルをテストしてください。 このようなチュートリアルを作り続けるモチベーションは、あなたの貴重なサポートによるものです。

ご不明な点がございましたら、お気軽にお問い合わせください。 また、以下のセクションにコメントを残してください。

私たち、ザ Exceldemy また、このチームでは、お客様からの問い合わせに常に迅速に対応しています。

私たちと一緒に学び続けましょう。