Change cell value and macro runs

Are you asking how to make a change if the target is cell B4?

If so, try this code:

If Target.Address = "$B$4"

Otherwise, I'm not sure what you are asking.