Код, который я использовал
Sub copypaste()
'
' copypaste Macro
'
'
Range("B2:B8").Select
Application.CutCopyMode = False
Selection.FillDown
Range("B9:B10").Select
Selection.FillDown
Range("B11:B13").Select
Selection.FillDown
End Sub
У меня есть этот лист:
И я хочу выводить через код VBA какмой фактический лист очень большой, как это: