Office: (Office 2016) Adressieren von Bereichen in VBA

Hallo,

ich möchte vertikale Tabs innerhalb einer Tabelle erstellen und habe dazu die ain- bzw. auszublendenen Bereiche (jeweils die gesamte Spalte) benannt.
Mein Ziel ist es, die Größe der bereiche anzupassen, ohne daß man dazu den Code editieren muss.

Im direkten Bezug sieht das z.B. so aus:
Columns (B:AJ"),EntireComumn.Hidden = True

Dieser Bereich enthält die benannten Bereiche "Bereich_Alt_1"; "Bereich_Alt_2" und so weiter. Ich kann aber im Code nicht den Zellbezug durch Namen ersetzen. Ich habe schon versucht, statt Columns Range zu verwenden, aber dann geht "EntireColumn.Hidden" nicht mehr.

Für Hilfen wäre ich wirklich sehr dankbar!

 

Hi,

also so richtig verstehe ich dein Problem nicht - weshalb sollen denn mehrere Bereiche im selben Spaltenbereich angesprochen werden? Man kann Spalten doch nur insgesamt ausblenden und nicht einzelne Teilbereiche von Spalten.

Vom Prinzip her so:

Code:

Range("Bereich").EntireColumn.Hidden = True

Bis später,
Karin