Note: The other languages of the website are Google-translated. Back to English
English English

Jak se automaticky dokončuje při psaní v rozevíracím seznamu aplikace Excel?

Pro rozevírací seznam ověření dat se spoustou položek musíte v seznamu posouvat nahoru a dolů, abyste našli tu, kterou potřebujete, nebo správně zadat celé slovo do pole seznamu. Existují nějaké způsoby, jak vytvořit automaticky vyplněný rozevírací seznam při psaní prvního písmene nebo jakýchkoli relativních znaků? To lidem pomůže efektivněji pracovat v listech s rozevíracími seznamy v buňkách. Tento tutoriál poskytuje dvě metody, jak toho dosáhnout.

Automatické doplňování při psaní v rozevíracím seznamu s kódem VBA
Automatické doplňování při psaní v rozevíracím seznamu s úžasným nástrojem

Další výukové programy pro rozevírací seznam ...


Automatické doplňování při psaní v rozevíracím seznamu s kódem VBA

Chcete-li po zadání odpovídajících písmen do buňky provést automatické doplňování rozevíracího seznamu, postupujte následovně.

Nejprve musíte do listu vložit pole se seznamem a změnit jeho vlastnosti.

1. Otevřete list obsahující buňku rozevíracího seznamu, kterou chcete nastavit jako automatické doplňování.

2. Před vložením pole se seznamem musíte přidat kartu Vývojář na pásku aplikace Excel. Pokud se na pásu karet zobrazuje karta Vývojář, přejděte ke kroku 3. Jinak postupujte následovně: Klepněte na Soubor > možnosti k otevření možnosti okno. V tomhle Možnosti aplikace Excel okno, klepněte na tlačítko Přizpůsobit pás karet v levém podokně zkontrolujte Vývojka a poté klikněte na OK knoflík. Viz screenshot:

3. cvaknutí Vývojka > Vložit > Rozbalovací seznam (ovládací prvek ActiveX).

4. Nakreslete pole se seznamem do aktuálního listu. Klikněte na něj pravým tlačítkem a poté vyberte Nemovitosti z nabídky pravého tlačítka myši.

5. V Nemovitosti V dialogovém okně nahraďte původní text v (Jméno) pole s TempCombo.

6. Vypni Režim návrhu Kliknutím Vývojka > Režim návrhu.

Poté použijte níže uvedený kód VBA

7. Klikněte pravým tlačítkem na kartu aktuálního listu a klikněte na Zobrazit kód z kontextové nabídky. Viz snímek obrazovky:

8. V otvoru Microsoft Visual Basic pro aplikace zkopírujte a vložte níže uvedený kód VBA do okna Kód listu.

Kód VBA: Automatické doplňování při psaní v rozevíracím seznamu

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Update by Extendoffice: 2020/01/16
    Dim xCombox As OLEObject
    Dim xStr As String
    Dim xWs As Worksheet
    Dim xArr
    
    Set xWs = Application.ActiveSheet
    On Error Resume Next
    Set xCombox = xWs.OLEObjects("TempCombo")
    With xCombox
        .ListFillRange = ""
        .LinkedCell = ""
        .Visible = False
    End With
    If Target.Validation.Type = 3 Then
        Target.Validation.InCellDropdown = False
        Cancel = True
        xStr = Target.Validation.Formula1
        xStr = Right(xStr, Len(xStr) - 1)
        If xStr = "" Then Exit Sub
        With xCombox
            .Visible = True
            .Left = Target.Left
            .Top = Target.Top
            .Width = Target.Width + 5
            .Height = Target.Height + 5
            .ListFillRange = xStr
            If .ListFillRange = "" Then
                xArr = Split(xStr, ",")
                Me.TempCombo.List = xArr
            End If
            .LinkedCell = Target.Address
        End With
        xCombox.Activate
        Me.TempCombo.DropDown
    End If
End Sub
Private Sub TempCombo_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    Select Case KeyCode
        Case 9
            Application.ActiveCell.Offset(0, 1).Activate
        Case 13
            Application.ActiveCell.Offset(1, 0).Activate
    End Select
End Sub

