Excelでドロップダウンリストの値を削除する際にデフォルト値を自動表示させるには？

Excelでは、データ検証機能を使用して、ユーザーが値を選択できるドロップダウンリストを作成できます。ただし、選択された項目がドロップダウンセルから削除されたときに、「-選択-」などのデフォルト値を自動的に表示させたい場合があります。この記事では、VBAコードを使用したステップバイステップの解決策を提供します。

ドロップダウンリストの値を削除する際にデフォルト値を自動表示

ドロップダウンリストの値を削除する際にデフォルト値を自動表示

1. ドロップダウンリストが含まれているシートタブを右クリックし、次に「 コードの表示 」を選択します。

2. 表示されるMicrosoft Visual Basic for Applicationsウィンドウで、以下のコードをスクリプトエディターにコピー＆ペーストします。

VBA: ドロップダウンリストで選択項目を削除する際にデフォルト値を表示

Private Sub Worksheet_Change(ByVal Target As Range)
Dim xObjV As Validation
On Error Resume Next
Set xObjV = Target.Validation
If xObjV.Type = xlValidateList Then
 If IsEmpty(Target.Value) Then Target.Value = "-Select-"
End If
End Sub

3. コードを保存します。選択項目を削除すると、新しい項目が選択されるまでドロップダウンセルにデフォルト値が表示されます。