Excel ドロップダウンリスト：作成、編集、削除、および高度な操作

ドロップダウンリストはリストボックスと同様に、ユーザーが選択リストから1 つの値を選ぶことを可能にします。このチュートリアルでは、Excel でのドロップダウンリストの基本操作（作成、編集、削除）を解説します。さらに、より多くのExcel 課題を解決するために、ドロップダウンリストの機能を強化する高度なテクニックもご紹介します。

シンプルなドロップダウンリストを作成

ドロップダウンリストを使うには、まずその作成方法をマスターする必要があります。このセクションでは、Excel でドロップダウンリストを作成する6 つの方法をご紹介します。

セル範囲からドロップダウンリストを作成

ここでは、Excel でセル範囲からドロップダウンリストを作成する方法をご紹介します。以下の手順に従って、簡単に設定してください。

1．ドロップダウンリストを配置したいセル範囲を選択してください。

ヒント：「Ctrl」キーを押しながらセルを1 つずつ選択すれば、複数の非連続セルに同時にドロップダウンリストを設定できます。

2．「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

3．「データの入力規則」ダイアログボックスで、「設定」タブにある次の設定を行います。

注記：

これでドロップダウンリストが完成しました。リスト付きのセルをクリックすると、横に矢印が表示されるので、その矢印をクリックしてリストを展開し、項目を選んでください。

テーブルから動的ドロップダウンリストを作成

データ範囲をExcel テーブルに変換すれば、そのテーブル範囲に基づいた動的ドロップダウンリストを簡単に作成できます。

1．元のデータ範囲を選択し、「Ctrl」＋「T」キーを押してください。

2．表示された「テーブルの作成」ダイアログボックスで「OK」をクリックすると、データ範囲がテーブルに変換されます。

3．ドロップダウンリストを配置したいセル範囲を選択し、「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

4．「データの入力規則」ダイアログボックスで、以下の操作を実行します。

これで動的ドロップダウンリストが完成しました。テーブル範囲にデータを追加または削除すると、ドロップダウンリストの選択肢が自動的に更新されます。

数式を使用して動的ドロップダウンリストを作成

テーブル範囲から動的ドロップダウンリストを作成する方法に加え、Excel では数式を使って動的ドロップダウンリストを作成することも可能です。

1．ドロップダウンリストを表示するセルを選択してください。

2。「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

3．「データの入力規則」ダイアログボックスで、以下の設定を行ってください。

=OFFSET($A$13,0,0,COUNTA($A$13:$A$24),1)

これで動的ドロップダウンリストが完成しました。特定の範囲にデータを追加または削除すると、ドロップダウンリストの選択肢が自動的に更新されます。

名前付き範囲からドロップダウンリストを作成

Excel では、名前付き範囲を使ってドロップダウンリストを作成することもできます。

1．まず名前付き範囲を作成します。名前を付けたいセル範囲を選択し、「名前」ボックスに任意の名前を入力して「Enter」キーを押してください。

2。「データ」>「データの入力規則」>「データの入力規則」をクリックしてください。

3。「データの入力規則」ダイアログボックスで、以下のとおり設定してください。

これで、名前付き範囲のデータを使ったドロップダウンリストが完成しました！

別のワークブックからドロップダウンリストを作成

「SourceData」という名前のワークブックがあり、そのデータに基づいて別のワークブックにドロップダウンリストを作成したい場合は、以下の手順に従ってください。

1．「SourceData」ワークブックを開き、ドロップダウンリストのベースとなるデータを選択します。その後、セルの名前を「名前」ボックスに入力し、「Enter」キーを押してください。

ここでは、範囲に「City」という名前を付けます。

2．ドロップダウンリストを挿入したいワークシートを開き、「数式」タブの「名前の定義」をクリックします。

3．「新しい名前」ダイアログボックスで、「SourceData」ワークブック内のセルの名前をもとに名前付き範囲を作成するには、次の設定を行ってください。

