Hi everybody

My formula looks exactly like this:


Sub makeformulae()
Sheets("Bogholderi").Select
Set frng = Range("O9:O" & Cells(Rows.Count, "O").End(xlUp).Row)
With frng
Formula =
"=if(a9="";"";if(isna(vlookup(a9;råb1;3;false));"" ;(vlookup(a9;råb1;3;false*))))"

Formula = .Value 'changes to a value if desired
End With
End Sub


As I understand it this should set my defined formula active in all the

cells in column O from row 9 - that is it should return the result of
the formula in the entire column (almost) - but nothing happens. Any
thoughts?


And what can I use this line for?


Formula = .Value 'changes to a value if desired


/Heine