Hoppa till huvudinnehåll

Hur låser man en arkposition så att den alltid syns i Excel Workbook?

Författare: Sun Senast ändrad: 2024-11-18

Om det finns flera ark i en arbetsbok, när du navigerar till det sista arket, döljs det första arket i arkfliken, som visas nedan. Nu vill du låsa ett masterarks position så att det alltid är synligt, hur kan du hantera det?

En skärmdump av Excel-arkets flikfält med den första fliken synlig Pil åt höger En skärmdump av Excel-arkets flikfält med den första fliken osynlig

Låsa arkposition med VBA


Låsa arkposition med VBA

Här introducerar jag två VBA-koder för dig att hantera det här jobbet.

Hoppa till ett specifikt ark med en genväg

1. Tryck Alt + F11 för att aktivera Microsoft Visual Basic för Windows.

2. klick Insert > Modulerna, kopiera och klistra sedan in koden nedan i skriptet.

VBA: Hoppa till huvudbladet

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

Anmärkningar: I koddelen av Sheets ("Master"). Aktivera, du kan ändra Mästare till valfritt arknamn som du behöver.

3. Spara sedan den här koden och gå tillbaka till arbetsboken, klicka Utvecklare > Makron.
En skärmdump av fliken Utvecklare i Excel med alternativet Makron markerat

4. I Makro dialogrutan, välj kodnamnet du infogade nyss, klicka Montering, skapa en genväg för att köra den här koden.
En skärmdump av makrodialogrutan i Excel med knappen Alternativ vald för att skapa en genväg

5. klick OK och stäng Makro dialog.

Från och med nu, medan du trycker på genvägen du skapade, kommer huvudarket att aktiveras oavsett vilket ark som används för närvarande.

Håll alltid ett specifikt blad framme

1. Tryck Alt + F11 för att aktivera Microsoft Visual Basic för Windows.

2. Dubbelklicka Denna arbetsbok från Projekt-VBAProjekt och kopiera och klistra in nedanstående kod i skriptet.

VBA: Ha alltid lakan framme

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

En skärmdump av VBA-redigeraren med koden inklistrad i ThisWorkbook-modulen

3. Spara koden och stäng VBA-fönstret. Från och med nu, vilket ark du än väljer, kommer huvudarket alltid att ligga längst fram i flikfältet.

En skärmdump av Excel-arkets flikfält med huvudarket synligt och låst på plats Pil åt höger En skärmdump av Excel-arkets flikfält efter omordning, med huvudarket fortfarande synligt

Notera: I ovanstående kod, "bemästra" är arknamnet du vill behålla synligt, ändra det efter behov.

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!