running some VBA code in response to data entered in a cell
hello again
Can anyone tell me if it is possible to trigger some VBA code when a number entered in a particular cell on a worksheet is less than the number in another cell?. I dont know if cells have events linked to them such as mouse down etc Thanks Ian |
running some VBA code in response to data entered in a cell
Mantrid
You could use the worksheet_change event like so. Checks a value in A1 and if below 10 it colours B1 red Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("A1")) Is Nothing Then If Target.Value < 10 Then Target.Offset(0, 1).Interior.Color = RGB(255, 0, 0) Else Target.Offset(0, 1).Interior.ColorIndex = xlNone End If End If End Sub To install right-click the sheet tab and select 'view code...' -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England DTHIS web: www.nickhodge.co.uk blog: www.nickhodge.co.uk/blog/ FREE UK OFFICE USER GROUP MEETING, MS READING, 27th APRIL 2007 www.officeusergroup.co.uk "mantrid" wrote in message ... hello again Can anyone tell me if it is possible to trigger some VBA code when a number entered in a particular cell on a worksheet is less than the number in another cell?. I dont know if cells have events linked to them such as mouse down etc Thanks Ian |
running some VBA code in response to data entered in a cell
Thanks again Nick
I think that is the kind of think I need. I will have a play and see if I can get it to do what I need. Ian "Nick Hodge" wrote in message ... Mantrid You could use the worksheet_change event like so. Checks a value in A1 and if below 10 it colours B1 red Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("A1")) Is Nothing Then If Target.Value < 10 Then Target.Offset(0, 1).Interior.Color = RGB(255, 0, 0) Else Target.Offset(0, 1).Interior.ColorIndex = xlNone End If End If End Sub To install right-click the sheet tab and select 'view code...' -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England DTHIS web: www.nickhodge.co.uk blog: www.nickhodge.co.uk/blog/ FREE UK OFFICE USER GROUP MEETING, MS READING, 27th APRIL 2007 www.officeusergroup.co.uk "mantrid" wrote in message ... hello again Can anyone tell me if it is possible to trigger some VBA code when a number entered in a particular cell on a worksheet is less than the number in another cell?. I dont know if cells have events linked to them such as mouse down etc Thanks Ian |
All times are GMT +1. The time now is 04:03 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com