You need to add extra quotes to let the compiler know that you are using
quotes...

Range("A2").Value =
"=IF(AND(RIGHT(B2,1)=""W"",LEFT(F2,1)=$A$1),$A$1&" "W"",IF(AND(RIGHT(B2,1)=""G"",LEFT(F2,1)=$A$1),$A$ 1&""G"",""""))"

I think I got them all...
--
HTH...

Jim Thomlinson


"Farhad" wrote:


Hi,

I need to put the line below in my VBA code but i get error i know that is
because I use the symbole " but i don't know how can i fix it. any help would
be appriciated.

Range("A2").Value =
"=IF(AND(RIGHT(B2,1)="W",LEFT(F2,1)=$A$1),$A$1&"W" ,IF(AND(RIGHT(B2,1)="G",LEFT(F2,1)=$A$1),$A$1&"G", ""))"

Thanks,
--
Farhad Hodjat