Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1528to1532
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro - Jahres-Spalten ausblenden

Makro - Jahres-Spalten ausblenden
02.12.2016 09:55:13
Anni
Hallo zusammen,
ich bin gerade dabei das erste Makro meines Lebens zu schreiben :)
Leider bis jetzt erfolglos.
Zu meiner Tabelle:
Zelle D8: Start Datum (Format TT.MM.YYYY)
Zelle D10: End Datum (Format TT.MM.YYYY)
In Zeile 70 stehen die Jahreszahlen:
2017 (I70) bis 2100 (CN70) in Spalten I bis CN
Nun möchte ich mit einem Makro die Jahre (Spalten) ausblenden, die nicht in dem Zeitraum zwischen Start- und End Datum liegen.
Es wäre toll, wenn mir jemand weiterhelfen könnte!
Vielen Dank!

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

Betreff
Datum
Anwender
Anzeige
AW: Makro - Jahres-Spalten ausblenden
02.12.2016 10:50:12
ChrisL
Hi Anni
Sub t()
Dim rng As Range, c As Range
Set rng = Range("I70:CN70")
Application.ScreenUpdating = False
For Each c In rng.Cells
If Year(Range("D8")) = c Then
Columns(c.Column).Hidden = False
Else
Columns(c.Column).Hidden = True
End If
Next c
End Sub

cu
Chris
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige