Hi!

OK. Step-by-step:

Copy the text of the routine:

Private Sub Worksheet_Change(ByVal Target As Range)
With Worksheets("Sheet1")
.Range("A2") = "=" & .Range("A1")
End With
End Sub
(Highlight the text and use ctrl & C to copy the text to the
clipboard.

Open the workbook at the worksheet you want your calculations to be
done on.
Note its name (on the tab at the bottom): you'll need this later.

Press Alt & F11. A new window (the code page) will open.

Paste the clipboard contents (use ctrl & v) onto this page.

Edit the routine to change the name "Sheet1" into the name of your
worksheet which you noted above. Be sure to keep the quotes.

Return to your worksheet. (Use Alt & F11 again).

If you now type 3+4+7.5 in cell A1, Excel will hold that in A1 as text
and put the "answer" 14.5 in A2.

If you want your data to appear in different cells, just substitute
their addresses for A1 and A2 in the routine.

Alf


--
AlfD
------------------------------------------------------------------------
AlfD's Profile: http://www.excelforum.com/member.php...fo&userid=4785
View this thread: http://www.excelforum.com/showthread...hreadid=468361