sub memacro
workbooks.add
thisworkbook.sheets("sheet1").range("A2:I65536").c opy
range("A1").pastespecial paste:=xlvalues
end sub

not sure if this will work as I just guessed and typed it
into here without checking first.

You should workout how to do record macros as they are
definately helpfull at getting you started

Jase
-----Original Message-----

I would like a macro to copy data from sheet 1 to a
new book
the macro would copy col A to I inclusive and down to
include the last row-
The last row varies all the time...and that is where I am
having trouble.
Will someone please help
Thanks

--
Norton Professional 2004 says this email is
clean...believe it


.