Thank you Bob
Greg
"Bob Phillips" wrote in message
...
With Sheets(2).Cells(R, 5)
.Value = .Value + CDbl(TextBox4.Text)
End With
--
HTH
Bob Phillips
"Greg B" wrote in message
...
I am using a userform to have data transfered to a sheet. I currently
use
the code below to send it to a worksheet but what I would like to have
happen is for it to add the total of the textbox to the total already in
the
cell.
R = 3 'or whatever desired row variable
Sheets(2).Cells(R, 5).Value = TextBox4.Text
Any help would be great
Thanks in advance
Greg
|