sorting on a date field

[Bob Matthews]

I have a date field with dates ranging from the 1850s through to 1930 with
dd/mm/yyyy
I know about xdate - to handle dates before 1900

Is it possible to sort on this field successfully ?
If so, how ?

Bob M

 

[Guest]

Using John Walkenbach's XDate concept, use...
'/=======================================/
Public Function XDateSerial(Select_Cell As Range) As Double
Application.Volatile
On Error Resume Next
XDateSerial = DateValue(Select_Cell) * 1
End Function
'/=======================================/

Cell A1 = 10/12/1930
- Cell B1=XDateSerial(A1) = 11243
Cell A2 = 10/12/1850
- Cell B2=XDateSerial(A2) = -17976

This makes it easy to sort the date range.

HTH,

 

[Guest]

Using John Wlakenbach's examples...
'/===========================================================/
Public Function XDateSerial(Select_Cell As Range) As Double
Application.Volatile
On Error Resume Next
XDateSerial = DateValue(Select_Cell) * 1
End Function
'/===========================================================/

A1 = 10/15/1930
A2 = 10/15/1850

B1 = XDateSerial(A1) evaluates to 11243
B2 = XDateSerial(A2) evaluates to -17976

Now, it's easy to sort by 'date'.

HTH,