In diesem Tutorial erfahren Sie, wie Sie Arbeitsblätter mit VBA ein- und ausblenden.
Blatt in VBA ausblenden
Um ein Blatt in VBA auszublenden, verwenden Sie die Visible-Eigenschaft des Arbeitsblatts.
Legen Sie entweder die Visible-Eigenschaft auf FALSE fest:
| 1 | Worksheets("Sheet1").visible = False |
oder legen Sie die Visible-Eigenschaft auf xlSheetHidden fest:
| 1 | Worksheets("Sheet1").visible = xlSheetHidden |
Dies ist dasselbe, als ob der Benutzer mit der rechten Maustaste auf die Registerkarte des Arbeitsblatts geklickt und "Ausblenden" ausgewählt hätte.
Blatt einblenden
Um ein Blatt in VBA einzublenden, verwenden Sie die Arbeitsblatt-Visible-Eigenschaft:
| 1 | Worksheets("Sheet1").Visible = True |
oder
| 1 | Worksheets("Sheet1").Visible = xlSheetVisible |
Ausgeblendete Blätter können durch Klicken mit der rechten Maustaste in den Registerkartenbereich Arbeitsblatt angezeigt werden:
Sehr versteckte Blätter
Die Eigenschaft Sheet Visible hat eine dritte Option: xlSheetVeryHidden:
| 1 | Worksheets("Sheet1").Visible = xlSheetVeryHidden |
Sehr versteckte Blätter werden ausgeblendet, wenn Sie mit der rechten Maustaste auf den Registerkartenbereich Arbeitsblatt klicken:
Dieser Code verhindert, dass der Benutzer der Tabellenkalkulation die Registerkarte Arbeitsblatt unten auf dem Bildschirm sieht. Außerdem wird das Arbeitsblatt vor dem Benutzer ausgeblendet, wenn er mit der rechten Maustaste auf die Registerkarten unten klickt. Die einzige Möglichkeit, zu sehen, dass das Arbeitsblatt vorhanden ist (oder das Arbeitsblatt einzublenden), besteht darin, den Visual Basic-Editor zu öffnen.
Sehr versteckte Blätter einblenden
Sehr versteckte Arbeitsblätter werden wie normale versteckte Arbeitsblätter sichtbar gemacht:
| 1 | Worksheets("Sheet1").Visible = True |
oder
| 1 | Worksheets("Sheet1").Visible = xlSheetVisible |
Blätter im VBA-Editor aus-/einblenden
Sie können auch die Eigenschaft Arbeitsblatt sichtbar im VBA-Editor umschalten:
Alle Arbeitsblatt-Registerkarten ausblenden
Möglicherweise möchten Sie auch den Bereich der Registerkarte Arbeitsblatt vollständig ausblenden, um zu verhindern, dass der Benutzer zu verschiedenen Arbeitsblättern navigiert. Erfahren Sie mehr über das Ausblenden von Arbeitsblattregisterkarten.
Blätter in geschützter Arbeitsmappe aus-/einblenden
Ihre Arbeitsmappe muss ungeschützt sein, bevor Sie Arbeitsblätter ein- oder ausblenden können. Verwenden Sie den folgenden Code, um den Schutz Ihrer Arbeitsmappenstruktur aufzuheben:
| 1 | ActiveWorkbook.Unprotect |
Wenn Ihre Arbeitsmappenstruktur passwortgeschützt ist, müssen Sie stattdessen Folgendes tun:
| 1 | ThisWorkbook.Unprotect "Passwort" |
Alle Blätter einblenden
Dieses Verfahren blendet alle Arbeitsblätter in einer Arbeitsmappe ein, indem eine For Each-Schleife verwendet wird:
| 12345678 | Unter Unhide_All_Sheets()Dim ws als ArbeitsblattActiveWorkbook.UnprotectFür jedes ws in Arbeitsblätternws.Visible = xlSheetVisibleNächsteEnd Sub |
Beachten Sie, dass wir zuerst den Schutz der Arbeitsmappe aufheben, nur für den Fall, dass sie kennwortgeschützt war.
