Excel で列をコピーして、重複を除いた一意のレコードのみを貼り付けるにはどうすればよいですか？

著者Siluvia変更日2025-11-07

多数の重複エントリを含むExcel データを扱う際には、重複をすべて除外し、一意の値のみを含む列のバージョンを作成する必要がよくあります。このような要望は、サマリーリストの作成、レポート用データの準備、大規模データセット内の個別アイテムの分析など、さまざまなタスクで一般的です。列から一意のレコードを効率的に抽出・コピーする方法がわからない場合は、このチュートリアルで、Excel のバージョンやユーザーの好みに応じた実用的で使いやすい解決策をご紹介します。

高度なフィルター機能でリストから一意のレコードのみを貼り付けます

Kutools for Excel でリストから一意のレコードのみを貼り付けます

Excel の UNIQUE 関数を使用して一意のレコードのみを貼り付けます

VBA マクロを使用して一意のレコードのみを貼り付けます

高度なフィルター機能でリストから一意のレコードのみを貼り付けます

列に多数の重複エントリが含まれていて、その中から一意のレコードだけをコピー＆ペーストしたい場合は、Excel の標準機能である高度なフィルターが信頼できる選択肢です。

素晴らしい！Excel でChrome、Edge、Firefox、Safari のような効率的な Tabs をご利用いただけます！
毎日数千回のマウスクリックを削減し、50% もの時間を節約できます！

1。一意にコピーしたい値を含む列を選択します。次に、データタブに移動し、高度なフィルターを並べ替えとフィルターグループ内でクリックします。スクリーンショットをご参照ください：

詳細フィルターダイアログボックスを開くスクリーンショット

2。「高度なフィルター」ダイアログボックスで、以下の手順を慎重に実行してください：

「別の場所にコピー」をラジオボタンで選択してください。操作セクションでこの設定を行うと、元のデータに影響を与えることなく、結果が別の場所に表示されます。
「コピー先」ボックスで、ボタンをクリックし、一意の値を配置したい空白セルを選択してください。空のセルをコピー先に指定すれば、既存のデータが上書きされるのを防げます。
「重複するレコードを無視する」チェックボックスをオンにすると、Excel が抽出結果から重複を自動的に除外します。
操作を完了するには、「OK」ボタンをクリックしてください。スクリーンショットをご参照ください：

詳細フィルターダイアログボックスを設定するスクリーンショット

これらの手順を完了すると、指定した空白セルに元の列から抽出された一意の値のみが表示されます。ただし、フィルター後のリストは特定の順序を保持せず、ソースデータが変更されても自動で更新されませんのでご注意ください。元のリストを変更した場合は、必要に応じて再度この手順を実行してください。

一意な値を抽出するスクリーンショット

ヒント：

元のデータにヘッダーが含まれている場合は、正確なフィルター処理のため、選択範囲にヘッダーも含めてください。
「リスト範囲は1 行または1 列でなければなりません」というエラーが表示された場合は、選択した範囲が1 行または1 列に統一されていることを確認してください。
この方法は一回限りの抽出には最適ですが、頻繁に更新されるリストにはあまり向いていません。なぜなら、フィルター結果は静的だからです。

Kutools for Excel でリストから一意のレコードのみを貼り付けます

一意および重複レコードの管理を頻繁に行うワークフローにお悩みの方や、よりシンプルなプロセスをご希望の場合は、Kutools for Excelがこれらのタスクを簡単にこなせる専用ユーティリティを提供しています。重複するセル／一意のセルを選択ユーティリティを使えば、Excel に関する深い知識がなくても、任意の列から一意の値を素早く特定・選択・コピーできます。ビジネスデータのクリーンアップ、メールリストの準備、アンケート回答の整理などに特に役立ちます！

Kutools for Excel：300 以上の便利なExcel アドインを、30 日間制限なく無料でお試しいただけます。今すぐ30 日間無料トライアルを開始

1。一意の値のみを抽出・貼り付けたいリストを最初にハイライト表示します。次に、上部メニューからKutools>選択>重複するセル/一意のセルを選択へ進みます。

