Vba selection change

[mahmed1]

Hi,

How can i fire a macro on a sheet when a cell is changed?
in my case each time cell b5 is change i need to fire this macro.
Thank you

 

[JoeMo]

Put this in a module for the sheet. Right-click the sheet tab, choose 'View Code' and copy/paste the code below into the white space.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, [B1]) Is Nothing Then
    MsgBox "Cell B1 was changed" ' here you can call the macro you want to fire 
End If
End Sub

 

[mahmed1]

Thank u
why did we need the target.count > 1?
cheers

 

[jeffreybrown]

Try

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B5")) Is Nothing Then
    "Your Code
End If
End Sub

 

[jeffreybrown]

Its just ensuring only one cell has been selected.

 

[JoeMo]

Thank u
why did we need the target.count > 1?
cheers

Suppose a range like A5:C5 is selected and the change is made to A5 only, then do you want the macro to fire? I assumed not so limited the change to a single cell which has to be B5.