Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
464to468
464to468
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten ausblenden

Forumthread: Spalten ausblenden

Spalten ausblenden
06.08.2004 07:32:39
Maike
Hallo!
Ich hab da ein Problem. Hab keine Ahnung von VBA und Macros.
Würde aber gerne bei einer Arbeitsmappe, bei der in der ersten Zeile ab Spalte D fortlaufend das Datum (Format: 30.7) steht, nur alles ab dem aktuellenDatum angezeigt bekommen. Die Spalten A-D sind fix.
Kann mir jemand helfen?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Spalten ausblenden
06.08.2004 07:43:39
Harald
Hallo Maike,
probier das:

Sub test()
Dim heute As Date
Dim spalte As Integer
heute = Date
For spalte = 5 To 255
If Cells(1, spalte).Value < heute Then
Columns(spalte).Select
Selection.EntireColumn.Hidden = True
End If
Next
End Sub

Gruß Harald
Anzeige
AW: Spalten ausblenden
06.08.2004 07:52:30
Maike
Vielen Dank, funktioniert super!
Hoffe nur, dass es auch bei Monatswechsel und Jahreswechsel noch läuft.
Vielen Dank für die prompte Hilfe!
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige