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

On Sep 18, 9:56 am, wrote:
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

Check your other post, too.

wrote:

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

--

Dave Peterson