Copy a form multiple times from page break view

[Carlos13]

I want to copy many times a form on the same sheet where it is, it is curious, but they use it at work I think to homogenize the records and records. The example I have is to copy the form (first image) 50 times on the same sheet quickly and without having to go down all the way moving the page breaks (second image), to in the end only always print the same number of pages separately.

 

[Herakles]

I want to copy many times a form on the same sheet where it is, it is curious, but they use it at work I think to homogenize the records and records. The example I have is to copy the form (first image) 50 times on the same sheet quickly and without having to go down all the way moving the page breaks (second image), to in the end only always print the same number of pages separately.
View attachment 97831View attachment 97832

Try this.

I have assumed that the from is in the range A1 to E16.

Change this line if it is anything different.

Set rngForm = .Range("A1:E16")

Make sure the sheet with the form is the active sheet.

Public Sub subCopyFormSetPageBreaks()
Dim rngForm As Range
Dim WsForm As Worksheet
Dim i As Integer
   
    Set WsForm = ActiveSheet
           
    With WsForm

        Set rngForm = .Range("A1:E16")
       
        For i = 1 To 50
       
            rngForm.Copy Destination:=.Range("A" & (i * rngForm.Rows.Count) + 1)
               
            .Rows((i * rngForm.Rows.Count) + 1).PageBreak = xlPageBreakManual
       
        Next i

    End With

End Sub

 

[Carlos13]

Very good, but it didn't quite do what I expected because it didn't recognize the page breaks.

 

[Herakles]

Very good, but it didn't quite do what I expected because it didn't recognize the page breaks.

What do you mean by that?

Did it put in the page breaks?

If not then were the original page breaks still thare?

 

[Carlos13]

Exactly, only the original page break was left and did not put the new ones. He only left the one on page one and did not recognize the others.

I just tried it and it assumes me as a page all the repetitions. It's not what I want either.

 

[Herakles]

Are you saying that the form is repeated but the page breaks have not been added?

When you go into File, Print what do you see as far as pages?