Related:
- Excel duplicate rows n times
- Excel duplicate row multiple times - Best answers
- Excel duplicate row n times - Best answers
- Excel duplicate row multiple times ✓ - Forum - Office Software
- Copy and insert rows and number of times ✓ - Forum - Excel
- Copy rows n times in Excel ✓ - Forum - Excel
- Repeat row x times - Forum - Excel
- Excel duplicate rows based on cell value ✓ - Forum - Excel
1 reply
vcoolio
- Posts
- 1271
- Registration date
- Thursday July 24, 2014
- Status
- Moderator
- Last seen
- January 24, 2021
Hello V_Angel54,
I assume that you simply high-light the data range that you wish to copy x number of times and that you paste it at the bottom of the existing data set in the same sheet. If so, the following code, placed in a standard module and assigned to a button may do the task for you:-
Following is the link to a small sample I made up for you to play with:-
https://www.dropbox.com/s/did79tutwlcqi1l/Copy%20selection%20n%20times.xlsm?dl=0
Enter the number of times that you wish to copy any selection into the yellow box (cell E1), select(high-light) the range that you wish to copy and click on the "RUN" button. The selection will be copied to the bottom of the existing data set the number of times that you have entered into the yellow box (cell E1).
I hope that this helps,
Cheerio,
vcoolio.
I assume that you simply high-light the data range that you wish to copy x number of times and that you paste it at the bottom of the existing data set in the same sheet. If so, the following code, placed in a standard module and assigned to a button may do the task for you:-
Sub CopySelection()
Dim SCT As Long '----> SCT simply stands for "Selection Copy Times"
Dim i As Long
SCT = Sheet1.[E1].Value
If SCT > 0 Then
For i = 1 To SCT
Selection.Copy Sheet1.Range("A" & Rows.Count).End(3)(2)
Next i
End If
Sheet1.[E1] = ""
Application.CutCopyMode = False
End Sub
Following is the link to a small sample I made up for you to play with:-
https://www.dropbox.com/s/did79tutwlcqi1l/Copy%20selection%20n%20times.xlsm?dl=0
Enter the number of times that you wish to copy any selection into the yellow box (cell E1), select(high-light) the range that you wish to copy and click on the "RUN" button. The selection will be copied to the bottom of the existing data set the number of times that you have entered into the yellow box (cell E1).
I hope that this helps,
Cheerio,
vcoolio.
Subscribe To Our Newsletter!
- Posts
-
1271
- Registration date
- Thursday July 24, 2014
- Status
- Moderator
- Last seen
- January 24, 2021
216 > V_angel54Cheerio,
vcoolio.