Last Edited By **Krjb Donovan** **Last Updated:** Mar 05, 2014 09:21 PM GMT

Here's the scenario...

In cell A1 I have a number '20', in B1 there is a formula, Would it be possible to automatically copy the formula in B1 until B20 without me doing it manually?How? The number '20' in A1 is the determinant on how many copy of the formula in B1 I want to have. For example I change the number in A1 to 45, then the formula in B1 will be copied in until B45.

Jn

This will do what you asked.

Sub Macro1()

x = Range("A1").Value Range("b1").Copy Range("b1").Resize(x, 1).Select ActiveSheet.Paste Application.CutCopyMode = False

End Sub

I hope it helps get you started; I suspect you will need some error checking and come up with an efficient way to trigger the macro.

Advertisement

©2017 eLuminary LLC. All rights reserved.