Jak uzamknout polohu listu, aby byla vždy viditelná v sešitu aplikace Excel?

Pokud je v sešitu více listů, při přepnutí na poslední jeden list se první list skryje na panelu karet listu, jak je znázorněno níže. Nyní chcete uzamknout polohu hlavního listu, aby byla vždy viditelná, jak to zvládnete?

Zamkněte polohu listu pomocí VBA

Zamkněte polohu listu pomocí VBA

Zde vám představím dva kódy VBA, které vám pomohou zvládnout tuto práci.

Přejít na list

1. lis Alt + F11 klávesy pro povolení Microsoft Visual Basic pro Windows.

2. cvaknutí Vložit > Modul, poté zkopírujte a vložte pod kód do skriptu.

VBA: Přejít na hlavní list

Sub GoToSheet()
'UpdatebyExtendoffice20180427
    Sheets("Master").Activate
End Sub

Pozor: V části kódu Tabulky („Mistr“). Aktivovat, můžete změnit Mistr na libovolný název listu, jak potřebujete.

3. Poté tento kód uložte a vraťte se zpět do sešitu kliknutím Vývojka > makra.

4. V Makro v dialogovém okně vyberte kódové jméno, které jste právě vložili, klikněte možnosti, vytvořte zástupce pro spuštění tohoto kódu.

5. cvaknutí OK a zavřete Makro dialog.

Od této chvíle, když stisknete vytvořenou zkratku, bude hlavní list aktivován bez ohledu na to, který list použijete.

List mějte vždy vepředu

1. lis Alt + F11 klávesy pro povolení Microsoft Visual Basic pro Windows.

2. Dvojklik Tato pracovní kniha z Projekt-VBAProjekt podokno a zkopírujte a vložte níže uvedený kód do skriptu.

VBA: Udržujte list vždy vpředu

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
    Dim xSheet As Worksheet
    Application.EnableEvents = False
    Set xSheet = Sheets("master")
    If Sh.Name <> xSheet.Name Then
        Sh.Move , xSheet
        xSheet.Activate
        Sh.Activate
    End If
    Application.EnableEvents = True
End Sub

3. Uložte kód a zavřete okno VBA. Od této chvíle, ať klepnete na kterýkoli list, vzorový list vždy zůstane v přední části panelu karet.

Poznámka: Ve výše uvedeném kódu "mistr" je název listu, který chcete ponechat viditelný, změňte jej podle potřeby.