Excel で抽選用の名前リストを作成するには？

著者Xiaoyang変更日2025-07-23

職場のアクティビティ、チームミーティング、特別イベントなどで、大規模な名前リストから無作為に数名の参加者や当選者を選ぶ必要がよくあります（例：チーム宝くじ、ランダム表彰、ボランティアの選出など）。デジタル形式で多数の名前を扱う場合、帽子から手作業で名前を引く方法は非効率的どころか現実的ではありません。幸いにも、Excel にはリストからランダムに名前を選ぶための実用的な方法がさまざまあり、透明性・再現性・カスタマイズ性に優れた抽選をスプレッドシート上で直接実現できます。本記事では、Excel で名前をランダムに選ぶ効果的な方法をいくつか紹介し、それぞれの活用シーン・メリット・注意点を詳しく解説します。さらに、よくあるミスを避けるための役立つヒントもお届けします。

数式を使って抽選用の名前を抽出する

Kutools for Excel を使って抽選用の名前をランダムに選択する

VBA コードを使って抽選用の名前を抽出する

代替方法：RAND 関数と並べ替えを使ってランダムに名前を抽出する

数式を使って抽選用の名前を抽出する

特定の人数（例：3 名の当選者）を名前のリストからランダムに選ぶ必要がある場合は、複雑な数式を使ったアプローチが有効です。この方法は重複を自動で回避し、ブックを再計算するたびに結果を更新します。特に、中規模のリストから少数かつ固定数の名前を抽出したい場合や、追跡可能なプロセスを求めつつ、追加のアドインやコードを使いたくない場合に最適です。

この方法を使用するには、以下の手順に従ってください：

最初の抽選結果を表示したい空のセル（例：C2）に、次の数式を入力します：

=IF(ROWS(C$2:C2)>B$2,"",INDEX(A$2:A$16,AGGREGATE(15,6,((ROW(A$2:A$16)-ROW(A$2)+1)/ISNA(MATCH(A$2:A$16,C$1:C1,0))),RANDBETWEEN(1,ROWS(A$2:A$16)-COUNTA(C$1:C1)+1))))

数式を入力したら、抽選したい人数分だけフィルハンドルを下にドラッグしてください（例：3 名を抽選する場合は、C4 まで3 行分ドラッグ）。抽選された名前がセルに自動的に表示されます。スクリーンショットをご参照ください。

数式でランダムな名前を抽出

パラメーターの説明と実用的なヒント：

この数式では：
- A2:A16— これは名前のソースリストです。実際の名前データに合わせて、この範囲を必ず変更してください。
- B2— このセルには、ランダムに抽出したい名前の人数を入力してください（例：3）。
- C2— これは結果リストの先頭セルです。ここに数式を入力してください。
- C1— これは数式の直上のセルです。空白にしておいても、数式が正しく機能するために必要です。
この方法は動的です。新しいランダムな名前のセットが必要な場合は、F9キーを押して再計算し、新しい結果セットを即座に取得してください。
ワークシートが再計算されるたびに数式の結果が変わらないようにするには、結果をコピーして特殊貼り付け > 値を使い、抽選された名前を固定することをおすすめします。
名前リストが大きかったり、抽選を複数回行ったりする際は、結果列と名前リストが重複しないようご注意ください。重複すると、エラーが発生する可能性があります。

注意：セル参照が正しいこと、および範囲が実際のデータと一致していることを再度ご確認ください。ワークシートの構造を変更したり、参照されているセルを削除したりすると、数式が正常に機能しなくなる可能性があります。

Kutools for Excel を使って抽選用の名前をランダムに選択する

数式を使わずに、シンプルでインタラクティブな方法で名前をランダムに選びたいなら、Kutools for Excelが提供するランダムに並び替え機能がぴったりです。このソリューションは、非技術的なユーザーの方々はもちろん、大規模なデータセットを視覚的かつスピーディーに処理したいときや、抽選を頻繁に繰り返す必要がある場面で特に役立ちます。

Kutools for Excelは300 以上の高度な機能を提供し、複雑な作業を効率化して、創造性と生産性を高めます。AI 機能と統合されたKutools は、正確にタスクを自動化し、データ管理を簡単にします。Kutools for Excel の詳細情報。。。 無料トライアル。。。

