View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
joel joel is offline
external usenet poster
 
Posts: 9,101
Default Copying large number of sheets

did you get your query to work with a macro?

"Amanda" wrote:

Thanks for this joel,

Where do I type this information in to to get it to run the query, is it a
macro?

Thanks

Amanda

"Joel" wrote:

i would have a templet and then copy it like below. you need to havve a list
of branch names. You may want to do this as part of importing the data from
some external source.

Sub CopyBranch()

Set BranchRange = Sheets("sheet1").Range("A1:A20")


For Each cell In BranchRange

Worksheets("templet").Select
Worksheets("templet").Copy After:=Sheets("templet")
ActiveSheet.Name = cell

Next cell


End Sub


"Amanda" wrote:

Hi,

I have a spreadsheet which contains a summary page and a number of branch
sheets (each should be on a separate tab).

How do I replicate the branch sheets automatically (there are 50 of them
needed) without having to copy it 50 times?

Is there a way I can name each of the tabs automatically too, i.e with their
branch name? (Andover; Southampton etc etc)

Thanks

Amanda