Někdy musíme vybrat určitý list z více listů v programu. Excel sešit. List můžeme vyvolat jeho výchozím názvem Název kódu nebo pomocí Název proměnné . abychom mohli vybrat list pomocí názvu proměnné, musíme nejprve nastavit název proměnné. V tomto článku si ukážeme účinné a přitom jednoduché způsoby, jak Vyberte a List pomocí Název proměnné s VBA na adrese Excel .

Pro ilustraci použijeme jako příklad vzorový soubor dat. Například následující soubor dat reprezentuje Prodejce , Produkt a Čisté tržby společnosti zobrazené v různých listech.

Stáhnout cvičebnici

Stáhněte si následující pracovní sešit a procvičujte sami.

2 způsoby výběru listu podle názvu proměnné pomocí VBA v aplikaci Excel

1. Výběr aktivního listu podle názvu proměnné pomocí VBA v aplikaci Excel

V naší první metodě vybereme aktivní list pomocí názvu proměnné. pomocí Aktivní list , máme na mysli list, na kterém pracujeme. Proto postupujte podle níže uvedených kroků, abyste Vyberte aktivní list podle Název proměnné s VBA na adrese Excel .

KROKY:

• Nejprve vyberte Visual Basic pod Vývojář tab.

• V důsledku toho se VBA vyskočí okno.
• Pak vyberte Modul z Vložte tab.

• V důsledku toho se Modul zobrazí se okno.
• Zkopírujte následující kód a vložte jej do pole.

 Sub ActiveSheetSelect() Dim ws As Worksheet Set ws = ActiveSheet ws.Select End Sub 

• Nyní zavřete VBA okno.
• Poté vyberte Makra pod Vývojář tab.

• V důsledku toho se Makro objeví se dialogové okno.
• Zde vyberte ActiveSheetSelect a stiskněte Spustit .

• Nakonec se vrátí list, na kterém jsme pracovali.

2. Excel VBA pro nastavení názvu proměnné pro výběr listu

V naší předchozí metodě jsme použili VBA vrátit list, na kterém jsme již pracovali. V této metodě nastavíme parametr Název proměnné pro náš požadovaný pracovní list a vyberte tento list pomocí tlačítka Název proměnné s VBA . Naučte se tedy následující postup pro provedení úkolu.

KROKY:

• Nejprve nastavíme Název proměnné pro List2 a pomocí tohoto názvu proměnné vyberte list.

• Přejděte tedy na Vývojář ➤ Visual Basic .
• Dále vyberte Vložte ➤ Modul .
• Z toho vyplývá, že Modul zobrazí se dialogové okno.
• Poté zkopírujte níže uvedený kód a vložte jej tam.

 Sub SelectSheet() Dim VarSheet As String VarSheet = "Sheet2" With ActiveWorkbook.VBProject Worksheets(CStr(.VBComponents(VarSheet).Properties("Name"))).Select End With End Sub 

• Poté zavřete VBA okno.
• Nyní otevřete List3 .
• Následně vyberte Makra z Vývojář tab.

• V důsledku toho se Makro zobrazí se dialogové okno.
• Tam klikněte na SelectSheet a stiskněte Spustit .

• Po stisknutí Spustit , může se zobrazit dialogové okno s chybou, jak je znázorněno na následujícím obrázku.

• Chcete-li problém vyřešit, stiskněte Konec .
• Pak přejděte na Soubor ➤ Možnosti .
• Poté z Středisko Trust Center vyberte kartu Nastavení střediska důvěryhodnosti .

• V důsledku toho se Středisko Trust Center zobrazí se dialogové okno.
• Zde vyberte možnost Nastavení maker tab.
• Poté zaškrtněte políčko Důvěryhodný přístup k objektovému modelu projektu VBA a stiskněte OK .

• Opět vyberte Vývojář ➤ Makra .
• Klikněte na SelectSheet a stiskněte Spusťte .

• Nakonec vrátí List2 i když jsme pracovali na List3 .

Další informace: Jak vyhledat název listu pomocí VBA v aplikaci Excel (3 příklady)

Závěr

Od nynějška budete moci Vyberte a List pomocí Název proměnné s VBA na adrese Excel pomocí výše popsaných metod. Používejte je i nadále a dejte nám vědět, pokud máte nějaké další způsoby, jak tento úkol provést. Nezapomeňte do níže uvedeného komentáře napsat připomínky, návrhy nebo dotazy, pokud nějaké máte.