Kutools for Excel をインストール後、以下の手順に従ってください：

1。抽選に使う名前リスト全体を選択し、次にKutools > 範囲 > 並び替え、選択、またはランダムにをクリックします。スクリーンショットをご参照ください：

Kutools の「範囲をランダムに並べ替え/選択」機能をクリック

2。並び替え、選択、またはランダムにダイアログボックスで、選択タブに移動します。ここで、選択するセルの数ボックスに抽選したいランダムな名前の数（例：3）を入力し、セル選択の種類セクションで「一意の値」を選択してください。これにより、重複しない任意の数の名前をランダムに選べます。スクリーンショットを参照してください：

ダイアログボックスでオプションを指定

3。「OK」をクリックすると、指定した人数分の名前がリストからランダムに選ばれ、ハイライト表示されるので、当選者や選ばれた参加者をすぐに確認できます。スクリーンショットを参照してください：

指定した数の名前が選択される

この方法は使いやすく、信頼性も抜群。必要に応じて名前を並べ替えたりシャッフルしたりする追加オプションもご利用いただけます。何度でも繰り返し使え、手計算でありがちな人的ミスや重複をしっかり回避。数式やコーディングの知識は不要で、迅速な解決をお求めの方に最適です。

注：範囲内に無関係なデータが含まれないようにご注意ください。ハイライトされたセルのみが当選者の名前を表します。必要に応じて、この名前の範囲をコピーまたはマークして、今後さらにご利用いただけます。

今すぐKutools for Excel をダウンロードして、無料トライアルをお試しください！

まとめると、Kutools for Excel を使えば、ランダム抽選を非常に簡単かつ効率的に管理できます。特に信頼性と使いやすさを最優先したいシーンや、異なるグループサイズで複数回抽選を行う必要がある場合に最適です。

VBA コードを使って抽選用の名前を抽出する

より高度なシナリオや柔軟性の高い自動化をご希望の場合は、VBA コードを使ってリストからランダムに名前を抽出できます。このソリューションは、Excel の開発者オプションに慣れており、抽選を繰り返したり、手順をカスタマイズしたりしたい方（たとえば、結果を特定の場所に出力する、大規模なリストを処理するなど）に最適です。

抽選に VBA を使用する手順は以下の通りです：

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

2。「挿入 > 標準モジュール」をクリックして新規モジュールを作成し、以下の VBA コードをモジュールウィンドウにコピー＆ペーストしてください。

VBA コード：リストからランダムに名前を抽出する：

