One way:

Range("T5:AC5").Copy _
Destination:=Range("T6").Resize(Range("T1").Value, 10)

In article
,
jaimetimbrell
wrote:

Hello All,

Another problem I have is in automating the number of rows down with
which I copy a range of cells.

At present in the macro I have this bit:

Range("T5:AC5").Select
Application.CutCopyMode = False
Selection.Copy
Range("T6:T1008").Select
ActiveSheet.Paste

now rather than '1008' I want the 1008 bit to be a number that appears
in cell T1 (the number is different from sheet to sheet).

How do I do that?

Regards,
Jaime.