Try this:

Sub Make_Sheets()
    Dim vCnt, vNum
    ThisWorkbook.Activate
    Sheets("Form").Select
    Application.ScreenUpdating = False
    vCnt = Application.WorksheetFunction.CountA(Sheets("Vehicle 
List").Range("A1:A65000"))
    For vNum = 2 To vCnt
        Sheets("Form").Copy After:=Sheets(3)
        Range("D56").Value = Sheets("Vehicle List").Cells(vNum, "A").Value
    Next vNum
    Application.ScreenUpdating = True
End Sub


You'll have to save your file as .xlsb 
or .xlsm, but I prefer .xlsb
 
Paul
-----------------------------------------
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-----------------------------------------




________________________________
From: John A. Smith <johnasmit...@gmail.com>
To: excel-macros@googlegroups.com
Sent: Tue, November 8, 2011 2:16:05 PM
Subject: $$Excel-Macros$$ Macro To Add a Cell From A List And Create A New Tab


I have a spreadsheet with a tab called Form.  There is a second tab called 
Vehicle List.  I need a macro to take the first vehicle on the list and put 
that 
number in cell D56 of the form tab and then copy the tab and repeat this 
process 
until all the vehicle numbers are on the form in their own tab.  The tab names 
are not important as the spreadsheet will be saved in the pdf format and the 
tabs will become pages.

Thank you for your help.

John-- 
FORUM RULES (925+ members already BANNED for violation)
 
1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
 
2) Don't post a question in the thread of another member.
 
3) Don't post questions regarding breaking or bypassing any security measure.
 
4) Acknowledge the responses you receive, good or bad.
 
5) Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

 
NOTE : Don't ever post personal or confidential data in a workbook. Forum 
owners 
and members are not responsible for any loss.
 
------------------------------------------------------------------------------------------------------

To post to this group, send email to excel-macros@googlegroups.com

-- 
FORUM RULES (925+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security measure.

4) Acknowledge the responses you receive, good or bad.

5)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com

Reply via email to