Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
evnet code, checking for entry
i would like to write a view code that if someone edits a formula in column
AC, the macro copies that formula to 3 different cells on that line. assumptios: column AC is called "tot_dollars" currently cell AC10= ac11+ac12. lets say the user edits this formula to ac10=ac11+ac13. i want the macro to automatically recognize that the user modified the formula and to copy/pastespecial/formulas that new formula to three different cells on that line (ad10, bb10 and cc10) help? I did start with this sentence but ran into trouble when i deleted a row as it triggered the event. technically i didn't enter or modify anything in "Tot dollars" but by deleting it it considers it an event? If Intersect(Target, Range("tot_dollars")) Is Nothing Then exit sub thanks in advanace, Tami |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
evnet code, checking for entry
still having the problem i mentioned below about deleting lines.
if i delete a line within the target range, it triggers the event and technically i don't have any formula to copy over. suggestions? can the event be more specific, like cell contents have been modified? in order to avoid deletions? "Don Guillett" wrote: Right click sheet tabview code insert this. Modify to suit. I would imagine you want to restrict to a cell or range. Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("I8:I10")) Is Nothing Then Exit Sub Range("h1,j4,k6").Formula = Target.Formula End Sub -- Don Guillett Microsoft MVP Excel SalesAid Software "Tami" wrote in message ... i would like to write a view code that if someone edits a formula in column AC, the macro copies that formula to 3 different cells on that line. assumptios: column AC is called "tot_dollars" currently cell AC10= ac11+ac12. lets say the user edits this formula to ac10=ac11+ac13. i want the macro to automatically recognize that the user modified the formula and to copy/pastespecial/formulas that new formula to three different cells on that line (ad10, bb10 and cc10) help? I did start with this sentence but ran into trouble when i deleted a row as it triggered the event. technically i didn't enter or modify anything in "Tot dollars" but by deleting it it considers it an event? If Intersect(Target, Range("tot_dollars")) Is Nothing Then exit sub thanks in advanace, Tami . |
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
evnet code, checking for entry
If desired, send your file to my address below. I will only look if:
1. You send a copy of this message on an inserted sheet 2. You give me the newsgroup and the subject line 3. You send a clear explanation of what you want 4. You send before/after examples and expected results. -- Don Guillett Microsoft MVP Excel SalesAid Software "Tami" wrote in message ... still having the problem i mentioned below about deleting lines. if i delete a line within the target range, it triggers the event and technically i don't have any formula to copy over. suggestions? can the event be more specific, like cell contents have been modified? in order to avoid deletions? "Don Guillett" wrote: Right click sheet tabview code insert this. Modify to suit. I would imagine you want to restrict to a cell or range. Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("I8:I10")) Is Nothing Then Exit Sub Range("h1,j4,k6").Formula = Target.Formula End Sub -- Don Guillett Microsoft MVP Excel SalesAid Software "Tami" wrote in message ... i would like to write a view code that if someone edits a formula in column AC, the macro copies that formula to 3 different cells on that line. assumptios: column AC is called "tot_dollars" currently cell AC10= ac11+ac12. lets say the user edits this formula to ac10=ac11+ac13. i want the macro to automatically recognize that the user modified the formula and to copy/pastespecial/formulas that new formula to three different cells on that line (ad10, bb10 and cc10) help? I did start with this sentence but ran into trouble when i deleted a row as it triggered the event. technically i didn't enter or modify anything in "Tot dollars" but by deleting it it considers it an event? If Intersect(Target, Range("tot_dollars")) Is Nothing Then exit sub thanks in advanace, Tami . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Checking and Unchecking CheckBoxes in code | Excel Discussion (Misc queries) | |||
Color Code Date Checking | Excel Worksheet Functions | |||
Checking & Forcing Data Entry in Cells | Excel Discussion (Misc queries) | |||
Checking if a cell entry is correct before adding it to another | Excel Worksheet Functions | |||
zip code entry | Excel Worksheet Functions |