Excelで複数列から一意の値を抽出するにはどうすればよいですか？

いくつかの列に複数の値があり、同じ列内または異なる列間で一部の値が重複しているとします。ここで、すべての列にわたって一意の値を特定する必要があります。Excelでこれらの複数列から一意の値を抽出する簡単な方法はありますか？効率的な解決策を探してみましょう。

• 数式を使用して複数列から一意の値を抽出する
  • 配列数式（すべてのExcelバージョン）
  • 数式（Excel 365、Excel 2021、および新しいバージョン）
• Kutools AI アシスタントを使用して複数列から一意の値を抽出する
• ピボットテーブルを使用して複数列から一意の値を抽出する
• VBAコードを使用して複数列から一意の値を抽出する

数式を使用して複数列から一意の値を抽出する

このセクションでは、すべてのExcelバージョンに適した配列数式と、Excel 365専用の動的配列数式の2つの数式について説明します。

すべてのExcelバージョン向けの配列数式を使用して複数列から一意の値を抽出する

どのバージョンのExcelユーザーでも、配列数式は複数列から一意の値を抽出するための強力なツールです。以下にその方法を示します：

1. 範囲 A2: C9 に値があると仮定し、次の数式をセル E2 に入力してください：

=INDIRECT(TEXT(MIN(IF(($A$2:$C$9<>"")*(COUNTIF($E$1:E1,$A$2:$C$9)=0),ROW($2:$9)*100+COLUMN($A:$C),7^8)),"R0C00"),)&""

2. Shift + Ctrl + Enter キーを同時に押してから、空白セルが現れるまでフィルハンドルをドラッグして一意の値を抽出します。スクリーンショットをご覧ください：

Excel 365、Excel 2021、および新しいバージョン向けの数式を使用して複数列から一意の値を抽出する

Excel 365、Excel 2021、および新しいバージョンは動的配列をサポートしており、複数列から一意の値を抽出するのが非常に簡単になります：

結果を配置したい空白セルに次の数式を入力またはコピーし、Enter キーを押して一度にすべての一意の値を取得します。スクリーンショットをご覧ください：

=UNIQUE(TOCOL(A2:C9,1))

Kutools AI アシスタントを使用して複数列から一意の値を抽出する

「Kutools AI アシスタント」の力を活用して、Excel の複数列からシームレスに一意の値を抽出しましょう。数回のクリックだけで、このインテリジェントなツールがあなたのデータを精査し、選択した範囲全体から一意のエントリを特定してリスト化します。複雑な数式や VBA コードの手間を忘れて、「Kutools AI アシスタント」の効率性を活用し、Excel ワークフローをより生産的でエラーのないものに変えてください。

Kutools for Excel のインストール後、「Kutools AI」＞「AI アシスタント」をクリックして「Kutools AI アシスタント」ペインを開きます：

1. チャットボックスに要件を入力し、「送信」ボタンをクリックするか Enter キーを押して質問を送信します；
   「範囲 A2:C9 から一意の値を抽出し、空白セルを無視して、結果を E2 から開始して配置します：」
2. 分析後、「実行」ボタンをクリックして実行します。Kutools AI アシスタントは AI を使用してリクエストを処理し、指定されたセルに直接結果を返します。

ピボットテーブルを使用して複数列から一意の値を抽出する

ピボットテーブルに精通している場合、以下の手順で複数列から簡単に一意の値を抽出できます：

1. 最初に、データの左側に新しい空白列を挿入します。この例では、元のデータの隣に列 A を挿入します。

2. データ内のセルをクリックし、「Alt+D」キーを押してからすぐに「P」キーを押して「ピボットテーブルとピボットチャートウィザード」を開き、ウィザード ステップ1で「複数の統合範囲」を選択します。スクリーンショットをご覧ください：

3. 次に「次へ」ボタンをクリックし、ウィザード ステップ2で「単一ページフィールドを作成する」オプションをチェックします。スクリーンショットをご覧ください：

4. 「次へ」ボタンを続けてクリックし、左側の新しい列を含むデータ範囲を選択して「追加」ボタンをクリックし、データ範囲を「すべての範囲」リストボックスに追加します。スクリーンショットをご覧ください：

5. データ範囲を選択後、「次へ」を続けてクリックし、ウィザード ステップ3でピボットテーブルレポートを配置する場所を選択します。

6. 最後に「完了」をクリックしてウィザードを終了すると、現在のワークシートにピボットテーブルが作成されます。そして、レポートに追加するフィールドを選択するセクションからすべてのフィールドのチェックを外します。スクリーンショットをご覧ください：

7. 次に、フィールド Value をチェックするか、Value を「行」ラベルにドラッグすると、複数列から一意の値が次のように取得されます：

VBAコードを使用して複数列から一意の値を抽出する

以下の VBA コードを使用して、複数列から一意の値を抽出することもできます。

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

2. 「挿入」＞「モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。

VBA: 複数列から一意の値を抽出する

Sub Uniquedata()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Set dt = CreateObject("Scripting.Dictionary")
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For Each rng In InputRng
    If rng.Value <> "" Then
        dt(rng.Value) = ""
    End If
Next
OutRng.Range("A1").Resize(dt.Count) = Application.WorksheetFunction.Transpose(dt.Keys)
End Sub

3. 次に、このコードを実行するために F5 キーを押すと、使用したいデータ範囲を選択するように促すダイアログボックスが表示されます。スクリーンショットをご覧ください：

4. 「OK」をクリックすると、結果を配置する場所を選択する別のダイアログボックスが表示されます。スクリーンショットをご覧ください：

5. このダイアログを閉じると、すべての一意の値が一度に抽出されます。

関連記事：