View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Charlie Charlie is offline
external usenet poster
 
Posts: 703
Default Autofill incrementally within formulae

I don't know if it can be done with drag-n-drop editing but you can do it in
VBA like this

Sub Test()

Dim Cell As Range

For Each Cell In Range("A536:A540")
Cell.Formula = "='" & Cell.Row & "'!$D$7"
Next Cell

End Sub

(You didn't say how far down you wanted to go so I just went to row 540 as
an example. I presume the workbooks 536.xls, 537.xls, etc., already exist,
otherwise you'll get the file dialog for every row when you run the macro.)


"BarryMart" wrote:

I have a formula in A536 that reads:
='536'!$D$7

I want the formula in A537 to read:
='537'!$D$7

and so on...

Any ideas welcomed and appreciated!

Thanks,
Barry