Hi
I never used such a function before... how do I proceed?...

thanks

"cmart02" wrote:

I only noticed that you used a "." instead of "/" in the date. In this case,
change the following line:

myValues = Split(dDate, ".")

Alternatively, you can use an extra argument so that you can indicate the
separator.


--
Regards
Robert
Find me at www.msofficegurus.com - be part of it!


"cmart02" wrote:

Hi,

You can use the following function to convert the values:

Function ccDate(myDate As Date) As Date

dDate = CStr(myDate)

myValues = Split(dDate, "/")

myMonth = CInt(myValues(0))
myDay = CInt(myValues(1))
myYear = CInt(myValues(2))

ccDate = DateSerial(myYear, myMonth, myDay)

End Function


I am recruting new members for my forum below... The site went live this
weekend and if you wish to take part, please, join me there so that we can
exchange some ideas.

--
Regards
Robert
Find me at www.msofficegurus.com - be part of it!