Date Formatting/adding slashes
Perfeect! Thankyou.
"Dave Peterson" wrote:
VBA has it's own version of the =date() worksheet function.
Look for DateSerial in VBA's help.
dDate = Dateserial(Mid(strDateTime, 1, 2), _
Mid(strDateTime, 5, 2), _
Mid(strDateTime, 3, 2))
Tim Rush wrote:
how would I do this with VBA. I've tried the following:
dDate = Application.WorksheetFunction.Date(Mid(strDateTime , 1, 2),
Mid(strDateTime, 5, 2), Mid(strDateTime, 3, 2))
where stDateTime is 12 digit string in the format 0812011324112 (yymmddhhmmss)
I get an unsupported method error
"Shane Devenshire" wrote:
Hi Teresa,
You can simplify the suggested approaches
=DATE(VALUE(RIGHT(A2,4)), VALUE(LEFT(A2,1)), VALUE(MID(A2,2,2)))
to the following:
=DATE(RIGHT(A1,4), LEFT(A1),MID(A1,2,2))
However, keep in mind that all these approaches have a problem - what does
this represent: 1112009 is this 11/1/2009 or 1/11/2009?
To make these approaches better is is preferable that the original dates are
entered 02012007 which would be 2/1/2007. If the dates are entered this way
you should modify the above formula to read:
=DATE(RIGHT(A1,4), LEFT(A1,2),MID(A1,2,2))
Cheers,
Shane Devenshire
Microsoft Excel MVP
"teresa" wrote in message
...
Hello,
I have a spreadsheet with data from a datebase that list dates with no
slashes. How can I add slashes?
Current format -7132007
Desired format- 7/13/2007
Thanks
--
Dave Peterson
|