Runtime error 1004

[Shaido]

Hi all

Can anybody tell me why this bit of code would result in an 'Application-defined or Object-defined' 1004 error message?

Range("AI2").Formula = "=TRIM(IF(ISERROR(FIND(""["",L2)),"",MID(L2,FIND(""]"",L2)+1,4)))"

This works well on the Excel workbook but when I put it into VB I get the error message, which I don't understand. Hopefully there's enough info here for you to go on.

Thanks

 

[RoryA]

You didn't double-up the middle quotes:

Range("AI2").Formula = "=TRIM(IF(ISERROR(FIND(""["",L2)),"""",MID(L2,FIND(""]"",L2)+1,4)))"

 

[Shaido]

How I'm still employed I'll never know. Thanks rorya, very much appreciated!

 

[RoryA]

How I'm still employed I'll never know.

As Gai'shain?