Insert Formula with VBA

[izet99]

Hi All,
I have little peace of code that I need help with it. I'm trying input formula with VB, formula should be place into cells, dynamic range. Here is my code:

Set DataRange = Range("J10", Range("P65536").End(xlUp))
    DataRange.Formula = _
    "=IF(ISNA(VLOOKUP(J10,Currency!$C$12:$D$184,2,FALSE)),"1",VLOOKUP(J10, Currency!$C$12:$D$184,2,FALSE))" 

I must be doing something wrong with syntax or something and I can't see what I'm doing wrong. I got "Compile error: Expected: expression". Any thoughts on this would be greatly appreciated
Thanks a lot
Izet

[royUK]

Try this

Please Login or Register  to view this content.

[izet99]

Wow that's was quick, thanks a lot royUK.

Another quick question, is there a way I can fill down this formula in Column M10 and down based on that DataRange example J10 true what ever is data range .

Izet

[royUK]

Wow that's was quick, thanks a lot royUK.

Another quick question, is there a way I can fill down this formula in Column M10 and down based on that DataRange example J10 true what ever is data range .

Izet

Not really sure exactly what you mean

[izet99]

Hi,

I got formula in Column M10, now I would like to FillDown same formula for the rest of the cells based on DataRange in Column J10 thrue what ever will be last row in J column

J--K--L--M
1---------formula
2---------FillDown
3---------FillDown
4---------FillDown
5---------FillDown

Thanks a lot.

[royUK]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here

Your post does not comply with Rule 2 of our Forum RULES. Don't post a question in the thread of another member -- start your own thread. If you feel it's particularly relevant, provide a link to the other thread.