Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1064to1068
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

Bed. Formatierung

Bed. Formatierung
30.03.2009 17:35:34
Steffen
Hallo zusammen!
mit folgendem makro mochte ich einen bereich so formatieren das dir zellen in dem bereich (Datumswerte) markiert werden die drei tage vor ablauf des aktuellen datums ablaufen.
In "B2" steht das aktuelle DAtum
Dim Zeile As Long
Dim DatumEnde As Long
DatumEnde = Cells(2, 2).Value + 3
Range("E6:E400").Select
For Zeile = 1 To UsedRange
If DatumEnde >= Cells(Zeile).Value Then Cells(Zeile).Interior.ColorIndex = 5
Next Zeile
es läuft zwar durch ,markiert mir aber nicht die zellen.
Anmerkung: ich möchte es ohne die vorgegebene bedingte formatierung aus excel machen
vielen dank und viele grüße
steffen

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

Betreff
Datum
Anwender
Anzeige
AW: Bed. Formatierung
30.03.2009 18:28:13
fcs
Hallo Steffen,
korrigiere die folgende Zeile:
For Zeile = 1 To UsedRange
zu
For Zeile = 1 To UsedRange.Row + UsedRange.Rows.Count-1
oder
For Zeile = 1 To Cells.SpecialCells(xlCellTypeLastCell).Row
Gruß
Franz
Logisch-DANKE! o.T.
30.03.2009 18:37:54
Steffen
.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige