Thema: ISTDATUM ? | Herbers Excel-Forum

Schönen Abend allerseits,
ich suche sowas ähnliches wie ISTDATUM. Ich habe ca. 50.000 Zeilen, eine Spalte davon ist mit "Datümer" gefüllt. Ab und zu kommt es vor, das kein Datum eingetragen ist, sondern irgendeine Zahl (kein Datum).
Wie kann ich es am leichtesten bewerkstelligen, ohne alle Zeilen durchschauen zu müssen, daß die fehlerhaften Zellen (Adresse) angezeigt werden?
Wer hat für mich den richtigen Tipp?
Liebe Grüße
Petra

Hallo Petra,
erstelle einfach Deine "eigene" Funktion ISTDATUM() per VBA.
Kopiere dazu folgenden Code in ein allgemeines Modul (z.B. "Modul1") im VBA-Editor (Alt+F11) :
Function istdatum(rngZelle) Application.Volatile istdatum = IsDate(rngZelle) End Function In der Tabelle kannst Du nun prüfen, ob eine Zelle ein Datum enthält : =ISTDATUM(A1)
Gruß, NoNet

Hi Petra,
hab da was im Internet gefunden (http://www.wer-weiss-was.de/theme156/article3798116.html), evtl. hilft's weiter (auf eigene Tabelle anpassen).
bed. Formatierung

Formel ist =IstDatum(A1)

Muster Rot
Alt+F11, Einfügen Modul, Code reinkopieren, Editor schliessen.

Function IstDatum(Zelle As Range)
IstDatum = False
On Error GoTo Ende
IstDatum = IsDate(Zelle) = True And Year(Zelle) >= 2000 And Day(Zelle) > 0 And Year(Zelle) <  _
3000
Ende:
End Function

Mit Gruß
dieter(drummer)

hi Petra, "Datümer" sind ind in XL (auch) zahlen... aber das weißt du ja, wenn du deine datumswerte einschränken kannst, kannst du abfragen, ob die zahlen in dem bereich liegen... vielleicht so...:
Tabelle1 (3)

	G
10	05.01.2009
11	25.11.2009
12	23000
13
14	5000
15	27. Apr
16	666
17	999999

Bedingte Formatierungen der Tabelle

Zelle Nr.: / Bedingung Format G10 1. / Formel ist =UND(G10<>"";ODER(G10<$G$10;G10>$G$11)) Abc G11 1. / Formel ist =UND(G11<>"";ODER(G11<$G$10;G11>$G$11)) Abc G12 1. / Formel ist =UND(G12<>"";ODER(G12<$G$10;G12>$G$11)) Abc G13 1. / Formel ist =UND(G13<>"";ODER(G13<$G$10;G13>$G$11)) Abc G14 1. / Formel ist =UND(G14<>"";ODER(G14<$G$10;G14>$G$11)) Abc G15 1. / Formel ist =UND(G15<>"";ODER(G15<$G$10;G15>$G$11)) Abc G16 1. / Formel ist =UND(G16<>"";ODER(G16<$G$10;G16>$G$11)) Abc G17 1. / Formel ist =UND(G17<>"";ODER(G17<$G$10;G17>$G$11)) Abc

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
cu jörg

Schönen Tag allerseits
und vielen Dank für Eure Tipps! (Hab gestern früher Schluß gemacht, daher erst heute)
Grüß Petra