Dim ws As Worksheet
For Each ws In Worksheets
ws.Visible = True
Next
Sheets(1).Visible = False
Sheets(2).Visible = False
Sheets(4).Visible = False
Sheets(13).Visible = False
Im oberen Teil blende ich zunächst alle TAB ein und
darunter liste ich welche gleich wieder ausgeblendet werden sollen.
Bislang etwas umständlich da die enstpr. TAB im Code benannt werden
Im Sheet(5).Range("O9:O100") wird nun durch ein anderes Makro eine Auflistung erzeugt,
die ab Zeile 9 in Spalte "O" dann einige Zeilen mit unterschiedlichen Nummern ( ohne doppelte )
listet ( das können immer nur wenige sein / bis O100 ist nur Puffer ).
Ich würde nun gerne diesen Bereich oben in den unteren Teil einbauen, das nur die
TAB ausgblendet werden, die sich in diesem Bereich aufgelistet befinden.
In diesem Bereich stehen die Zahlen als Zahlenwert - falls dies von Belang wäre ?
Habt ihr mir hierzu bitte etwas Hilfe, wäre Euch sehr dankbar,
LG Udo