9. lis Další + Q současně zavřete Aplikace Microsoft Visual Basic okno.

Od této chvíle se po kliknutí na buňku rozevíracího seznamu automaticky zobrazí rozevírací seznam. Můžete začít psát písmeno, aby se příslušná položka ve vybrané buňce automaticky dokončila. Viz snímek obrazovky:

Poznámka: Tento kód nefunguje pro sloučené buňky.


Automatické doplňování při psaní v rozevíracím seznamu s úžasným nástrojem

Vzhledem k tomu, že VBA je pro mnoho uživatelů aplikace Excel obtížné zvládnout, zde doporučujeme Prohledávatelný rozevírací seznam vlastnost Kutools pro Excel které vám pomohou snadno automaticky vyplnit rozevírací seznam při psaní prvního znaku.

Poznámka: Před použitím funkce se ujistěte, že jste v listu vytvořili rozevírací seznamy. V tomto případě jsou rozevírací seznamy umístěny v D3:D9.

1. cvaknutí Kutools > Rozbalovací seznam > Prohledávatelný rozevírací seznam > Nastavení.

2. Ve vyskakovacím okně Prohledávatelný rozevírací seznam dialogové okno, musíte provést následující nastavení.

2.1) V Naneste na sekce, zadejte rozsah nebo list, kde chcete použít funkci rozevíracího seznamu s možností vyhledávání;
Tipy: Po výběru Specifikovaný rozsah přepínač, můžete si vybrat Aktuální list, Aktuální sešit or Všechny sešity z rozevíracího seznamu podle vašich potřeb.
2.2) V možnosti sekci, vyberte Odpovídá pouze začátku slova nebo možnost Citlivý na velká písmena možnost nebo obojí;
Odpovídá pouze začátku slova: Zaškrtněte tuto možnost, zobrazí se pouze položky, které začínají napsaným znakem, a první odpovídající položka bude v seznamu automaticky dokončena. Zrušením zaškrtnutí této volby zobrazíte položky, které obsahují zadaný znak.
Citlivý na velká písmena: Zaškrtněte tuto možnost, chcete-li provést shodování s velkými a malými písmeny se zadávanými znaky.
2.3) Klepněte na tlačítko OK.

3. Po dokončení nastavení musíte funkci aktivovat kliknutím Kutools > Rozbalovací seznam > Prohledávatelný rozevírací seznam > Povolit prohledávatelný rozevírací seznam.

Nyní, když klepnete na buňku rozevíracího seznamu, zobrazí se seznam se všemi položkami. K zobrazení všech odpovídajících položek stačí zadat znak do textového pole a použít Up or Dolů šipkou vyberte položku, kterou potřebujete, nebo nechte první odpovídající položku automaticky vyplnit seznam a poté stiskněte vstoupit klíč pro automatické doplňování buňky rozevíracího seznamu odpovídající položkou. Podívejte se na níže uvedené demo.

Klepnutím získáte další informace o této funkci.

  Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.


Související články:

Jak vytvořit rozevírací seznam s více zaškrtávacími políčky v aplikaci Excel?
Mnoho uživatelů aplikace Excel má tendenci vytvářet rozevírací seznam s více zaškrtávacími políčky, aby vybrali více položek ze seznamu najednou. Ve skutečnosti nemůžete vytvořit seznam s více zaškrtávacími políčky pomocí Ověření dat. V tomto kurzu vám ukážeme dvě metody vytvoření rozevíracího seznamu s více zaškrtávacími políčky v aplikaci Excel. Tento výukový program poskytuje způsob řešení problému.

Vytvořte rozevírací seznam z jiného sešitu v aplikaci Excel
Je docela snadné vytvořit rozevírací seznam pro ověření dat mezi listy v sešitu. Ale pokud se seznamová data, která potřebujete pro ověření dat, nacházejí v jiném sešitu, co byste udělali? V tomto kurzu se naučíte, jak vytvořit seznam drop fown z jiného sešitu v aplikaci Excel podrobně.

