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

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

A little different
=IF(LEFT(F2)=A1,IF(RIGHT(B2)="w",A1&"W",IF(RIGHT(B 2)="g",A1&"G","")),"")

Sub ifleft()
Range("c4").Formula = "=IF(LEFT(F2)=A1,IF(RIGHT(B2)=""w""" _
& ",A1&""W"",IF(RIGHT(B2)=""g"",A1&""G"","""")),"""" )"
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Farhad" wrote in message
...

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

Call me strange... I like doing it this way:

Range("A2").Value = "=IF(AND(RIGHT(B2,1)=" & Chr(34) & _
"W" & Chr(34) & ",LEFT(F2,1)=$A$1),$A$1&" & Chr(34) & _
"W" & Chr(34) & ",IF(AND(RIGHT(B2,1)=" & Chr(34) & "G" & _
Chr(34) & ",L*EFT(F2,1)=$A$1),$A$1&" & Chr(34) & "G" & _
Chr(34) & "," & Chr(34) & "" & Chr(34) & "))"

On Sep 11, 4:30 pm, 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",L*EFT(F2,1)=$A$1),$A$1&"G" ,""))"

Thanks,
--
Farhad Hodjat