=SourceData.xlsx!City

注記：

4．ドロップダウンリストを挿入するワークブックを開き、ドロップダウンリストを設定したいセルを選択してから、「データ」＞「データの入力規則」＞「データの入力規則」をクリックします。

5．「データの入力規則」ダイアログボックスで、以下の設定を実行してください。

これで、ドロップダウンリストが選択した範囲に挿入されました。そのドロップダウンの値は、別のワークブックから取得しています。

便利なツールで簡単にドロップダウンリストを作成

ここでは、「Kutools for Excel」の「シンプルなドロップダウンリストの作成」機能を強くおすすめします。この機能を使えば、特定のセルの値から簡単にドロップダウンリストを作成したり、Excel にプリセットされたカスタムリストを使ってドロップダウンリストをすぐに作成したりできます。

1．ドロップダウンリストを挿入したいセルを選択し、「Kutools」＞「ドロップダウンリスト」＞「シンプルなドロップダウンリストの作成」をクリックしてください。

2．「シンプルなドロップダウンリストの作成」ダイアログボックスで、以下の設定を行ってください。

注：Excel にプリセットされたカスタムリストに基づいてドロップダウンリストを作成する場合は、「ソース」セクションで「カスタムリスト」オプションを選択し、「カスタムリスト」ボックスから目的のリストを選び、「OK」ボタンをクリックしてください。

これで、ドロップダウンリストが選択範囲に挿入されました。

ドロップダウンリストを編集

ドロップダウンリストを編集したい場合は、このセクションの方法がぴったりです。

セル範囲に基づくドロップダウンリストを編集

セル範囲に基づくドロップダウンリストを編集するには、次の手順に従ってください。

1．編集したいドロップダウンリストが含まれるセルを選択し、「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

2．「データの入力規則」ダイアログボックスで、「ソース」ボックス内のセル参照を必要な範囲に変更し、「OK」ボタンをクリックします。

名前付き範囲に基づくドロップダウンリストを編集

名前付き範囲に値を追加または削除した後、その範囲に基づいて作成されたドロップダウンリストを最新の内容に更新するには、以下の手順に従ってください。

1．「数式」＞「名前の管理」をクリックしてください。

ヒント：「Ctrl」＋「F3」キーを押すと、「名前の管理」ウィンドウが開きます。

2．「名前の管理」ウィンドウで、以下の設定を行ってください。

2.1) 「名前」ボックスで、更新したい名前付き範囲を選択します。

2.2) 「参照範囲」セクションで、ボタンをクリックして、ドロップダウンリスト用の更新後の範囲を選択します。

2.3) 「閉じる」ボタンをクリックします。

3．次に「Microsoft Excel」ダイアログボックスが表示されるので、「はい」をクリックして変更を保存してください。

これで、この名前付き範囲に基づくドロップダウンリストが更新されました。

ドロップダウンリストを削除

このセクションでは、Excel でドロップダウンリストを削除する方法をご紹介します。

Excel の組み込み機能でドロップダウンリストを削除

Excel には、ワークシートからドロップダウンリストを削除するための組み込み機能が備わっています。以下の手順に従って操作してください。

1．削除したいドロップダウンリストが含まれるセル範囲を選択します。

2。「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

3．「データの入力規則」ダイアログボックスで、「すべてクリア」ボタンをクリックし、「OK」をクリックして変更を保存してください。

これで、「範囲を選択してください」のドロップダウンリストが削除されました。

便利なツールで簡単にドロップダウンリストを削除

「Kutools for Excel」には便利なツール「データ検証制約をクリア」が用意されており、1 つまたは複数の範囲を選択するだけで、ドロップダウンリストを簡単に一括削除できます。以下の手順に従ってください。

1。ドロップダウンリストを削除したいセル範囲を選択してください。

2。「Kutools」＞「入力を制限する」＞「データ検証制約をクリア」をクリックしてください。スクリーンショットをご参照ください。

