Hello im trying to copy and paste a variable number of columns a variable number of times. I can get it to resize a variable amount of times but not if i want to do a variable amount of rows as well. this is my code:
Sub getRng()
Dim Cval As Variant
Dim Rng1 As Range
Cval = ActiveSheet.Range("F1").Value
cval2 = ActiveSheet.Range("A1").Value
ActiveSheet.Range("d3:D" & Cval).Copy Range("D" & cval2).Resize(55 * Range("A1").Value)
End Sub
Instead of the fixed 55 i want to do it a varible amount of time.
Any help would be greatly appreciated.
Sub getRng()
Dim Cval As Variant
Dim Rng1 As Range
Cval = ActiveSheet.Range("F1").Value
cval2 = ActiveSheet.Range("A1").Value
ActiveSheet.Range("d3:D" & Cval).Copy Range("D" & cval2).Resize(55 * Range("A1").Value)
End Sub
Instead of the fixed 55 i want to do it a varible amount of time.
Any help would be greatly appreciated.
