Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe automatisch specifieke werkbladen verbergen bij het openen van een Excel-bestand?

Als u bepaalde werkbladen automatisch wilt verbergen wanneer iemand de werkmap opent, hoe zou u dan in Excel met deze taak kunnen werken?

Een specifiek werkblad automatisch verbergen bij het openen van een werkmap met VBA-code

Sommige specifieke werkbladen automatisch verbergen bij het openen van een werkmap met VBA-code

Tabblad Office Schakel bewerken en browsen met tabbladen in Office in en maak uw werk veel eenvoudiger ...
Kutools voor Excel - De beste Office-productiviteitstool lost de meeste van uw Excel-problemen op
  • Alles hergebruiken: Voeg de meest gebruikte of complexe formules, grafieken en al het andere toe aan uw favorieten en hergebruik ze snel in de toekomst.
  • Meer dan 20-tekstfuncties: Nummer uit tekststring halen; Een deel van de tekst extraheren of verwijderen; Nummers en valuta's omzetten in Engelse woorden ...
  • Tools samenvoegen: Meerdere werkmappen en bladen in één; Meerdere cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Dubbele rijen en som samenvoegen ...
  • Split gereedschap: Gegevens splitsen in meerdere bladen op basis van waarde; Eén werkmap naar meerdere Excel-, PDF- of CSV-bestanden; Eén kolom naar meerdere kolommen ...
  • Plakken overslaan Verborgen / gefilterde rijen; Tel en som op achtergrondkleur; Maak een verzendlijst en Verzend e-mails op waarde van Cell...
  • Super filter: Maak geavanceerde filterschema's en pas deze toe op alle bladen; Soort per week, dag, frequentie en meer; filters door vetgedrukt, formules, commentaar ...
  • Meer dan 300 krachtige functies; Werkt met Office 2007-2019 en 365; Ondersteunt alle talen; Eenvoudig inzetbaar in bedrijf; Volledige functionaliteit 60-daagse gratis proefversie.

pijl blauwe rechterbelEen specifiek werkblad automatisch verbergen bij het openen van een werkmap met VBA-code

Als u een specifiek werkblad wilt verbergen bij het openen van de werkmap, kunt u de volgende VBA-code toepassen.

1. Houd de toets ingedrukt ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Links Project-VBAProject venster, dubbelklik op de ThisWorkbook om een ​​lege module te openen en kopieer en plak de volgende code in de module:

VBA-code: een specifiek blad verbergen bij het openen van een werkmap:

Private Sub Workbook_Open()
Sheets("Sheet5").Visible = False
End Sub

doc hide sheet on open 1

Notes: In de bovenstaande code, Sheet5 is de bladnaam die u bij openen wilt verbergen. Wijzig dit alstublieft in uw behoefte.

3. Sla vervolgens het codevenster op en sluit het en klik op filet > Opslaan als om deze werkmap op te slaan als Excel Macro-Enabled werkmap formaat, zie screenshot:

doc hide sheet on open 2

4. Wanneer u deze werkmap de volgende keer opent, klikt u op Inhoud aanzetten knop eerst en dan wordt uw specificatieblad automatisch verborgen.

doc hide sheet on open 3


pijl blauwe rechterbel Sommige specifieke werkbladen automatisch verbergen bij het openen van een werkmap met VBA-code

Als er meerdere werkbladen nodig zijn om te worden verborgen bij het openen van de werkmap, kan hier ook een code helpen.

1. Eerst moet u de bladnamen vermelden die u bij openen in een lijst van een werkblad wilt verbergen, en vervolgens naar de Naamvak om ze een bereiknaam te geven-SheetsToHideen druk op invoeren sleutel, zie screenshot:

doc hide sheet on open 4

2. Houd vervolgens de knop ingedrukt ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

3. Links Project-VBAProject venster, dubbelklik op de ThisWorkbook om een ​​lege module te openen en kopieer en plak de volgende code in de module:

VBA-code: een aantal specifieke werkbladen verbergen bij het openen van een werkmap:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   'Updateby Extendoffice 20161206
    Dim ws As Worksheet
    For Each ws In Worksheets
       ws.Visible = xlSheetVisible
    Next ws
End Sub
Private Sub Workbook_Open()
    Dim ws As Worksheet
        For Each ws In Worksheets
            If WorksheetFunction.CountIf([SheetsToHide], ws.Name) > 0 Then
                ws.Visible = xlSheetHidden
                MsgBox ws.Name & "Has been hidden!", vbInformation, "Kutools for Excel"
            Else
                ws.Visible = xlSheetVisible
            End If
        Next ws
    Set ws = Nothing
End Sub

doc hide sheet on open 5

Notes: In de bovenstaande code, SheetsToHide is de bereiknaam die u hebt gemaakt in stap 1.

4. Sla vervolgens het codevenster op en sluit het en klik op filet > Opslaan als om deze werkmap op te slaan als Excel Macro-Enabled werkmap formaat. Van nu af aan, wanneer u deze werkmap de volgende keer opent, worden de opgegeven werkbladen automatisch verborgen.


Kutools voor Excel - De beste Office-productiviteitstool Verhoog uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Inhoud gesplitste cellen; Combineer dubbele rijen / kolommen... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functionaliteit 60-daagse gratis proefversie.
kte-tab 201905

Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

  • Bewerken en lezen met tabbladen inschakelen in Word, Excel, PowerPoint, 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 verlaagt dagelijks honderden muisklikken voor u!
Officetab onderaan
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.