makro bei feld verlassen

Sub Schaltfläche1_BeiKlick()
Range("B5:AK5").Formula = "=Vlookup(B4,$B$60:$C$75,2)"
End Sub

ich will nun wenn ich z.B. das feld B4 nach einer eingabe verlasse dass er mir die prozedur "Sub Schaltfläche1_BeiKlick()" startet.
wie mache ich das?

MfG Ichselbst2