3。その後、「Kutools for Excel」ダイアログボックスが表示され、「ドロップダウンリストをクリアしますか？」と尋ねられますので、「OK」ボタンをクリックしてください。

これにより、「この範囲を選択してください」内のドロップダウンリストは即座に削除されます。

ドロップダウンリストに色を追加

場合によっては、ドロップダウンリスト内の選択肢を一目で区別できるよう、カラーコード付きのドロップダウンリストを作成したいこともあるでしょう。本セクションでは、この課題を解決するための2 つの方法を詳しくご紹介します。

条件付き書式を使用するでドロップダウンリストに色を追加する

ドロップダウンリストを含むセルに条件付き書式ルールを設定し、カラーコードで視覚的にわかりやすくできます。以下の手順に従ってください。

1。カラーコードを適用したいドロップダウンリストを含むセルを選択します。

2。「ホーム」＞「条件付き書式を使用する」＞「ルールの管理」をクリックしてください。

3。「条件付き書式を使用するルールマネージャー」ダイアログボックスで、「新しいルール」をクリックしてください。

4。「新しい書式設定のルール」ダイアログボックスで、次のように設定してください。

4.1) 「ルールの種類の選択」ボックスで、「特定の文字列を含むセルだけを書式設定」オプションを選択します。

4.2) 「次の値を含むセルだけを書式設定」セクションで、最初のドロップダウンリストから「特定の文字列」を、2 番目のドロップダウンリストから「含む」をそれぞれ選択し、3 番目のボックスでソースリストの最初の項目を選択します。

ヒント: ここでは3 番目のテキストボックスでセル A16 を選択しています。A16 は、ドロップダウンリストを作成する際に基準としたソースリストの最初の項目です。

4.3) 「書式」ボタンをクリックします。

4.4) 「セルの書式設定」ダイアログボックスで、「塗りつぶし」タブに移動し、指定したテキスト用の背景色を選択してから「OK」ボタンをクリックします。必要に応じて、テキスト用の特定のフォント色を選択することもできます。

4.5) 「新しい書式設定ルール」ダイアログボックスに戻ったら、「OK」ボタンをクリックします。

5。 「条件付き書式を使用するルールの管理」ダイアログボックスに戻ったら、上記の手順3 および4 を繰り返して、他のドロップダウン項目にも色を設定してください。すべての色の指定が完了したら、「OK」をクリックして変更を保存します。

これ以降、ドロップダウンリストから項目を選択すると、そのテキストに基づいてセルが指定された背景色で強調表示されます。

便利なツールで簡単にドロップダウンリストに色を追加

ここでは、「Kutools for Excel」の「色付きリスト」機能をご紹介し、Excel でドロップダウンリストに簡単に色を追加できるようサポートします。

1。色を追加したいドロップダウンリストが含まれるセルを選択します。

2. 「Kutools」＞「ドロップダウンリスト」＞「色付きリスト」をクリックしてください。

3。「色付きリスト」ダイアログボックスで、次の手順に従って操作してください。

ヒント：ドロップダウンリストの選択に基づいて強調表示する行の範囲を指定したい場合は、「適用範囲」セクションで「行全体」オプションを選択し、続いて「強調表示された行の範囲」ボックスから対象の行をお選びください。

これで、ドロップダウンリストは下のスクリーンショットのようにカラーコードが付いた状態になります。

ドロップダウンリストの選択に基づいてセルを強調表示する

強調表示された行の範囲（ドロップダウンリストの選択に基づく）

Excel または Google Sheets で依存型ドロップダウンリストを作成する

依存型ドロップダウンリストは、最初のドロップダウンリストで選択した値に応じて、表示される選択肢が変化します。Excel ワークシートまたは Google Sheets で依存型（カスケード型）ドロップダウンリストを作成したい場合は、本セクションの方法が役立ちます。

Excel ワークシートで依存型ドロップダウンリストを作成する

