I am trying to write a macro that will simply copy and paste a set of formulas contained in range w255 to w269 of my Excel 2000 spreadsheet. I want these formulas to be copied to the next row in column W after the last populated cell in column W.
I have used the formula
=CELL("Address" ,INDEX(W:W,MAX( MATCH(99999999, W:W),MATCH("ZZZ Z",W:W))))
to locate the last used cell in column W
this result is contained in cell AM1 (eg $W$305).
I basically need to select the next row in column W after the range contained in AM1 to paste the formulas that I have copied.
I tried the following which does not work - any ideas?
Dim columnL As Range
Range("w288:w30 5").Select
Application.Cut CopyMode = False
Selection.Copy
Application.Com mandBars("Stop Recording").Vis ible = True
Set columnL.Range = Range("AM1").Va lue
columnL.Select
ActiveCell.Offs et(1, 0).Range("A1"). Select
ActiveSheet.Pas te
I have used the formula
=CELL("Address" ,INDEX(W:W,MAX( MATCH(99999999, W:W),MATCH("ZZZ Z",W:W))))
to locate the last used cell in column W
this result is contained in cell AM1 (eg $W$305).
I basically need to select the next row in column W after the range contained in AM1 to paste the formulas that I have copied.
I tried the following which does not work - any ideas?
Dim columnL As Range
Range("w288:w30 5").Select
Application.Cut CopyMode = False
Selection.Copy
Application.Com mandBars("Stop Recording").Vis ible = True
Set columnL.Range = Range("AM1").Va lue
columnL.Select
ActiveCell.Offs et(1, 0).Range("A1"). Select
ActiveSheet.Pas te