Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 16:39:00
ältere VBA Codes automatisch neu strukturieren
20.04.2024 16:36:42
Arbeitsblatt Script auslagern in Modul
20.04.2024 16:28:25
zwei Makro in einem zusammenführen?
20.04.2024 15:30:14
Warum Verweis zeigt Falsch an
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
864to868
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
864to868
864to868
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum bedingt formatieren

Datum bedingt formatieren
26.04.2007 20:17:52
Werner
Hallo,
ich habe in einer Tabelle das aktuelle Datum =heute(),das ich bei Bedarf mit "paste spezial" per VBA in verschiedene Zellen einer Liste kopiere.
nun möchte ich die Anzahl der Einträge anzeigen lassen,die sich im Zeitraum aktuelles Datum minus 7 Tage befinden,indem ich bedingt formatiere.
Irgendwie klappt das nicht,wie muss die Formel heissen?
Danke Werner

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Formel ist - =HEUTE()-A1>7 oT
26.04.2007 20:28:42
Worti
Gruß Worti

Sorry, muß natürlich < 8 heißen oT
26.04.2007 20:29:00
Worti
Gruß Worti

Probier mal ...
26.04.2007 21:37:32
Matthias
Hallo Worti
... die sich im Zeitraum aktuelles Datum minus 7 Tage befinden

=HEUTE()-A18keine Zeitspanne nach oben gibt ok ;-)


probier mal mit einem Datum größer Heute.
da aber einen Zeitraum beschränkt ist
im Zeitraum aktuelles Datum minus 7 Tage
würde ich das so lösen:
Userbild
also bedingtes Format:
Formel=UND(A1HEUTE()-8)
Gruß Matthias

Anzeige
AW: Datum bedingt formatieren
26.04.2007 21:49:39
Erich
Hallo Werner,
stehen in dem zu checkenden Bereich auch Zahlen, die keine Datumse sind?
Dann kenne ich keine Formel-Lösung. Mit VBA wäre das machbar.
Bei Matthias' Lösung wird auch A3 eingefärbt, weil der Zahlenwert zufällig ins Datumsintervall passt:
Tabelle1

 A
119.04.2007
201.04.2007
339.196,25 €
4aaa

Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
A11. / Formel ist =(A1<=HEUTE())*(A1>HEUTE()-8)Abc
A21. / Formel ist =(A2<=HEUTE())*(A2>HEUTE()-8)Abc
A31. / Formel ist =(A3<=HEUTE())*(A3>HEUTE()-8)Abc
A41. / Formel ist =(A4<=HEUTE())*(A4>HEUTE()-8)Abc

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Datum bedingt formatieren
26.04.2007 22:20:45
Erich
Hallo Werner,
hier mal eine VBA-Lösung:
Tabelle1

 ABC
119.04.2007391973
239.196,25 €24.04.20074
301.04.2007x 
4aaa26.04.2007 

Formeln der Tabelle
ZelleFormel
C1=AnzDatumVonBis(A1:B4;"19.04.2007";HEUTE())
B2=A2
C2=AnzahlDatum(A1:B4)

Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
A11. / Formel ist =IstDatum(A1)*(A1<=HEUTE())*(A1>HEUTE()-8)Abc
B11. / Formel ist =IstDatum(B1)*(B1<=HEUTE())*(B1>HEUTE()-8)Abc

(Bedingte Formatierung auf A1:B4 ausweiten)
mit dem Code (in einem Standardmodul): 

Option Explicit
Function IstDatum(rng As Range)
IstDatum = IsDate(rng)
End Function
Function AnzDatumVonBis(rngB As Range, datV As Date, datB As Date) As Long
Dim rng As Range
For Each rng In rngB
If IsDate(rng) Then
If CDate(rng) >= datV And CDate(rng)

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Datum bedingt formatieren
26.04.2007 22:22:21
Matthias
Hallo Erich
Du hast absolut recht !
wieder was dazugelernt :-)
Bin aber echt davon ausgegangen, das die kopierten Zellen
wie Werner schreibt ...

das aktuelle Datum =heute(),das ich bei Bedarf mit "paste spezial" per VBA in verschiedene Zellen einer Liste kopiere.


