Excel und VBA: Formeln, Programmierung, Lösungen
Die Excel/VBA-Beispiele
Thema
Blattwechsel zwischen xlVeryHidden ausgeblendeten Blättern
Gruppe
Arbeitsblatt
Problem
Über eine Schaltfläche soll von Blatt zu Blatt gesprungen werden, wobei die übrigen Arbeitsblätter jeweils xlVeryHidden auszublenden sind.
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: Modul1 Sub EinAusblenden() Dim wks As Worksheet Set wks = ActiveSheet Worksheets(ActiveSheet.Buttons(Application.Caller).Caption).Visible = xlSheetVisible wks.Visible = xlSheetVeryHidden End Sub