worksheet save

V

vbastarter

Looks like sheet dont have save property. I dont want to save the entiire
workbook but Just one sheet(sheet1). How is that possible ?
Thx
 
J

JE McGimpsey

one way:

Public Sub CopySheetToNewWorkbook()
Sheets("Sheet1").Copy
Application.DisplayAlerts = False
With ActiveWorkbook
.SaveAs Filename:="test.xls"
.Close
End With
Application.DisplayAlerts = True
End Sub
 
Top