Hoe een bladpositie te vergrendelen voor altijd zichtbaar in Excel-werkmap?
Als een werkmap meerdere bladen bevat en u naar het laatste blad schakelt, wordt het eerste blad verborgen in de bladtabbalk, zoals hieronder weergegeven. Nu wilt u de positie van een hoofdblad vergrendelen voor altijd zichtbaar, hoe gaat u ermee om?
Vergrendel de bladpositie met VBA
Vergrendel de bladpositie met VBA
Hier introduceer ik twee VBA-codes voor u om deze klus te klaren.
Spring naar het blad
1. druk op Alt + F11 toetsen om het Microsoft Visual Basic voor Windows.
2. klikken Invoegen > Module, kopieer en plak vervolgens onderstaande code in het script.
VBA: spring naar het hoofdblad
Sub GoToSheet()
'UpdatebyExtendoffice20180427
Sheets("Master").Activate
End Sub
Note: In het codegedeelte van Bladen ("Master"). Activeren, je kunt de veranderen Master naar elke gewenste bladnaam.
3. Sla vervolgens deze code op en ga terug naar de werkmap, klik op Ontwikkelaar > Macro's.
4. In de Macro dialoogvenster, selecteer de codenaam die u zojuist hebt ingevoegd en klik op Opties, maak een snelkoppeling voor het uitvoeren van deze code.
5. klikken OK en sluit de Macro dialoogvenster.
Vanaf nu, terwijl u op de snelkoppeling klikte die u hebt gemaakt, is het hoofdblad geactiveerd, welk blad u ook gebruikt.
Houd het laken altijd vooraan
1. druk op Alt + F11 toetsen om het Microsoft Visual Basic voor Windows.
2. Dubbelklik Dit Werkboek van het Project-VBAProject deelvenster en kopieer en plak onderstaande code in het script.
VBA: Houd het blad altijd vooraan
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. Sla de code op en sluit het VBA-venster. Vanaf nu, op welk blad u ook klikt, blijft het hoofdblad altijd vooraan in de tabbladbalk staan.
Opmerking: In bovenstaande code, "meester" is de bladnaam die u zichtbaar wilt houden. Wijzig deze indien nodig.
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!