以下のデモでは、Excel ワークシートでの依存型ドロップダウンリストをご紹介します。

手順を確認するには、Excel で依存型カスケードドロップダウンリストを作成する方法は？をご覧ください。

Google Sheets で依存型ドロップダウンリストを作成する

Google Sheets で依存型ドロップダウンリストを作成したい場合は、Google Sheets で依存型ドロップダウンリストを作成する方法は？

検索可能なドロップダウンリストを作成する

ワークシート内のドロップダウンリストに項目が多数含まれていると、目的の項目を素早く選ぶのは簡単ではありません。ただし、項目の先頭文字や連続するいくつかの文字を覚えていれば、ドロップダウンリスト内にある検索機能を使えば簡単に絞り込めます。このセクションでは、Excel で検索可能なドロップダウンリストを作成する方法をご紹介します。

たとえば、下のスクリーンショットのように、ソースデータが Sheet1 の A 列にあるとします。このデータを使ってExcel で検索可能なドロップダウンリストを作成するには、以下の手順に従ってください。

1。まず、ソースデータリストの横に、配列数式を使ったヘルパー列を作成します。

この例では、セル B2 を選択して以下の数式を入力し、「Ctrl」＋「Shift」＋「Enter」を押すと、最初の結果が得られます。

=IFERROR(INDEX($A$2:$A$50,SMALL(IFERROR(MATCH(IF(FIND(CELL("contents"),$A$2:$A$50)>0,$A$2:$A$50,""),$A$2:$A$50,0),""),ROW(A1))),"")

最初の結果セルを選択し、「フィルハンドル」をリストの末尾までドラッグしてください。

注：この配列数式において、$A$2：$A$50 はドロップダウンリストのソースデータ範囲です。実際のデータ範囲に合わせて変更してください。

2. 「数式」タブの「名前の定義」をクリックします。

3。「名前の編集」ダイアログボックスで、次のように設定してください。

=OFFSET(Sheet1!$B$2,0,0,COUNTA(Sheet1!$B$2:$B$50)-COUNTIF(Sheet1!$B$2:$B$50,""),1)

次に、名前付き範囲を使ってドロップダウンリストを作成します。この例では、Sheet2 に検索可能なドロップダウンリストを設定します。

4。Sheet2 を開き、ドロップダウンリストに使うセル範囲を選択して、「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

5。「データの入力規則」ダイアログボックスで、次の手順に従ってください。

5.1) 「許可」ボックスで「リスト」を選択します。

5.2) 「元の値」ボックスをクリックしてから「F3」キーを押します。

5.3) 表示される「名前貼り付け」ダイアログで、ステップ3 で作成した名前付き範囲を選択し、「OK」をクリックします。

ヒント： 「元の値」ボックスに直接「=名前付き範囲」と入力することもできます。

5.4) 「エラーアラート」タブをクリックし、「無効なデータが入力されたらエラーアラートを表示する」のチェックを外してから、「OK」ボタンをクリックします。

6。シート見出し（Sheet2）を右クリックし、「コードの表示」をコンテキストメニューから選択します。

7。開いた「Microsoft Visual Basic for Applications」ウィンドウで、以下の VBA コードをコードエディターにコピーしてください。

VBA コード：Excel で検索可能なドロップダウンリストを作成する

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Calculate
End Sub

8。「Alt」+「Q」キーを押して、「Microsoft Visual Basic for Applications」ウィンドウをすばやく閉じましょう。

これで検索可能なドロップダウンリストが完成しました。項目を選択するには、ドロップダウンセルにその項目の先頭1 文字または連続するいくつかの文字を入力し、ドロップダウン矢印をクリックしてください。すると、入力内容に一致する候補がリストに表示されます。詳しくはスクリーンショットをご参照ください。

注：この方法では、大文字と小文字が区別されます。

ドロップダウンリストを作成するが、異なる値を表示する

