How do I convert a 6 digit date (ex. 033198) to mm/dd/yyyy?

J

John Nurick

Like this:


Dim strD as String
Dim dtD as Date

strD = "033198"
dtD = DateSerial(CInt(Right(strD,2)), _
CInt(Left(strD,2)), CInt(Mid(strD,3,2)))


On Wed, 31 Mar 2004 19:36:09 -0800, "Office help"
 
D

david epsom dot com dot au

format(mydate,"mm/dd/yyyy")

:(

format(033198,"mm/dd/yyyy") = 11/21/1990

rather than 03/31/1998


(david)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top