Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!
Learn how Concerto can help you.
Solved
create a new file for ever tab in workbook and save file with name in cell 'B2'
Posted on 2014-02-20
I need to create a new file for ever tab in workbook and save file with name in cell 'B2'
Would an expert be able to provide the code for doing this
Path is Z:\Flex Rate\Macro
Thanks
Would an expert be able to provide the code for doing this
Path is Z:\Flex Rate\Macro
Thanks
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
3-
3
7 Comments
Active today
Hi,
pls try
pls try
Sub SplitWorkbook()
Dim sht As Worksheet
For Each sht In ThisWorkbook.Sheets
sht.Copy
ActiveWorkbook.SaveAs Filename:="Z:\Flex Rate\Macro\" & sht.Range("B2") & ".xlsx"
ActiveWorkbook.Close SaveChanges:=False
Next sht
End Sub
Active today
Hi,
What comes in the MsgBox?
What comes in the MsgBox?
Sub SplitWorkbook()
Dim sht As Worksheet
For Each sht In ThisWorkbook.Sheets
sht.Copy
MsgBox "Filename: " & sht.Range("B2")
ActiveWorkbook.SaveAs Filename:="Z:\Flex Rate\Macro\" & sht.Range("B2")
ActiveWorkbook.Close SaveChanges:=False
Next sht
End Sub
First time round it saves the shet named Data Sheet and gives me name of next sheet. Next time MsgBox is blank and then it falls over
Featured Post
In their most recent webinar, Skyport Systems explores ways to isolate and protect critical databases to keep the core of your company safe from harm.
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
Introduction
This Article briefly covers methods of calculating the NPV and IRR variants in Excel as well as the limitations in calculating and interpreting IRR results.
Paraphrasing Richard Shockley, author of my favourite finance reference tex…
This article will guide you to convert a grid from a picture into Excel format using Microsoft OneNote and no other 3rd party application.
This Micro Tutorial demonstrate the bugs in Microsoft Excel for Mac with Pivot Charts.
This Micro Tutorial will demonstrate the scrolling table in Microsoft Excel using the INDEX function.
Suggested Courses
Course of the Month5 days, 8 hours left to enroll
664 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.