ドロップダウンリストを作成済みで、そのリストから項目を選択した際にセルに別の内容を表示させたい場合があります。たとえば、以下のデモのように、国名のリストに基づいてドロップダウンリストを作成し、ユーザーが国名を選択したときに、対応する国名の略称をセルに自動表示したいとします。本セクションでは、この課題を解決するための VBA メソッドをご紹介します。

1。ソースデータ（国名列）の右側に、ドロップダウンセルに表示する国名の略称を含む新しい列を作成します。

2。国名のリストとその略称リストの両方を選択し、「名前」ボックスに任意の名前を入力して「Enter」キーを押してください。

3。ドロップダウンリスト用のセル（ここでは D2:D8）を選択し、「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

4。「データの入力規則」ダイアログボックスで、次のように設定してください。

5。ドロップダウンリストを作成したら、シート見出しを右クリックし、コンテキストメニューから「コードの表示」を選択してください。

6。開いた「Microsoft Visual Basic for Applications」ウィンドウで、以下の VBA コードをコードエディターにコピーしてください。

VBA コード：ドロップダウンリストで異なる値を表示する

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20201027
    selectedNa = Target.Value
    If Target.Column = 4 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

注記：

7。「Alt」+「Q」キーを押して、「Microsoft Visual Basic for Applications」ウィンドウを閉じましょう。

これ以降、ドロップダウンリストから特定の国名を選択すると、その国の略称がセルに自動表示されます。

チェックボックス付きのドロップダウンリストを作成

多くのExcel ユーザーは、チェックボックスを複数含んだドロップダウンリストを作成し、チェックボックスをオンにするだけでリスト内の複数項目を簡単に選択できるようにしたいと考えています。

以下のデモのように、ドロップダウンリスト付きのセルをクリックするとリストボックスが表示されます。リストボックス内の各項目の横にはチェックボックスがあり、チェックを入れると対応する項目がセルに反映されます。

Excel でチェックボックス付きのドロップダウンリストを作成したい場合は、Excel で複数のチェックボックスを含むドロップダウンリストを作成する方法は？をご参照ください。

ドロップダウンリストに自動補完を追加

大量の項目を含むデータ検証ドロップダウンリストがある場合、適切な項目を見つけるにはリストを上下にスクロールするか、リストボックスに直接単語全体を入力する必要があります。もしドロップダウンリストが最初の文字を入力した時点で自動補完されれば、すべてがもっと簡単になります。

Excel のワークシートでドロップダウンリストの自動補完機能を有効にするには、Excel のドロップダウンリストで入力時に自動補完する方法は？をご確認ください。

ドロップダウンリストの選択に基づいてデータをフィルター

このセクションでは、ドロップダウンリストからの選択に基づいてデータを抽出する「ドロップダウンリストフィルター」の作成方法をご紹介します。

1。まず、データを抽出する基準となる特定の値を含んだドロップダウンリストを作成する必要があります。

ヒント：上記の手順に従って、Excel でドロップダウンリストを作成しましょう。

重複のないアイテム一覧を使用してドロップダウンリストを作成する

範囲内に重複する値がある場合でも、同じアイテムが繰り返されないドロップダウンリストを作成したいときは、次のようにして重複を除いた一覧を作成できます。

1) 「Ctrl」+「C」キーでドロップダウンリストの元となるセルをコピーし、新しい範囲に貼り付けます。

2) 新しい範囲内のセルを選択し、「データ」＞「重複を削除」をクリックします。

3)「重複を削除」ダイアログボックスで、「OK」ボタンをクリックしてください。

4) すると、「Microsoft Excel」が表示され、削除された重複データの件数が示されます。「OK」をクリックしてください。

これで重複のないアイテム一覧が得られましたので、この一覧をもとにドロップダウンリストを作成できます。

2。次に、以下のとおり3 つのヘルパー列を作成してください。

2.1) 最初の補助列（ここでは列 D を最初の補助列として使用）に対して、最初のセル（列見出しを除く）に以下の数式を入力し、「Enter」キーを押します。結果のセルを選択してから、「フィルハンドル」を範囲の下端までドラッグします。

