Přejít k hlavnímu obsahu

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

Autor: Sun Naposledy změněno: 2024-11-20

V Excelu můžete pomocí Ověření dat vytvořit rozevírací seznam pro uživatele, aby mohli vybrat hodnoty. Možná však budete chtít, aby se výchozí hodnota, například „-Select-“, zobrazila automaticky, když je vybraná položka odstraněna z rozevírací buňky. Tento článek poskytuje podrobné řešení pomocí kódu VBA.
Snímek obrazovky s buňkou rozevíracího seznamu s výchozí hodnotou '-Select-' v Excelu

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. Klepněte pravým tlačítkem na záložku listu obsahující rozevírací seznam a vyberte Zobrazit kód z kontextové nabídky.
Snímek obrazovky znázorňující přístup k možnosti Zobrazit kód z kontextové nabídky karty listu v Excelu

2. V Microsoft Visual Basic pro aplikace v okně, které se objeví, zkopírujte a vložte níže uvedený kód do editoru skriptů.

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. Uložte kód. Po odstranění vybrané položky se v rozevírací buňce zobrazí výchozí hodnota, dokud nebude vybrána nová položka.

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  vzývat Kutools Funkce...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více
Použijte Kutools ve vašem preferovaném jazyce – podporuje angličtinu, španělštinu, němčinu, francouzštinu, čínštinu a více než 40 dalších!

Vylepšete si své excelové dovednosti s Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab Přináší do Office rozhraní s kartami a výrazně vám usnadňuje práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!