Create multiple copies of a specific sheet in a WB based on a number in a cell

thedoccontroller

Board Regular
Joined
Dec 15, 2015
Messages
82
So... I need to copy the sheet pointed out below, the number of times indicated in the range circled. No specific renaming needs to happen. Can just be Brkr Form(1), " "(2),...etc or even sheet 1, " " 2... etc.

Just need them created so that when they print "all", they get the right number of copies of that sheet.

I'm open to other routes to get to this, but this seems like the simplest way yo get there.

Any help on this would be super appreciated.

1632826682310.png
 

Attachments

  • 1632826549793.png
    1632826549793.png
    54 KB · Views: 1

Excel Facts

Which came first: VisiCalc or Lotus 1-2-3?
Dan Bricklin and Bob Frankston debuted VisiCalc in 1979 as a Visible Calculator. Lotus 1-2-3 debuted in the early 1980's, from Mitch Kapor.
How about
VBA Code:
Sub thedoccontroller()
   Dim i As Long
   
   For i = 1 To Range("H14").Value
      Sheets("Brkr Form").Copy , Sheets(Sheets.Count)
   Next i
End Sub
 
Upvote 0
Solution
How about
VBA Code:
Sub thedoccontroller()
   Dim i As Long
  
   For i = 1 To Range("H14").Value
      Sheets("Brkr Form").Copy , Sheets(Sheets.Count)
   Next i
End Sub
Hey Fluff, tnx for getting back to me. I apologize for not adding the range for the reference number of copies. Will this work if I have a range merged to put the # in? I guess I could set a hidden cell up to pull that number into and just reference that cell, right?
 
Upvote 0
Hey Fluff, tnx for getting back to me. I apologize for not adding the range for the reference number of copies. Will this work if I have a range merged to put the # in? I guess I could set a hidden cell up to pull that
Best way to find out, is to try it. ;)
Actually, you genius, you... It worked like a charm! Thank you soooo much. This is brilliant??
 
Upvote 0
I switched the marked solution to the obvious answer post in this thread.

@thedoccontroller - in the future, please mark the post as the solution that answered your question instead of your feedback post. It will help future readers to find this question and its solution faster.
 
Upvote 0
I switched the marked solution to the obvious answer post in this thread.

@thedoccontroller - in the future, please mark the post as the solution that answered your question instead of your feedback post. It will help future readers to find this question and its solution faster.
OMG... I'm so sorry! that was not what I meant to do. Thank you for catching that.?
 
Upvote 0

Forum statistics

Threads
1,214,641
Messages
6,120,691
Members
448,978
Latest member
rrauni

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top