=ROWS($A$2:A2)

2.2) 2 番目の補助列（列 E）に対して、セル E2 に以下の数式を入力し、「Enter」キーを押します。E2 を選択してから、「フィルハンドル」を範囲の下端までドラッグします。

注： ドロップダウンリストで値が選択されていない場合、数式の結果は空白として表示されます。

=IF(A2=$H$2,D2,"")

2.3) 3 番目の補助列（列 F）に対して、F2 に以下の数式を入力し、「Enter」キーを押します。F2 を選択してから、「フィルハンドル」を範囲の下端までドラッグします。

注： ドロップダウンリストで値が選択されていない場合、数式の結果は空白で表示されます。

=IFERROR(SMALL($E$2:$E$17,D2),"")

3。以下の数式を使って、元のデータ範囲に基づいたデータ抽出結果を出力するための範囲を作成します。

3.1) 最初の出力セル（ここでは J2 を選択）を選択し、以下の数式を入力してから「Enter」キーを押します。

=IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"")

3.2) 結果のセルを選択し、「フィルハンドル」を右方向に2 セル分ドラッグします。

3.3) 範囲 J2:L2 を選択したまま、「フィルハンドル」を範囲の下端までドラッグします。

注記：

これでドロップダウンリストフィルターが完成しました。ドロップダウンリストで選択するだけで、元のデータ範囲から簡単に必要なデータを抽出できます。

ドロップダウンリストから複数の項目を選択

既定では、ドロップダウンリストはセル内で一度に1 つのアイテムしか選択できません。ドロップダウンリストで再度アイテムを選択すると、以前に選択したアイテムは上書きされます。しかし、下記のデモのように、ドロップダウンリストから複数のアイテムを選び、それらすべてをセル内に表示したい場合は、どのようにすればよいでしょうか？

Excel でドロップダウンリストから複数のアイテムを選択するには、「Excel で複数選択または複数値を持つドロップダウンリストを作成する方法」をご参照ください。このチュートリアルでは、この問題を解決するための2 つの方法を詳しく説明しています。

ドロップダウンリストの既定値（事前選択値）を設定する

既定では、ドロップダウンリスト付きのセルは空白で表示され、クリックしたときのみドロップダウン矢印が現れます。ワークシート上でどのセルにドロップダウンリストが含まれているかを一目で確認するには、どうすればよいでしょうか？

このセクションでは、Excel でドロップダウンリストの既定値（事前選択値）を設定する方法をご紹介します。以下の手順に従って、簡単に設定してください。

以下の2 つの方法を適用する前に、まずドロップダウンリストを作成し、次のようにいくつかの設定を行う必要があります。

1。ドロップダウンリストを設定したいセルを選択し、「データ」>「データの入力規則」>「データの入力規則」をクリックしてください。

ヒント：すでにドロップダウンリストを作成済みの場合は、そのドロップダウンリストを含むセルを選択し、「データ」＞「データの入力規則」＞「データの入力規則」をクリックしてください。

2. 「データの入力規則」ダイアログボックスで、次のように設定してください。

2.1) 「許可」ボックスで「リスト」を選択します。

2.2) 「元の値」ボックスで、ドロップダウンリストに表示するソースデータを選択します。

ヒント: すでに作成済みのドロップダウンリストの場合は、この2 つのステップをスキップしてください。

2.3) 次に「エラーアラート」タブに移動し、「無効なデータが入力されたらエラーアラートを表示する」のチェックを外します。

2.4) 「OK」ボタンをクリックします。

ドロップダウンリストを作成したら、以下のいずれかの方法でリストに既定値を設定してください。

数式を使用してドロップダウンリストの既定値を設定

上記の手順で作成したドロップダウンリストに既定値を設定するには、次の数式を適用できます。

