saving new workbook 1

[sedgely]

I have code that copies the last x number of rows then creates and new workbook and pastes the copied data in. What I need to do is be able to save the new workbook using an already specified variable as the filename. Can I save the new workbook from code in the original workbook?


Cheers, Craig
Si fractum non sit, noli id reficere

 

[xlbo]

yes - very much so

sub example()
dim wbName as string, wb as workbook, strPath as string

wbName = "Test Workbook"
strPath = "C:\Home\"

set wb = workbooks.add
wb.saveas strPath & wbName & ".xls"
end sub

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question

 

[sedgely]

Thanks Geoff
That was just what i needed!

Cheers, Craig
Si fractum non sit, noli id reficere

 

[firefytr]

Also, to create a workbook with only one sheet in it, use ..

set wb = workbooks.add(xlWBATWorksheet)

I couldn't find it in any help files, but it's been supported from earlier versions. My fav 'unwritten' tip.

-----------
Regards,
Zack Barresse