it will copy range but will not multiply
Posted by Jim on November 04, 2000 11:21 AM
I have a value in cell A1 that i would like to on
commandbutton1_click multiply by 1.2 before it copies
to cell A10. It copies but will not multiply
i.e.
Private Sub CommandButton1_Click()
Range("A1").Copy Range("A10")
I've tried various ways but not smart enough to figure
out. Any help would be appreciated
Jim
Posted by Celia on November 04, 2000 2:27 PM
Jim
If you want the increased value in both A1 and A10 :-
Range("A1").Value = Range("A1") * 1.2
Range("A1").Copy Range("A10")
If you want the increased value in A10 only :-
Range("A1").Copy Range("A10")
Range("A10").Value = Range("A10") * 1.2
Celia
Posted by Jim on November 04, 2000 3:27 PM
Ok that works great, is it possible to add A1+A2+A3
and have it multiply by 1.2 in A10
Thanks Celia Jim
Posted by Celia on November 04, 2000 4:35 PM
Jim
Range("A10").Value = Application.Sum(Range("A1:A3")) * 1.2
Celia
Posted by Jim on November 04, 2000 5:10 PM
Thank you Celia
