Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Spalten beim Aktivieren der Tabelle ausblenden

Forumthread: Spalten beim Aktivieren der Tabelle ausblenden

Spalten beim Aktivieren der Tabelle ausblenden
28.09.2003 10:04:41
Fritz
Hallo und guten Morgen VBA-Experten,
wer kann mir dabei helfen, in einer meiner Excel-Mappen folgendes zu realisieren:
Ich möchte erreichen, dass in einem Tabellenblatt, in diesem Fall der Tabelle "AW3" bestimmte Spalten eines Bereichs immer beim Aktivieren der Tabelle ausgeblendet, nach dem Verlassen der Tabelle aber wieder alle Spalten eingeblendet sind. Ausgeblendet werden sollen die Spalten im Bereich von Spalte C bis Spalte AK, wenn in diesen Spalten beim Öffnen in der Zeile 11 ein "x" eingetragen ist.
Für eure Hilfe danke ich im Voraus.
Mfg
Fritz
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten beim Aktivieren der Tabelle ausblenden
28.09.2003 10:17:07
Nepumuk
Hallo Fritz,
folgenden Code in das Klassenmodul der Tabelle:


Option Explicit
Private Sub Worksheet_Activate()
Dim spalte As Integer
For spalte = 3 To 37
If Cells(11, spalte) = "x" Then Columns(spalte).Hidden = True
Next
End Sub
Private Sub Worksheet_Deactivate()
Dim spalte As Integer
For spalte = 3 To 37
Columns(spalte).Hidden = False
Next
End Sub



Code eingefügt mit: Excel Code Jeanie

Gruß
Nepumuk
Anzeige
AW: Spalten beim Aktivieren der Tabelle ausblenden
28.09.2003 10:23:27
Fritz
Hallo Nepumuk,
vielen Dank für die schnelle und kompetente Hilfe.
Gruß und schönen Sonntag noch
Fritz

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige