custom cell date format

[welkin]

i'm trying to get excel macro to enter the title of my excel with the title + date on a cell.

The date on the cell is in ddmmyy (custom) format. e.g. 130608

I put in the follow:

ActiveWorkbook.Names.Add name:="cobdate", RefersToR1C1:= _
"=R2C4"

Dim date As String

date = Range("titledate")

Range("A2").Value = "title" & date

however, after running the macro, the result is "title 13/06/08".

how do i get the macro to use the date as 130608 without the slashes?

I need to do away with the slashes because after this I have another macro to save the file using the title, which slashes are not permitted in filenames.

Anyone have any good suggestions pls?

Thanks in advance.

 

[Norie]

First thing I would recommend is not using date as a variable.

Date is a VBA function/statement that returns the current date.

If you want to format a date without the slashs take a look at the Format function.

By the way your post is rather confusing.

You originally refer to creating a named range, cobdate, but then you appear to refer to a named range called titledate.

 

[VoG]

I agree with Norie - use MyDate or similar and

Range("A2").Value = "title " & Format(MyDate, "ddmmyy")

 

[welkin]

Hi Norie/ VoG,

Apologies for the confusion.

Thanks for all your help.

I will try it out.

 

[xld]

Dim mydate As String

mydate = Range("titledate").Text