Für eure Hilfe vielen Dank
Elke ;-)
ich hab zwar ein eigenes Makro (*), das auch mit Datumswerten <1900
zurechtkommt (es erwartet Datumseingaben als Text), aber wenn's dir nur
um's sortieren geht ...
füge z.B. eine zusätzliche Spalte ein, deren Zellinhalt jeweils die Zahl
jjjjmmtt ist, danach kann man dann sicher sortieren. Die Zahl jjjjmmtt
kann sowohl aus einem Datum, als auch aus einem "Datumstext" (=Datum
kleiner 1900) erzeugt werden.
(*) http://www.rendar.de "Datum <1900..."
Hallo Elke
verwende das benutzerdefinierte Zellformat:
TT.MM."18"JJ
oder ähnlich
für (zB) 13.05.1835 gibst Du nun ein:
13.5.1935
kennzeichne die 1800er Datumswerte in einer Hilfsspalte mit -1
zum Sortieren:
1. Kriterium Hilfsspalte aufsteigend
2. Kriterium Datumsspalte aufsteigend
Du könnstest damit sogar beschränkt Datumsberechnungen durchführen, wenn Du
für
1800er Datumswerte einen Offset von 36524Tagen in die Berechnung
miteinbeziehst.
mfg Peter
>für (zB) 13.05.1835 gibst Du nun ein:
>13.5.1935
>
>kennzeichne die 1800er Datumswerte in einer Hilfsspalte mit -1
>zum Sortieren:
>1. Kriterium Hilfsspalte aufsteigend
>2. Kriterium Datumsspalte aufsteigend
>
>Du könnstest damit sogar beschränkt Datumsberechnungen durchführen,
wenn Du
>für
>1800er Datumswerte einen Offset von 36524Tagen in die Berechnung
>miteinbeziehst.
das ist zu kompliziert, folgende Funktion erledigt die "Berechnung" viel
einfacher... <imho>
'von Frank Arendt-Theilen
Function fDATUMDIFF(Anfangsdatum, Enddatum) As Long
Dim intDifferenz As Integer
intDifferenz = VarType(Enddatum) - VarType(Anfangsdatum)
fDATUMDIFF = CDate(Enddatum) - CDate(Anfangsdatum) - intDifferenz
End Function
z.B. A1 sei "31.12.1899" also ein Text und kein (Excel)datum
und A2 sei "12.12.1900", dann ergibt fDatumDiff(A1,A2) --> eine
Differenz von 347 Tagen ohne Offset
mit Datumswerten <1900 kann man problemlos rechnen, nur ANZEIGEN (als
Datum) geht nicht. Zwischen VarType Text und VarType Datum besteht ein
kleiner Unterschied bei der Behandlung der 1900er (1904er) Datumsgrenze,
darum der "Ausgleich" mittels intDifferenz.
ich wollte damit nur andeuten, dass sich hinter der 1800er Maske ein
echter XL-Datumswert versteckt, mit dem man nach herkömmlicher Methode
Datumsberechnungen durchführen *könnte* (konjunktiv!)
Intuitiv würde ich hingegen vermuten, dass nur mit ein paar wenigen % aller
jemals in XL-Dokumenten eingetragenen Datumswerten Berechnungen
durchgeführt werden. ;-)))
mfg Peter
>ich wollte damit nur andeuten, dass sich hinter der 1800er Maske ein
>echter XL-Datumswert versteckt, mit dem man nach herkömmlicher Methode
>Datumsberechnungen durchführen *könnte* (konjunktiv!)
>Intuitiv würde ich hingegen vermuten, dass nur mit ein paar wenigen %
aller
>jemals in XL-Dokumenten eingetragenen Datumswerten Berechnungen
>durchgeführt werden. ;-)))
<imho> ist SORTIEREN aber schon irgendwie eine Art Berechnung und
Hilfsspalte mit Wert -1 etc muß nicht sein, dann lieber z.B. in B1:
=fDatumDiff(Heute,A1), d.i. "Hilfsspalte" B und diese auf- oder
absteigend sortieren und fertig, dann kann ich jedes Datum ganz normal
eingeben und muß nicht auf -1 etc achten, die "Formel" erledigt den Rest
(fast) automatisch.
mfG Winfried