セル内のテキストの周りに括弧を挿入するにはどうすればよいですか？

書式設定、データの整理、または読みやすさの向上のために、Excelでテキストを括弧で囲む必要がある場合があります。少数のセルに手動で括弧を追加するのは管理可能ですが、多くのセルに適用する必要がある場合は煩雑になります。このガイドでは、Excelでテキストの周りに括弧を追加するための3つの効率的な方法を紹介します：&演算子を使用する方法、Kutools for Excelを使った簡略化されたアプローチ、そしてより自動化されたタスク向けのVBAコードソリューションです。

&演算子を使用してセル内のテキストの周りに括弧を挿入する

セル内のテキストの周りに手動で括弧を挿入する必要がある場合、&演算子を使用するのが簡単な方法です。この手法は個々のセルや小さなデータセットに役立ちます。数式を使ってテキスト文字列と括弧を組み合わせることで、追加ツールなしで簡単にテキストを囲むことができます。以下では、&演算子を使用してセル値の周りに括弧を追加するプロセスについて説明します。

1. データの隣にある空白セル（C2など）に、この数式 ="("&A2&")" を入力してください。スクリーンショットをご覧ください：

2. その後、Enterキーを押して結果を得て、C2を選択し、この数式を適用したいセルまでフィルハンドルをドラッグすると、すべてのセル値が括弧で囲まれます。スクリーンショットをご覧ください：

Kutoolsを使用してセル範囲全体に一括でテキストの周りに括弧を挿入する

特に大規模なデータセットを扱う場合、Kutools for Excelは元のデータ範囲のテキストを括弧で囲む便利なツールを提供します。この方法はプロセスを自動化することでタスクを簡素化し、複数のセルに迅速に括弧を適用することができます。Kutools for Excelを使用してテキストを括弧で囲む手順を説明します。

Kutools for Excelをインストール後、Kutoolsタブに移動し、Text > Add Textを選択してAdd Textダイアログボックスを開きます。次に、以下のように設定する必要があります。

1. 括弧を追加したいセル範囲を選択します。
2. 左括弧を「Text」フィールドに入力します。
3. 「最初の文字の前」オプションを選択します。
4. 「適用」をクリックします。

   

5. 右括弧を「Text」フィールドに入力します。
6. 「最後の文字の後」オプションを選択し、「OK」をクリックします。

   

結果

選択したセル内のテキストの周りに括弧が追加されました。以下のスクリーンショットをご覧ください。

VBAコードを使用してセル内のテキストの周りに括弧を挿入する

VBAコードに精通している場合、このタスクを解決するためのVBAコードを作成できます。

1. ExcelでALT + F11キーを押すと、Microsoft Visual Basic for Applicationsウィンドウが開きます。

2. 「Insert」> Moduleをクリックし、次のコードをModule Windowに貼り付けます。

VBAコード: セル内のテキストの周りに括弧を挿入する

Sub addbrackets()
'Updateby20150706
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = "(" & Rng.Value & ")"
Next
End Sub

3. 次にF5キーを押してこのコードを実行すると、括弧を追加したいデータ範囲を選択するように促すポップアップボックスが表示されます。スクリーンショットをご覧ください：

4. 「OK」をクリックすると、選択したすべてのセルに一度に括弧が挿入されます。