Excel VBA- Concatenation Problem

[Rjc8513]

Using Excel 2003 and trying to insert a formula into a cell but can't get the concatenation right in the VB Editor.

This is the formula I want to be inserted:
=IF(Sheet1!A1="","",Sheet1!A1)

My current code:
ActiveCell.Formula= _
"=IF(Sheet1'A1=," & "" & "," & "" & "," & "Sheet1!A1)"

Thanks.

 

[SkipVought]

hi,

VBA questions are best addressed in forum707.

That being said, why do you need to concatenate???

As far as the QUOTES

'=IF(Sheet1!A1="","",Sheet1!A1)
ActiveCell.Formula = "=IF(Sheet1!A1="""","""",Sheet1!A1)"

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[Rjc8513]

Thanks Skip! That worked.

Sorry for posting in the wrong forum.