Hallo,
ich habe ein kleines Problem und mir ist kein Lösungsweg bekannt. Ich beschäftige mich erst seit Kurzem mit VBA.
Ich möchte in einer Tabelle, die zuerst die Spalten (Kalenderwochen) ausblenden, welche in der Zukunft liegen. Dies Schritt habe ich mit folgenden "Makro" gelöst:
Sub Filterung()
Dim c As Range
For Each c In Range("B223:Y223").Cells
If c > Range("AE2") Then
c.EntireColumn.Hidden = Not c.EntireColumn.Hidden
End If
Next c
End Sub
Anschließend würde ich gerne für den angezeigten Bereich die Zeilen komplett ausblenden, bei welchen die angezeigten Zellen im gesamten Zeitraum (bsp. KW 40 bis 49) leer sind.
Hierfür fällt mir jedoch keine Lösung ein.
Könntet ihr mir bei der Lösung dieses Problems weiterhelfen?
Vielen Dank im Voraus.
|