thank you Gary, exactly what I need, you are a pro.

"Gary''s Student" wrote:

Here is a small variation of the code I posted before. Be sure you delete
the old code before installing this version:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range
Set r = Target
v = r.Value
Application.EnableEvents = False
r.Value = Evaluate(v)
Application.EnableEvents = True
End Sub
--
Gary''s Student - gsnu200842


"jacky" wrote:

I want to be able to add several numbers in each cell w/o equal sign.

5+5+6 and have the total come up when i press enter on the keyboard.
thanks

"Gary''s Student" wrote:

Tell me about the cells. Are they in some column or row ??
--
Gary''s Student - gsnu200842


"jacky" wrote:

Thank you for the information Gary, however; I need to do this in several
cells where i am able to add in the individual cell. Can you help

"jacky" wrote:

how do I automatically in a single cell input 5+5 without the equal sign and
have a total come up