Macro Code, Save as Excel Document

Microsoft Excel 010 - complete package
April 17, 2012 at 05:45:23
Specs: Windows 7
I have a workbook that has 30 worksheets inside it. I need to be able to save each worksheet as an excel file with the tab name being the file name. I have been able to save them to PDF files but I can't seem to get it to work for the excel side. Thanks

See More: Macro Code, Save as Excel Document

Report •

April 17, 2012 at 06:53:40
I image it'd be something like this:
Dim s As Variant
For Each s In ActiveWorkbook.Sheets
  s.SaveAs s.Name, ActiveWorkbook.FileFormat
Next 's

How To Ask Questions The Smart Way

Report •

April 17, 2012 at 09:04:34
Thanks that worked!

I knew it would be something simple but I just couldn't get it.

Thanks for your help.

Report •

Related Solutions

Ask Question