View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Mike H Mike H is offline
external usenet poster
 
Posts: 11,501
Default percentage of individual cell only

Hi,

You can do that with the worksheet change event. Right click your sheet tab,
view code and paste the code below in. Any value entered in Column D will
have 20% added.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then
If IsNumeric(Target) Then
Application.EnableEvents = False
Target.Value = Target.Value * 1.2
Application.EnableEvents = True
End If
End If
End Sub

Mike

"ftcp3" wrote:

I write up service invoices and estimates. I want to be about to put a dollar
amount into a specific cell and it automatically adds my 20% to that number -
possible OR must use two cells. I don't want my estimates to show that I have
a 20% mark up on my part cost and I don't want to have to calculate each time
I enter my parts!

PLEASE & Thank You...