Thanks for the template, Don - what is frng?

/Heine

Don Guillett wrote:
modify this idea to suit
Sub makeformulae()
Set frng = Range("c16:c" & Cells(Rows.Count, "a").End(xlUp).Row)
With frng
.Formula = "=vlookup(a16,$a$16:$b$22,2,0)"
.Formula = .Value'changes to a value if desired
End With
End Sub

--
Don Guillett
SalesAid Software

"Heine" wrote in message
oups.com...
Hi,

I would like to put my lookup formula in the macro instead of in the
cells.

=IF(A9="";"";IF(ISNA(VLOOKUP(A9;raab1;3;FALSE));"" ;(VLOOKUP(A9;raab1;3;FALSE))))


Any suggestion as to how this is done most easily? What are the
implications of this? Is it at all smart? The idea is that I can use
the macro in many sheets instead of copying the formulas from sheet to
sheet.

Thanks in advance!

/Heine