Hallo zusammen,
ich habe eine Excel-Tabelle (2007), in der ich in mehreren Spalten eine Art Platzhalter eingefügt habe. Diese sind neben anderen Spalten eingefügt und sollen, sobald sie genutzt werden, in eine gemeinsame Gruppierung laufen. Solange sie nicht genutzt werden, sollen Sie aber ausgeblendet werden.
Für das Ausblenden habe ich schon folgenden Hinweis gefunden, der mir sehr weiter geholfen hat:
https://supportnet.de/fresh/2006/7/id1374195.asp
Mein Makro sieht jetzt so aus:
Sub Spalte_ausb()
Dim intSpalte As Integer
For intSpalte = 2 To Cells(2, Columns.Count).End(xlToLeft).Column
If Cells(2, intSpalte) = "1" Then
Columns(intSpalte).EntireColumn.Hidden = True
End If
Next
End Sub
Das funktioniert auch gut, aber sobald ich die hinterbliebenen (nicht ausgeblendeten) Spalten gruppiere ("-") und dann wieder aufklappe ("+"), sind die ausgeblendeten Spalten wieder da.
Fällt vielleicht jemandem von euch Profis eine Lösung ein, wie ich die Spalten ausgeblendet lassen und trotzdem die Gruppierung beibehalten kann?
LG
Caro