VBA Please Help

I want to make a vba for excel that will look at the column to the left of the active cell and if there is a formula there drag it over to the right into the active cell and if there is not a formula there copy and paste it to the right into the active cell and i want it to continue a number of times to be decided in cell A1 and just go down the column doing this. Please help … Thanks