Jak automaticky zobrazit výchozí hodnotu při mazání hodnoty z rozevíracího seznamu v aplikaci Excel?

V aplikaci Excel můžete vytvořit rozevírací seznam, ve kterém mohou uživatelé vybrat hodnotu ze seznamu pomocí ověření dat. Ale v některých případech možná budete chtít zobrazit výchozí hodnotu, například -select- v buňce rozevíracího seznamu namísto prázdné, zatímco vybraná položka byla odstraněna, jak je uvedeno níže. V tomto článku představuji metodu řešení této úlohy v aplikaci Excel.

Automatické zobrazení výchozí hodnoty při mazání hodnoty v rozevíracím seznamu

---

Automatické zobrazení výchozí hodnoty při mazání hodnoty v rozevíracím seznamu

1. Klikněte pravým tlačítkem na kartu listu, která obsahuje rozevírací seznam, který používáte, a poté klikněte na Zobrazit kód v místní nabídce.

2. V praskání Microsoft Visual Basic pro aplikace okno, zkopírujte a vložte pod kód do prázdného skriptu.

VBA: Zobrazit výchozí hodnotu při mazání vybrané položky v rozevíracím seznamu

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. Poté tento kód uložte. Po prvním odstranění vybraných položek se nyní bude zobrazovat výchozí hodnota, dokud nebude položka vybrána v rozevíracím seznamu.