2。表示されるダイアログボックスで、一意の値(最初の重複を含む)を選択します。このオプションにより、重複する値の最初の出現が一意として保持され、それ以降の繰り返しは無視されます。「OK」をクリックしてください。次に表示される確認ダイアログでも、再度「OK」をクリックします。スクリーンショットを参照してください：

Kutools の「重複セルと一意セルを選択」ダイアログボックスを構成するスクリーンショット

注：リスト内で一度しか出現しない値（真の一意値）のみを抽出したい場合は、一意の値オプションを選択してください。これにより、重複を完全に除外し、出現回数が1 回だけのアイテムのみを取得できます。

3。確認後、Kutools が元のリスト内で識別されたすべての一意の値を自動的に選択します。その後、Ctrl+Cキーを押してコピーし、新しい列またはシートにCtrl+Vで貼り付けてください。

一意な値のみを貼り付けるスクリーンショット

重要な注意点：

この方法は小規模・大規模を問わずあらゆるデータセットに最適で、選択内容を即座に視覚的に確認できます。
コピー＆ペーストする際はご注意ください。意図せず他のセルが選択されていないかを確認し、誤ってデータを上書きしないようにしましょう。
複数の列があり、各行を一意のエントリとして扱う必要がある場合は、このユーティリティで列だけでなく行単位での選択もサポートされています。

Kutools for Excel— 300 以上の必須ツールでExcel を強化し、作業をより迅速・簡単に。AI 機能を活用して、スマートなデータ処理と生産性の飛躍的な向上を実現します。今すぐ入手

Excel の UNIQUE 関数を使用して一意のレコードのみを貼り付けます

Excel 365 やExcel 2021 以降のバージョンをご利用であれば、UNIQUE 関数を使って、列から一意の値を動的かつ非常に効率的に抽出できます。この方法は、元データが変更された際に結果を自動更新したいダッシュボードや定期更新型のサマリーテーブルに最適です。

1。コピー先の列の最初のセル（例：セル)B1）に、次の数式を入力してください：

=UNIQUE(A1:A100)

ここでは、A1:A100を実際のデータ範囲に置き換えてください。必要に応じて、範囲を自由に調整できます。

2。「Enter」キーを押すと、Excel が元の列から一意の値をすべて数式の下の隣接セルに自動的に展開します。結果は、ソースデータが変更されるたびに自動更新されます。

ヒント：行から一意の値を抽出したい場合（またはその逆で列から抽出したい場合）は、数式の範囲をそれに応じて調整してください。

メリット：動的に更新でき、操作も簡単。手動でのフィルターやコピー作業が不要です。
デメリット：Excel 365 およびExcel 2021 以降のバージョンでのみご利用いただけます。結果は数式セルの下にある既存のデータを上書きしてしまうため、あらかじめレイアウトを計画し、データ損失を回避してください。

抽出後に一意の値の静的なコピーを取得したい場合（共有やさらなる編集のため）、展開されたリストをコピーし、新しい場所に特殊貼り付け > 値で貼り付けてください。

VBA コードで列から一意のレコードのみを貼り付けます

一意なレコードを頻繁に抽出・コピーする必要がある場合や、大規模なデータセットでのこの作業を自動化したい場合は、簡単な VBA マクロを作成すれば、瞬時に処理できます。この方法は、基本的なプログラミングに慣れている方や、手動でのフィルタリングが極めて時間のかかるシナリオに最適です。

1。開発者ツール > Visual Basic をクリックすると、Microsoft Visual Basic for Applications エディターウィンドウが開きます。エディターで、挿入 > 標準モジュールをクリックし、次のコードをモジュールに入力します。

Sub ExtractUniqueRecords()
    Dim rng As Range
    Dim dest As Range
    Dim uniqueCol As Collection
    Dim cell As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the source range:", xTitleId, rng.Address, Type:=8)
    
    Set dest = Application.InputBox("Select the destination (top cell):", xTitleId, "", Type:=8)
    
    Set uniqueCol = New Collection
    
    For Each cell In rng
        If Len(cell.Value) > 0 Then
            uniqueCol.Add cell.Value, CStr(cell.Value)
        End If
    Next
    
    For i = 1 To uniqueCol.Count
        dest.Offset(i - 1, 0).Value = uniqueCol(i)
    Next