1。ドロップダウンリストのセルを選択し、次の数式を入力して「Enter」キーを押すと、既定値が自動的に表示されます。ドロップダウンリストのセルが連続している場合は、結果セルの「フィルハンドル」をドラッグするだけで、他のセルにも同じ数式を簡単に適用できます。

=IF(C2="", "--Choose item from the list--")

注記：

VBA コードを使用してワークシート内のすべてのドロップダウンリストに一度に既定値を設定する

ワークシート内に多数のドロップダウンリストがさまざまな範囲に散らばっている場合、すべてに既定値を設定するには数式を繰り返し適用する必要があり、非常に手間がかかります。このセクションでは、ワークシート内のすべてのドロップダウンリストに一度に既定値を設定できる便利な VBA コードをご紹介します。

1。既定値を設定したいドロップダウンリストが含まれるワークシートを開き、「Alt」＋「F11」キーを押して「Microsoft Visual Basic for Applications」ウィンドウを起動します。

2。「Microsoft Visual Basic for Applications」ウィンドウで、「挿入」＞「標準モジュール」をクリックし、表示されたコードウィンドウに以下の VBA コードを貼り付けてください。

VBA コード：ワークシート内のすべてのドロップダウンリストに一度に既定値を設定する

Sub SetDropDownListToDefaultValue()
'Updated by Extendoffice 20201026
Dim xWs As Worksheet
Dim xRg, xFRg As Range
Dim xET: xET = Null
Dim xStr As String
xStr = "- Choose from the list -"
Set xWs = Application.ActiveSheet
Set xRg = xWs.UsedRange.Cells
    On Error Resume Next
    For Each xFRg In xRg
    xET = Null
    xET = xFRg.Validation.Type
    If Not IsNull(xET) Then
        If xFRg.Validation.Type = 3 Then
            xFRg.Value = "'" & xStr
        End If
    End If
    Next
End Sub

注：上記のコードにおける「- リストから選択 -」は、ドロップダウンリストセルに表示されるデフォルト値です。必要に応じて、このデフォルト値を変更することも可能です。

3。「F5」キーを押してマクロダイアログボックスを表示し、「マクロ名」ボックスで「DropDownListToDefault」が選択されていることを確認したら、「実行」ボタンをクリックしてコードを実行してください。

すると、指定した既定値がドロップダウンリストセルに即座に入力されます。

ドロップダウンリストのフォントサイズを拡大する

通常、ドロップダウンリストのフォントサイズは固定されています。小さすぎて読みづらい場合は、以下の VBA メソッドで簡単に拡大できます。

1。フォントサイズを拡大したいドロップダウンリストを含むワークシートを開き、シートタブを右クリックして、コンテキストメニューから「コードの表示」を選択してください。

2。「Microsoft Visual Basic for Applications」ウィンドウで、以下の VBA コードをコードエディタにコピーしてください。

VBA コード：ワークシート内のドロップダウンリストのフォントサイズを拡大する

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'updateby Extendoffice 20201027
    On Error GoTo LZoom
    Dim xZoom As Long
    xZoom = 100
    If Target.Validation.Type = xlValidateList Then xZoom = 130
LZoom:
    ActiveWindow.Zoom = xZoom
End Sub

注：コード中の「xZoom = 130」は、現在のワークシートにあるすべてのドロップダウンリストのフォントサイズを130 に拡大することを意味します。必要に応じて変更可能です。

3。「Alt」+「Q」キーを押して、「Microsoft Visual Basic for Applications」ウィンドウを閉じましょう。

これ以降、ドロップダウンセルをクリックすると現在のワークシートのズームレベルが拡大され、ドロップダウン矢印をクリックすれば、すべてのドロップダウンアイテムのフォントサイズも同様に拡大されていることが確認できます。

ドロップダウンリストからアイテムを選択後、ドロップダウンセル以外の任意のセルをクリックすると、ズームレベルが元に戻ります。

最高の 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 の詳細はこちら。。。無料ダウンロード。。。