View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Dave L via OfficeKB.com Dave L via OfficeKB.com is offline
external usenet poster
 
Posts: 3
Default Selective formula pasting

Tanks Alf

alf bryn wrote:
One possible solution asuming that your starts in A3 :

Sub Macro1()
'
Dim MyRange As Range

Set MyRange = Range(Range("A3"), Cells(Rows.Count, 1).End(xlUp))

End Sub

If you want to extand the range to include colums B, C, D and E as well
replace
Range(Range("A3"), Cells(Rows.Count, 1).End(xlUp)) with
Range(Range("A3"), Cells(Rows.Count, 1).End(xlUp).Offset(0, 4))

Hi

[quoted text clipped - 3 lines]
range will change month on month I need to alter the cell range that the
formula is pasted into. Is this possible?



--
Message posted via http://www.officekb.com