AfterUpdate Code to Subtract Column (L) from (G)
Hi
It should work if your code is placed in the code sheet for ThisWorkbook. But only for changes in L2. As I suppose you only want this function on one sheet, I suggest you use a Worksheet_Change event, which is to be placed in the code sheet for the desired worksheet. The solution below work on changes in L2:L100: Private Sub Worksheet_Change(ByVal Target As Range) Set isect = Intersect(Target, Range("L2:L100")) If Not isect Is Nothing Then TargetRow = Target.Row Range("G" & TargetRow) = Range("G" & TargetRow) - Range("L" & TargetRow) End If End Sub Hopes this helps. --- Per "jlig" <u52556@uwe skrev i meddelelsen news:9786d51c99e8b@uwe... - Column L is the sold column. - Column G is the Remaining Qty in Stock. - When the value in L is typed in, I need the value in G (Qty in Stock) to lower by that L value I need this Code to run "after" the user types in the L value and hits "Enter" or "Arrow Down" I have tried this, but it does nothing at all? ----------------------------------------------------------- Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Address = "$L$2" Then Range("G2") = Range("G2") - Range("L2") End If End Sub ---------------------------------------------------------- Thanks, jlig |
All times are GMT +1. The time now is 12:47 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com