ich brauche eure Hilfe, da ich gerade auf dem Schlauch stehe.
Meine Arbeitsmappe umfasst mehrere Tabellenblätter die via Makro Befehl angesprochen werden.
Tabelle 1 (Start) = 8 Felder zum Wählen der Kategorie
Tabelle 2 ( Auswahl) Tabellen mit einzelnen Unterpunkten der gewählten Kategorie
Tabelle 3 (Übersicht) mit Makro Verknüpfung zu den Details
Tabelle 4 (Detail 1)
Tabelle 5 (Detail 2)
Tabelle 6 (Detail 3)
Wenn ich auf Tabelle 2 das Detail 3 anklicke blendet er mit das Tabellenblatt 6 ein und zeigt mir Y7:X16 Rot an.
Selbiges ist auch über Tabelle 3 (Übersicht) möglich.
Auf Tabelle 6 soll nun ein Makro liegen der mir alle Tabellenblätter der Details und der Übersicht schließt um die Kategorie wieder zu beenden.
Mein Ansatz wäre: Blende alle Tabellen aus außer Tabelle 2 (Auswahl)
Wie würde der Befehl lauten?
Vielen Dank im Vorraus!
Mein Aktiver Makro in Tabelle 6 lautet:
Sub Tabelle_6_Weiß()
' Tabelle_6_Weiß Makro
' löscht alle Markierten Felder und macht sie wieder Weiß neutral
Worksheets("Tabelle 6").Unprotect Password:=""
Cells.Select
With Selection.Interior
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("Y7:X16").Select
Selection.ClearContents
Range("W32").Select
Worksheets("Tabelle 6").Protect Password:=""
ActiveWindow.Zoom = 35
Sheets("Tabelle 6").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("Auswahl").Select
Range("A4").Select
End Sub