Hallo Excelforum, ich möchte die Spalte Q gruppieren(ausblenden), wenn kein Wert vorhanden ist. Das funktioniert mit folgendem Code. Wenn aber Formeln in Spalte Q stehen, dann funktioniert das Gruppieren nicht. Wie muss ich die nachfolgende Syntax ändern ? Meine Versuche mit .value funktionieren nicht.
Danke im Voraus für eure Hilfe.
Gruß Peter
Set rngC = Range("Q5", "Q" & lar)
For Each rngC In rngC
If rngC "" Or rngC 0 Then
IntC = IntC + 1
End If
Next
Columns("Q:Q").Select
If IntC = 0 Then
Selection.Columns.Group
ActiveSheet.Outline.ShowLevels RowLevels:=0, ColumnLevels:=1
End If