View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JMay JMay is offline
external usenet poster
 
Posts: 468
Default How do I save a single worksheet to a different file using VBA 03

Here's a start...

Sub Macro1()
fName = Sheets("Invoice").Range("$H$2").Value
Set NewBook = Workbooks.Add
NewBook.SaveAs Filename:=fName
End Sub

"Alpineskier" wrote:

I am converting an old Excel 4 macro to VBA and I want to save single
worksheet to a new .xls file. The old command was
=SAVE.AS(path&CELL("contents",Invoice!$H$2),1,"",F ALSE,"",TRUE). I am using
Excel 2003 and VBA v6.5.