Vytvořte prohledávatelný rozevírací seznam v aplikaci Excel
Pro rozevírací seznam s mnoha hodnotami není hledání správné práce snadná práce. Dříve jsme zavedli způsob automatického vyplňování rozevíracího seznamu při zadávání prvního písmene do rozevíracího seznamu. Kromě funkce automatického doplňování můžete také v rozevíracím seznamu vyhledávat, abyste zvýšili efektivitu práce při hledání správných hodnot v rozevíracím seznamu. Chcete-li v rozevíracím seznamu vyhledávat, vyzkoušejte metodu v tomto kurzu.

Automatické vyplnění dalších buněk při výběru hodnot v rozevíracím seznamu aplikace Excel
Řekněme, že jste vytvořili rozevírací seznam na základě hodnot v oblasti buněk B8: B14. Když vyberete libovolnou hodnotu z rozevíracího seznamu, chcete, aby se ve vybrané buňce automaticky naplnily odpovídající hodnoty v rozsahu buněk C8: C14. Při řešení problému vám metody v tomto tutoriálu udělají laskavost.

Další výukové programy pro rozevírací seznam ...


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám 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 omezuje stovky kliknutí myší každý den!
officetab dno
Komentáře (325)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Zkoušel jsem a ve vlastnostech to fungovalo jen 2 dny, při psaní TempCombo mi to dává chybovou zprávu, že je to nejednoznačný název. Prosím pomozte
Tento komentář byl moderátorem webu minimalizován
Skvělé řešení, děkuji!
Tento komentář byl moderátorem webu minimalizován
Dobrý den... Po přidání tohoto pole se seznamem nemohu zkopírovat a vložit další prvky do listu. Umožňuje mi kopírovat vložením je zašedlé. Existuje také způsob, jak zajistit, aby pole se seznamem fungovalo ve sloučených buňkách? Děkuji
Tento komentář byl moderátorem webu minimalizován
Stejný problém jako u jiného uživatele - po přidání tohoto pole se seznamem nemohu kopírovat a vkládat z jedné buňky do druhé. Zdá se, že funkce kopírování funguje, ale vložit, vložit jinak a CTRL+V ne. Děkuji.
Tento komentář byl moderátorem webu minimalizován
Ahoj Thomasi... našel jsi někdy řešení? Ještě jsem nějakou nenašel.
Tento komentář byl moderátorem webu minimalizován
Žádná skutečná odpověď - jen se vrátím do DEVELOPER a zruším výběr DESIGN MODE, když musím kopírovat a minulost - nezapomeňte znovu kliknout na DESIGN MODE, když skončíte; jinak nebude pole se seznamem fungovat správně, když dvakrát kliknete na buňku.
Tento komentář byl moderátorem webu minimalizován
Chráním list, takže vzorce nelze upravovat, a když chráním list, funkce automatického vyplňování již nefunguje. Máte na to řešení?
Tento komentář byl moderátorem webu minimalizován
našli jste pro to řešení?
Tento komentář byl moderátorem webu minimalizován
Jak mohu zamknout buňky?
Tento komentář byl moderátorem webu minimalizován
Funguje dobře.. Díky.. Ušetřil jsem spoustu času.. Ještě jeden rozměr. S tímto kódem to funguje dobře v jednom sloupci. Jaké změny musíme provést v kódu vba, abychom zajistili, že tento kód bude fungovat v jiném sloupci také ve stejném listu, ale s jiným zdrojem ověření dat
Tento komentář byl moderátorem webu minimalizován
Díky za nesmírnou pomoc. Ušetří se mi hodně času. Tento kód funguje pouze pro jedno ověření dat ve sloupci v listu. Jaké změny musíme provést v kódu, abychom mohli pracovat se 2 ověřeními dat ve 2 samostatných sloupcích se samostatným zdrojem dat
Tento komentář byl moderátorem webu minimalizován
Musí být moje datová sada/pojmenovaný rozsah používaný pro můj rozevírací seznam na stejném listu, aby to fungovalo? Dochází mi k aktivaci pole se seznamem, když dvakrát kliknu na rozevírací nabídku, ale když začnu psát, nic se nezobrazuje? Nějaký nápad, co by tady mohlo být za problém? Postupoval jsem podle všech výše uvedených kroků. Děkuji moc, Jarede
Tento komentář byl moderátorem webu minimalizován
Podařilo se mi zprovoznit kód, ale mám problémy s ukládáním souboru, zobrazují se různé chybové zprávy. jakmile to uložím a znovu otevřu, funkce automatického dokončování nefunguje. Používám Excel 2007. Může mi někdo poradit, jak soubor uložit? spousta nápovědy na internetu, ale nerozumím všem příkazům. dík
Tento komentář byl moderátorem webu minimalizován
Nikde není uvedeno, jak přidat prvky do rozevíracího seznamu.
Tento komentář byl moderátorem webu minimalizován
Jonathane, zjistil jsi, jak na to?
Tento komentář byl moderátorem webu minimalizován
Zpočátku jsem z toho byl taky zmatený. Uvědomil jsem si, že tento kód by měl být spárován s jakoukoli buňkou pro ověření dat v listu. Nejprve tedy nastavte validaci dat, včetně toho, odkud čerpá informace, a poté kód vytáhne informace o seznamu z validace dat a překryje ComboBox přes buňku s validací dat. Doufám, že to pomůže.
Tento komentář byl moderátorem webu minimalizován
Díky za užitečné řešení :-)
Tento komentář byl moderátorem webu minimalizován
Dokončil jsem rozevírací seznam automatického doplňování, ale nevím, jak zobrazit hodnoty po zadání textu v rozevíracím seznamu. Například v mém DATA BASE SHEET obsahuje sloupec 1 položky a sloupce 2 a 3 náklady na položku. Zadáním položky do mého rozevíracího seznamu V HLAVNÍM LISTU ve sloupci 1 se cena položek zobrazí ve sloupci 2 a 3. Je možné, že to lze provést? Pomozte mi, prosím
Tento komentář byl moderátorem webu minimalizován
kde je rozsah zdrojového seznamu pro ověření?
Tento komentář byl moderátorem webu minimalizován
Nezapomeňte přidat rozsah položek pro rozevírací nabídku ve vlastnosti ComboBox „ListFillRange“
Tento komentář byl moderátorem webu minimalizován
Funguje velmi dobře pro rozevírací seznamy pomocí ='rozsah', ale funkce se přeruší, jakmile je rozsah výsledkem vzorce, např. =IF(A1>0,'rozsah','alternativní'). Schopný psát v nenaplněném TempCombo
Tento komentář byl moderátorem webu minimalizován
Ahoj! To je skvělé. Ale jak propojím svůj rozevírací seznam s Comboboxem??? pls pomozte.
Tento komentář byl moderátorem webu minimalizován
Dobrý den, mám s tím problém, nevidím žádné hodnoty v rozevíracím seznamu. Může mi někdo říct, jak mohu propojit svůj rozsah dat s rozevíracím seznamem? zobrazit návrhy. pokud mi můžete poslat kompletní tabulku, velmi bych ocenil. (Můj e-mail je deshandsouza@gmail.com)
Tento komentář byl moderátorem webu minimalizován
Mám řešení pro výše uvedené! Právě jste vynechali rozbalovací seznam pro ověření dat. nyní funguje dobře.
Tento komentář byl moderátorem webu minimalizován
Woohoo! Při zadávání rozevíracího seznamu s kódem VBA jsem postupoval podle kroků v automatickém dokončování a dostal jsem přesně to, co jsem chtěl! Děkuji! Děkuji!
Tento komentář byl moderátorem webu minimalizován
No... fungovalo to pro jednu buňku, ale když jsem se snažil, aby to fungovalo pro celý sloupec, nemohl jsem :( Co mám je Sloupec A=Název položky Sloupec B= Datum vytvoření Sloupec C= Chci zadat kategorii, ale mám rozevírací seznam na výběr Mám 723 "Položky", takže 723 řádků, kde chci, aby se rozevírací seznam zobrazoval při zadávání hodnot. Nějaké návrhy? Předem děkuji
Tento komentář byl moderátorem webu minimalizován
ale jak vytvoříte seznam pro rozevírací seznam z dat ...
Zatím zde nejsou žádné komentáře
Načíst další
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění