So, some people i work with use a Tally Sheet, They constantly are
adding numbers upon numbers over and over all day long, it would be
nice if there were a way that if in say cell a1, there was the value 35
, and if you typed the value 5 in that cell, the value would then
change to 40.

Ive thought of ways around this, but i think on the scale im needing it
will bog down the spreadsheet, memory wise that is.

Thanks in advance.

This is the only way i have found, but how to change it to work with a
range, not just one cell.

Public A


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.EnableEvents = False
[a1] = [a1] + A
Application.EnableEvents = True
End Sub


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
A = [a1]
End Sub

Do you want the value typed in added to an entire range? How would th
range be specified

--
bhofset
-----------------------------------------------------------------------
bhofsetz's Profile: http://www.excelforum.com/member.php...fo&userid=1880
View this thread: http://www.excelforum.com/showthread.php?threadid=38023

UBER_GEEK Wrote:
This is the only way i have found, but how to change it to work with a
range, not just one cell.

Public A


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.EnableEvents = False
[a1] = [a1] + A
Application.EnableEvents = True
End Sub


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
A = [a1]
End Sub


Perhaps this may help you out ??

http://www.xcelfiles.com/VBA_02.htm

--
Ivan F Moal

-----------------------------------------------------------------------
Ivan F Moala's Profile: http://www.excelforum.com/member.php...nfo&userid=195
View this thread: http://www.excelforum.com/showthread.php?threadid=38023