New to Macros , Please help.

[ashokpandian]

Hi All,

Sub SavePDF()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="D:\Users\51441884\Desktop\Tracking tool\CAPA Form.pdf", _
OpenAfterPublish:=True
End Sub
Sub Copier()
Dim x As Integer
x = InputBox("Enter number of times to copy Sheet1")
For numtimes = 1 To x
ActiveWorkbook.Sheets("CAPA Form").Copy _
After:=ActiveWorkbook.Sheets("CAPA Form")
Next
ActiveWorkbook.Save
End Sub



This is the code i have in my worksheet but its not working.


My Requirement is simple. I need to populate the same type of form again and again in the same excel.

Sheet1- Registration Form (To enter the Form1 details and so on)
Sheet2-General Form (This form should be populate again and again depends on the information which entered in the sheet1 or Simply just populate again and again so that i will enter it manually)


Please explain with some example so that i can modify code for my requirement.

 

[My Aswer Is This]

ashokpandian

You need to explain to us in detail what your wanting to do.
This script has to do with copying sheets not inputting data to a sheet.

 

[tonyyy]

ashokpandian,

You might try adding the line...

[COLOR=#a9a9a9]
Sub Copier()

Dim x As Integer
[/COLOR][B]Dim numtimes As Integer[/B][COLOR=#a9a9a9]

[/COLOR]

Cheers,

tonyyy