Create and Name new workbook

[melewie]

Hello All

I am having problems trying to write a peice of code that will create a new work book and name it. The problem im having is that the user will likely do this several times, what I would like to do is....

New WB = "Raw Data" if WB Raw Data already exists then new WB = "Raw Data 1" and so on.... I can do this by creating a neverending if statement, is there a better way to do this??

Any help would be great - Thanks

 

[GTO]

I do not believe you can rename an unsaved/new workbook, as I believe the name is read-only at that point.

 

[Ruddles]

Nearly there... what's your current code for creating a new workbook and naming it "RAW DATA"?

I can't seem to create a new workbook and have it called anything other than "Book1".

 

[melewie]

Nearly there... what's your current code for creating a new workbook and naming it "RAW DATA"?

I can't seem to create a new workbook and have it called anything other than "Book1".

Seems you cant do that either! I hadnt tried just presumed it would be something like

Set NewBook = Workbooks.Add
    With NewBook
        .Title = "Raw Data"
        .Subject = "Data"
    End With

But I guess this really isnt possible

 

[Ruddles]

After much Googlification I've come to the conclusion that you can't change the name of a workbook unless you save it first.

Maybe you could save the workbook in the user's TEMP directory as soon as you create it. You could still allow the user to save it in a location of their choosing and use the Before_Save event to delete the one in TEMP.

Apart from that I'm all out of ideas.

 

[melewie]

Thanks for your help with this - I have come to the same conclusion. think I will just leave it as book x and refrence it when its created.