hi,
try somthing like this.....

sub SaveRange
ActiveSheet.UsedRange.Select
Selection.Copy
Workbooks.Add
Range("A1").PasteSpecial xlPasteAll
Application.Dialogs(xlDialogSaveAs).Show
end sub

if you have a solid block of data you might use...
Activesheet.currentregion.select

Regards
FSt1

"Nigel" wrote:

Hi,


Can anyone help me please? i need to be able to create a new book from an
active sheet to save in a location specified by user. i.e: in workbook "
invoices" on sheet number 2865 ( this sheet is active ) press a button, and a
standard saveas dialog box appears. user can browse to location and save as
new book. but it has to be the 1 sheet only. i cannot do it.


Thanks,


N.S.