I am using a userform to select the data I need in certain cells.
However, if there is existing information I want to add the following
and not overwrite.

Range("C14").Select
ActiveCell.FormulaR1C1 = _
"=Sheet1!R[-2]C[6]+Sheet2!R[5]C[2]+Sheet3!R[58]C[24]"

Could anyone help,
Thanks
Hywel


--
Hywel
------------------------------------------------------------------------
Hywel's Profile: http://www.excelforum.com/member.php...o&userid=14824
View this thread: http://www.excelforum.com/showthread...hreadid=490701

This type of code can lead to a problem: if you take the value of the
cell and add those three other cells, what's to prevent you from
accidentally doing it again, thereby skewing your data?

One way:

With Range("C14")
.FormulaR1C1 = "=" & IIf(IsEmpty(.Value), "", .Value & "+") & _
"Sheet1!R[-2]C[6]+Sheet2!R[5]C[2]+Sheet3!R[58]C[24]"
End With





In article ,
Hywel wrote:

I am using a userform to select the data I need in certain cells.
However, if there is existing information I want to add the following
and not overwrite.

Range("C14").Select
ActiveCell.FormulaR1C1 = _
"=Sheet1!R[-2]C[6]+Sheet2!R[5]C[2]+Sheet3!R[58]C[24]"

Could anyone help,
Thanks
Hywel