Následující kód VBA umožňuje přepínat mezi naposledy použitým listem a aktuálním listem v aktuálním sešitu. Můžete postupovat následovně:

1. lis Další + F11 klávesy pro otevření okna Microsoft Visual Basic pro aplikace.

2. Poklepejte na ikonu Tato pracovní kniha na levém panelu a poté vložte následující kód do úvodního okna:

VBA 1: Vraťte se na předchozí / poslední list

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
LastSheet = Sh.Name
End Sub

3. Pokračujte ve výběru ThisWorkbook na levé liště a poté klikněte Vložit > Modula vložte následující kód do úvodního okna modulu:

VBA 2: Vraťte se na předchozí / poslední list

Public LastSheet As String
Sub Select_Last()
Application.Sheets(LastSheet).Select
End Sub

Můžete stisknout tlačítko F5 klíč nebo klikněte na Běh tlačítko pro návrat zpět na naposledy použitý list najednou.

Pokud dáváte přednost zkratkám pro přepínání mezi aktuálním listem a naposledy použitým listem, pokračujte:

4, klikněte Vývojka > makra otevřete dialogové okno Makro.

Poznámka: Ve výchozím nastavení se karta Vývojář na pásu karet nezobrazuje, kliknutím to zjistíte jak zobrazit / zobrazit kartu vývojáře na pásu karet aplikace Excel.

5. V úvodním dialogovém okně Makro kliknutím zvýrazněte makro Vyberte Poslední, a potom klepněte na tlačítko možnosti .

6. V Klávesová zkratka sekce, zadejte zástupce pro spuštění tohoto makra Vyberte Poslednía klepněte na tlačítko OK tlačítko pro zavření dialogového okna.

7. Zavřete dialogové okno Makro.

Od nynějška, když otevřete několik pracovních listů postupně, můžete stisknout určené klávesové zkratky (v našem případě stiskněte klávesu Ctrl + b) pro přepínání mezi aktuálním listem a posledním / předchozím listem.

Přepíná / přepíná mezi dvěma listy tam a zpět

Procházejte mezi okny v sešitech