End Sub

2。実行ボタンF5（または F5 キーを押す）をクリックしてマクロを実行します。まず、一意な値を抽出するソース範囲を選択するよう求められ、その後、結果を貼り付ける先のセル（出力先）を指定します。完了すると、マクロが指定した列に一意なレコードを入力します。

ヒントとトラブルシューティング：

マクロを実行する前に、対象のソース範囲が正しく選択されており、コピー先に結果を格納するための十分なスペースがあることをご確認ください。
この VBA コードは空白セルをスキップし、テキストと数値を同等に扱います。データの種類が混在している場合は、結果の正確性をご確認ください。
「添え字が範囲外です」というエラーが発生した場合は、選択範囲が要件（単一の列で、結合されていないこと）を満たしているかご確認ください。

VBA による自動化はバッチ処理に非常に柔軟に対応でき、このマクロをボタンに割り当てれば、繰り返し実行する際にさらに簡単に操作できます。

追加の提案とトラブルシューティング

重要なデータは、セルを上書きする可能性のあるコピー＆ペースト操作を行う前に必ずバックアップしてください。
UNIQUE 関数など、数式に基づくソリューションをご利用の際は、特にExcel のバージョン互換性にご注意ください。
複雑なタスクのワークフローを最適化するには、複数の方法を組み合わせるのが効果的です（たとえば、まず UNIQUE 関数を使い、その後でKutools を使って追加の書式設定を行うなど）。
書式設定の問題（非表示の行／列や結合セルなど）が結果に影響を及ぼす場合がありますので、必ずリストの抽出結果を確認し、完全性を確保してください。
予期しない結果やシステムエラーが発生した場合は、まずExcel を再起動して一時的な不具合を解消し、その後、範囲選択の手順を再度ご確認ください。

Excel で数式以外のすべてを貼り付けるにはどうすればよいですか？

最高の Office 業務効率化ツール

🤖	KUTOOLS AI アシスタント：次に基づいてデータ分析を革新します：インテリジェント実行｜コード生成｜カスタム数式作成｜データ分析とチャート生成｜拡張機能呼び出し…
	人気の機能：検索・ハイライト、または重複をマーキング｜空白行を削除する｜データを失うことなく列の結合またはセルを｜数式を使用しない四捨五入...
	スーパー LOOKUP：複数条件 VLookup ｜複数値 VLookup ｜複数シート間 VLookup ｜ファジーマッチ....
	高度なドロップダウンリスト：ドロップダウンリストをすばやく作成｜連動型ドロップダウンリスト｜複数選択可能なドロップダウンリスト....
	列マネージャー：指定した数の列を追加｜列の移動｜非表示列の表示状態を切り替え｜範囲および列の比較...
	注目の機能：グリッドフォーカス｜デザインビュー｜強化された数式バー｜ワークブックとシートマネージャー｜リソースライブラリ（オートテキスト）｜日付ピッカー｜ワークシートの統合｜暗号化／セルの復号化｜リストからメール送信｜スーパーフィルター｜特殊フィルタ（太字のフォントを持つセルをフィルタリング／斜体／取り消し線。。。）。。。
	トップ15 ツールセット：12 テキストツール（テキストの追加、特定の文字を削除、...）｜ 50+チャートタイプ（ガントチャート、...）｜ 40+実用的関数（誕生日に基づいて年齢を計算します、...）｜ 19 挿入ツール（QR コードを挿入、パスから画像を挿入、...）｜ 12 変換ツール（単語に変換する、為替レートの変換、...）｜ 7 結合と分割ツール（高度な行のマージ、セルの分割、...）｜さらに多数

Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています！

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。

Kutools for Excel の詳細はこちら。。。無料ダウンロード。。。

Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
日々の生産性を50％も向上させ、毎日数百回ものマウスクリックを削減します！