Assume the calculation result (% of Revenue) will be in B9

and you want to begin recording results in column M

Further assume that you will have some identifying entry in A9 and you want
those in column N

N1: Title
M1: % of Revenue

Private Sub CommandButton1_Click()
Application.CalculateFull
set rng = cells(rows.count,"M").end(xlup)(2)
rng.Value = Range("B9").Value
rng.NumberFormat = Range("B9").NumberFormat
rng.offset(0,-1).Value = Range("A9").Value
End Sub

--
Regards,
Tom Ogilvy



"bforster1" wrote in message
...

Tom O. Thanks for all your suggestions they are perfect. Can you tell
me how to hard code the % of revenue numbers??

Thanks


--
bforster1
------------------------------------------------------------------------
bforster1's Profile:
http://www.excelforum.com/member.php...o&userid=11771
View this thread: http://www.excelforum.com/showthread...hreadid=266416