kingcashandcarry
Member
this is quite easy to run macro when cell value change
i found quite easile the code that i wrote it in sheet module
{Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Set KeyCells = Range("I1:J1")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
Call Macro4
End If
End Sub}
but in the same sheet i want this to be performed for 2 other cases
range g1 to run macro 5
and range g2 to run macro 6
i copy paste the code and made the changes but didn't worked
what is the wrong?
i found quite easile the code that i wrote it in sheet module
{Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Set KeyCells = Range("I1:J1")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
Call Macro4
End If
End Sub}
but in the same sheet i want this to be performed for 2 other cases
range g1 to run macro 5
and range g2 to run macro 6
i copy paste the code and made the changes but didn't worked
what is the wrong?