Oops!
.Formula = "=" & .Formula & "+1"
Should be:
.Formula = .Formula & "+1"
Regards,
Norman
"Norman Jones" <normanjones...whereforartthou.com> wrote in message
news:OSfcqOsiEHA.3712...TK2MSFTNGP15.phx.gbl...
> Hi Rodney,
> I think you missed:
>
> Perhaps, change:
> .Value = .Value + 1
> to:
> .Formula = "=" & .Formula & "+1"
>
> --
> Regards,
> Norman
>
> "Rodney POWELL" <rodney...beyondtechnology.com> wrote in message
> news:uxS4EGsiEHA.2412...TK2MSFTNGP15.phx.gbl...
> Conrad -- something like this ...
>
> Sub AddMore()
> With Worksheets("MySheet").Range("A1")
> .Value = .Value + 1
> End With
> End Sub
>
> --
> Hope it Helps,
> - Rodney POWELL
> Microsoft MVP - Excel
> Beyond Technology
> Spring, Texas USA
> www.BeyondTechnology.com
>
> "conrad" <conrad...discussions.microsoft.com> wrote in message
> news:50C45680-AE0F-4331-8B5C-12CD7496CD8B...microsoft.com...
> I am working on a basic worksheet. I have several numbers which I have to
> add additional number to in that cell. I want the cell to reflect thetotal
> and the display of the cell contents to list the individual numbers added.
>