... das auch ein Datum in den Zellen steht.
Es sollten natürlich auch nur diese Zellen mit dieser Bedingten Formatierung versehen werden.
Somit wäre eine versehentliche Hervorhebung der Zellen mit einem anderen Format ausgeschlossen.
Gruß Matthias

Anzeige

300 Forumthreads zu ähnlichen Themen

Datum in der Userform formatieren
Nadine

Hallo,
ich habe im VBA eine Userform erstellt. In einem der Textfelder soll ein Datum stehen.
Wenn Buchstaben in dieser Textbox stehen, soll keine Übertrabung in die -von mir vorgesehen- Excelzelle erfolgen.
Bitte um HILFE!!!
Vielen Dank
Nadine
18.08.2008 16:17:00
Thread-ID: 1002660
7 Beiträge
Anzeige
Datum in einem Range Formatieren
TomTom

Hi,
ich möchte per Makro einen Range auf dem Tabellenblatt "Tabelle5" deffinieren (zB. C5:C40) und in diesem das Datum auf TT.MM.JJJJ stellen, egal was vorher für ein Format stand (ob amerikanisch, ob Deutsch, JJJJ.MM.TT.....)
Wie formatiere ich einen Range in dieses datumsformat ?
...
06.11.2008 13:13:00
Thread-ID: 1022256
10 Beiträge
Datum in Deutsch und Französisch
Karin

Hallo
Ich habe folgende Siutation:
in der Zelle A1 habe ich ein Datum. In der Zelle B1 möchte ich dieses Datum wie folgt ausgeben: gültig per TT.MM.JJJ
Ich verwende dazu die Funktion =verketten() und füge das Datum als Text an.
Wenn ich nun zwischen deutschen und französischen E...
06.01.2009 11:32:00
Thread-ID: 1037177
2 Beiträge
Anzeige
Formel erkennt Datum nicht
dieter

Ich habe Formeln erstellt, in denen Zellen mit Datumsinhalten verglichen werden.
Die Zellinhalte stammen aus einer Datenbank.
Die Zellen sind zwar als Datum formatiert, die Inhalte stehen aber linksbündig.
Die Formelergebnisse werden dann korrekt, wenn ich jede Datumszelle aktiviert...
01.07.2009 15:16:18
Thread-ID: 1085756
8 Beiträge
ddmmyy oder ttmmjj
dieter

Hallo Forum,
mit der unten stehenden Excelformel (die ich hieraus dem Forum habe)
erreiche ich,dass das Datum (steht in J19) und die zahl zweier kalenderwochen (zb. Woche 27 +28) ohne punkt und komma als zahl geschrieben wird.
Beispiel: 10.07.09 und die Wochen 27 +28 werden dann dar...
13.07.2009 13:36:11
Thread-ID: 1087989
2 Beiträge
Datumfeld im Makro nur als tt.mm.JJJJ ohne Zeit
walter

Moin moin,
ich habe ein Makro welches im Durchlauf nen Datum setzt [Cells(1, 2).Value = Date] und damit entsprechend weiterarbeitet. Nun scheint es so zu sein, daß in diesem Makrodatum auch die Uhrzeit des Makrolaufes mitgezogen wird, welches, wenn das Makro zu spät gestartet wird, zu falsc...
07.10.2009 14:29:05
Thread-ID: 1107833
3 Beiträge
Datum in Zahlenreihe umformatieren
petrig

Hallo zusammen,
ich stehe vor folgender Knacknuss. ich sollte verschiedene exceltabellen miteinander verknüpfen. Leider sind die Datumanzeigen verschieden
1.file: 10.12.2009
2.file: 20091210 (amerikanisch - nur als zahlenreihe)
Frage: Wie kriege ich aus der zahlenreihe des 2....
14.10.2009 08:38:16
Thread-ID: 1109499
7 Beiträge
Zext in Zahl formatieren funktioniert nicht
Mandy

Hallo
ich möchte ein paar Spalten , wo zahlen drin stehen, aber als Text formatiert sind, per Makro in eine zahl mit Tausendertrennzeichen und 2 Nachkommastellen formatieren.
Dim c As Range
For Each c In Range("A10:A1111,D10:D1111")
If c "" And c "-" Then
c = c * 100
...
19.10.2009 14:11:50
Thread-ID: 1110648
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
1
9
1
2
7
1
2
6
7
2
3
2
2
2
17
3
7
3
5
2
3
2
7
11