software

Hello,
I have tried to find how to do this almost everywhere in the excel help,
internet and even questions asked in this group to no evail. Could some one
please help.
I am trying to make a work sheet where say, I put a dollar value in J13 of
$100, I would like it to automatically add 10% in the same field. I will
continue this down to J30, then make J31 Total the whole lot.
Is this possible?
Then is it possible to hyde the formula so my clients don't see the Tax value?
I really appreciate your help.
Humph

right click on the sheet's tab, choose View Code, and paste this codein

Private Sub Worksheet_Change(ByVal Target As Range)
Const strRange = quot;J13:J30quot;
Const Multiplier = 1.1

If Intersect(Target, Range(strRange)) Is Nothing Then Exit Sub

Application.EnableEvents = False

If IsNumeric(Target.Value) Then Target.Value = Multiplier * Target.Value

Application.EnableEvents = True

End Sub
quot;Humphquot; wrote:

gt; Hello,
gt; I have tried to find how to do this almost everywhere in the excel help,
gt; internet and even questions asked in this group to no evail. Could some one
gt; please help.
gt; I am trying to make a work sheet where say, I put a dollar value in J13 of
gt; $100, I would like it to automatically add 10% in the same field. I will
gt; continue this down to J30, then make J31 Total the whole lot.
gt; Is this possible?
gt; Then is it possible to hyde the formula so my clients don't see the Tax value?
gt; I really appreciate your help.
gt; Humph

Duke,
Your a genius and quick. Thank you so much.
Just for my sake, as I've been trying so long to work it out. How can I do
the same using normal formula method, its killing me.

Humph.

quot;Duke Careyquot; wrote:

gt; right click on the sheet's tab, choose View Code, and paste this codein
gt;
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; Const strRange = quot;J13:J30quot;
gt; Const Multiplier = 1.1
gt;
gt; If Intersect(Target, Range(strRange)) Is Nothing Then Exit Sub
gt;
gt; Application.EnableEvents = False
gt;
gt; If IsNumeric(Target.Value) Then Target.Value = Multiplier * Target.Value
gt;
gt; Application.EnableEvents = True
gt;
gt; End Sub
gt;
gt;
gt;
gt; quot;Humphquot; wrote:
gt;
gt; gt; Hello,
gt; gt; I have tried to find how to do this almost everywhere in the excel help,
gt; gt; internet and even questions asked in this group to no evail. Could some one
gt; gt; please help.
gt; gt; I am trying to make a work sheet where say, I put a dollar value in J13 of
gt; gt; $100, I would like it to automatically add 10% in the same field. I will
gt; gt; continue this down to J30, then make J31 Total the whole lot.
gt; gt; Is this possible?
gt; gt; Then is it possible to hyde the formula so my clients don't see the Tax value?
gt; gt; I really appreciate your help.
gt; gt; Humph

You can't enter a value into a cell that has a formula, for you'd overwrite
the formula. Best you can do is enter the value in one column and have the
formula in the next column. When you want to 'finalize' things, copy the
formulas and do an Editgt;Paste Specialgt;Values to repalce the formulas with
values.quot;Humphquot; wrote:

gt; Duke,
gt; Your a genius and quick. Thank you so much.
gt; Just for my sake, as I've been trying so long to work it out. How can I do
gt; the same using normal formula method, its killing me.
gt;
gt; Humph.
gt;
gt; quot;Duke Careyquot; wrote:
gt;
gt; gt; right click on the sheet's tab, choose View Code, and paste this codein
gt; gt;
gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; Const strRange = quot;J13:J30quot;
gt; gt; Const Multiplier = 1.1
gt; gt;
gt; gt; If Intersect(Target, Range(strRange)) Is Nothing Then Exit Sub
gt; gt;
gt; gt; Application.EnableEvents = False
gt; gt;
gt; gt; If IsNumeric(Target.Value) Then Target.Value = Multiplier * Target.Value
gt; gt;
gt; gt; Application.EnableEvents = True
gt; gt;
gt; gt; End Sub
gt; gt;
gt; gt;
gt; gt;
gt; gt; quot;Humphquot; wrote:
gt; gt;
gt; gt; gt; Hello,
gt; gt; gt; I have tried to find how to do this almost everywhere in the excel help,
gt; gt; gt; internet and even questions asked in this group to no evail. Could some one
gt; gt; gt; please help.
gt; gt; gt; I am trying to make a work sheet where say, I put a dollar value in J13 of
gt; gt; gt; $100, I would like it to automatically add 10% in the same field. I will
gt; gt; gt; continue this down to J30, then make J31 Total the whole lot.
gt; gt; gt; Is this possible?
gt; gt; gt; Then is it possible to hyde the formula so my clients don't see the Tax value?
gt; gt; gt; I really appreciate your help.
gt; gt; gt; Humph

Duke,
Copy that. Now I know why it wasn't working all this time, it was doing just
as you said. And I thought it was me.

Thanks again
Humph

quot;Duke Careyquot; wrote:

gt; You can't enter a value into a cell that has a formula, for you'd overwrite
gt; the formula. Best you can do is enter the value in one column and have the
gt; formula in the next column. When you want to 'finalize' things, copy the
gt; formulas and do an Editgt;Paste Specialgt;Values to repalce the formulas with
gt; values.
gt;
gt;
gt; quot;Humphquot; wrote:
gt;
gt; gt; Duke,
gt; gt; Your a genius and quick. Thank you so much.
gt; gt; Just for my sake, as I've been trying so long to work it out. How can I do
gt; gt; the same using normal formula method, its killing me.
gt; gt;
gt; gt; Humph.
gt; gt;
gt; gt; quot;Duke Careyquot; wrote:
gt; gt;
gt; gt; gt; right click on the sheet's tab, choose View Code, and paste this codein
gt; gt; gt;
gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; Const strRange = quot;J13:J30quot;
gt; gt; gt; Const Multiplier = 1.1
gt; gt; gt;
gt; gt; gt; If Intersect(Target, Range(strRange)) Is Nothing Then Exit Sub
gt; gt; gt;
gt; gt; gt; Application.EnableEvents = False
gt; gt; gt;
gt; gt; gt; If IsNumeric(Target.Value) Then Target.Value = Multiplier * Target.Value
gt; gt; gt;
gt; gt; gt; Application.EnableEvents = True
gt; gt; gt;
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;Humphquot; wrote:
gt; gt; gt;
gt; gt; gt; gt; Hello,
gt; gt; gt; gt; I have tried to find how to do this almost everywhere in the excel help,
gt; gt; gt; gt; internet and even questions asked in this group to no evail. Could some one
gt; gt; gt; gt; please help.
gt; gt; gt; gt; I am trying to make a work sheet where say, I put a dollar value in J13 of
gt; gt; gt; gt; $100, I would like it to automatically add 10% in the same field. I will
gt; gt; gt; gt; continue this down to J30, then make J31 Total the whole lot.
gt; gt; gt; gt; Is this possible?
gt; gt; gt; gt; Then is it possible to hyde the formula so my clients don't see the Tax value?
gt; gt; gt; gt; I really appreciate your help.
gt; gt; gt; gt; Humph