Public Sub LuckyDraw()
    Dim I, J, xRnd As Long
    Dim xSRg, xDRg As Range
    Dim xDic As New Dictionary
    Dim xnum, xLastRow As Long
    On Error Resume Next
    Set xSRg = Application.InputBox("Please select the data list:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xDRg = Application.InputBox("Please selecta cell to put the result:", "KuTools for Excel", , , , , , 8)
    If xDRg Is Nothing Then Exit Sub
    xLastRow = xSRg.Rows.Count
    Set xSRg = xSRg(1)
    Set xDRg = xDRg(1)
    xnum = Range("B2")
    If xnum < 1 Then Exit Sub
    J = 0
    For I = 1 To xnum
LabExit:
        xRnd = Int(Rnd() * xLastRow)
        If xDic.Exists(xRnd) Then GoTo LabExit
        xDic.Add xRnd, ""
        xDRg.Offset(J, 0).Value = xSRg.Offset(xRnd, 0).Value
        J = J + 1
    Next
End Sub

パラメーターの説明：コード内のB2は、抽出するランダムな名前の個数を入力するセルです。必要に応じて、セル参照を変更できます。

3。コードを貼り付けた後、VBA エディターウィンドウで「ツール>参照設定」をクリックします。開いたダイアログで、利用可能な参照リスト内のMicrosoft Scripting Runtimeにチェックを入れます。この手順は、コードで使用するスクリプティング辞書を有効にするために必要です。スクリーンショットを参照してください：

[ツール] > [参照設定] をクリックし、[Microsoft Scripting Runtime] オプションをチェック

4。「OK」をクリックしてダイアログを閉じ、次に「F5」キーを押してコードを実行します。すると、抽選元の名前を含むデータリストを選択するよう促すプロンプトボックスが表示されます。スクリーンショットを参照してください：

データリストを選択する VBA コード

5。「OK」をクリックすると、抽選結果を表示したいセルを選択するためのプロンプトボックスが表示されます。スクリーンショットをご参照ください：

結果を配置するセルを選択する VBA コード

6。OKをクリックして処理を完了します。指定したセルに、ランダムに選ばれた名前が即座に表示されます。スクリーンショットをご参照ください：

希望する数の名前がランダムに作成される

実用的なヒント：コードを実行する前に、必ず作業内容を保存してください。エラーが発生した場合は、参照設定とセル範囲の選択を再度ご確認ください。この方法はより細やかな制御が可能ですが、基本的な VBA 操作に慣れている方向けです。

メリットとデメリット：VBA を使えば、カスタマイズ性が非常に高く、過去の当選者を自動で除外したり、通知を自動化するなど、高度な要件にも柔軟に対応できます。ただし、基本的な VBA の知識が必要なうえ、マクロが環境で許可されていない場合はご利用いただけません。

代替方法：RAND 関数と並べ替えを使ってランダムに名前を抽出する

上記の方法以外にも、Excel のRAND 関数と並べ替えを組み合わせた、実用的で視覚的にわかりやすい方法があります。この方法はシンプルで、複雑な数式やアドイン、コーディングが一切不要。どのExcel バージョンでも手軽に使えるため、一時的な抽選に最適です。特に、ランダム化の過程を手動で確認・検証したいときに役立ちます！

手順は以下のとおりです：

名前リストの隣に補助列を追加し、補助列の最初のセル（例：名前が A2:A16 にある場合、B2）に=RAND()を入力します。=RAND()
数式をリスト全体の横にコピーすると、各セルにランダムな小数値が自動的に入力されます。
元の名前リストと RAND 関数を使った補助列の両方を選択してください。
データタブに移動し、並べ替えを選択します。RAND 関数で生成した値を含む補助列を並べ替え条件として使い、最小から最大（またはその逆）の順に並べ替えると、リスト全体がランダムにシャッフルされます。
並べ替え後、上位 N 件の名前を抽選の当選者として選ぶだけです。

ヒントと注意点：ワークシートが再計算されるたびに、RAND 関数の値は自動で更新されます。抽選結果を固定したい場合は、セルの値をコピーして別の場所に「値として貼り付け」してください。再度抽選を行いたいときは、F9 キーで再計算するだけ！

利点：この方法は実装が非常に簡単で、追加の設定も不要。ライブ抽選時に公平性を明確に示すのに最適です。ただし、抽選を頻繁に繰り返す必要がある場合や、除外リストなどの高度な機能が必要な場合は、数式・ VBA ・Kutools のほうがより適しています。

上記のように、Excel には抽選で名前をランダムに選ぶ方法がいくつかあります。どの方法を選ぶかは、簡便さ・カスタマイズ性・視覚的な操作性に対するあなたの好みによります。シンプルで手動の操作がお好みなら、RAND 関数を使った並べ替えやKutools for Excel の利用がおすすめです。一方、動的で再利用可能なソリューションをお求めの場合は、数式や VBA がさらに高い柔軟性を提供します。エラーや予期しない結果が発生した場合は、セル参照や範囲選択を再度ご確認いただき、必要なアドインやマクロの設定が有効になっているかをご確認ください。最良の結果を得るために、抽選を始める前に必ずデータを保存し、重要な活動やチームイベントでのミスを防ぐため、結果の検証もぜひ行ってください。

最高の 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％も向上させ、毎日数百回ものマウスクリックを削減します！

Office Tab の詳細はこちら。。。無料ダウンロード。。。

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン＋Office Tab Pro
インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能（MSI 対応）
連携してさらにパワーアップ— Office アプリ全体で生産性が向上
30 日間のフル機能トライアル— 登録不要、クレジットカード不要
最高のお得感— 個別アドイン購入よりお得

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