add to a cell with a button
 

i'm trying to create a button that will add values to a cell when the
button is clicked. The cell that is being added to already has a
value, however. the user will input their data in a few different
places, and hit the button. the code should take the input, perform a
few operations, and then add the result to the value of the cell. my
problem is adding to a cell that already has value.

thanks,
donny

add to a cell with a button
 

Hi Donny,

Add a CommandButton to the shhet and try
something like:

'=============
Private Sub CommandButton1_Click()
Dim srcRng As Range
Dim destRng As Range

Set srcRng = Me.Range("B1, B3, B5") '<<==== CHANGE
Set destRng = Me.Range("A1") '<<==== CHANGE

With destRng
.Value = .Value + Application.Sum(srcRng)
End With
End Sub
'<<=============


---
Regards,
Norman


"Donny" wrote in message
ps.com...
i'm trying to create a button that will add values to a cell when the
button is clicked. The cell that is being added to already has a
value, however. the user will input their data in a few different
places, and hit the button. the code should take the input, perform a
few operations, and then add the result to the value of the cell. my
problem is adding to a cell that already has value.

thanks,
donny