Date Format

[cstang999]

Hello

Can anyone tell me how to convert the date (e.g 17-09-2007) into
this format : 1 7 0 9 0 7.


Thanks in advance.
CS TANG

 

[rajeevbhatt17]

Hello

Can anyone tell me how to convert the date (e.g 17-09-2007) into
this format : 1 7 0 9 0 7.

Thanks in advance.
CS TANG

I see there is a space between the digits. If that is the case then:

Sub abc()
strTemp = ""
strdate = Format(Date, "DDMMYY")

For i = 1 To 6
strTemp = strTemp & Mid(strdate, i, 1) & " "
Next i
End Sub

 

[Dave Peterson]

Check your other post, too.

Hello

Can anyone tell me how to convert the date (e.g 17-09-2007) into
this format : 1 7 0 9 0 7.

Thanks in advance.
CS TANG