Cant get Pass/Fail box to work

[joebox8]

Private Sub AVG_3SIGM_AfterUpdate()

If AVG_3SIGM.Value <= 17.4 Then
PASSFAIL1.Text = "Fail"
End If

End Sub

The above only works if i manually enter a value in AVG_SIGM but i want it to work when a macro (that contains formulas im using) sends the value to the text box. When i use the macro it remains blank for some reason. Any help appreciated.

 

[joebox8]

Private Sub AVG_3SIGM_AfterUpdate()

If AVG_3SIGM.Value <= 17.4 Then
PASSFAIL1.Value = "Fail"
End If

End Sub

sorry THIS is the code

 

[joebox8]

Hey never mind managed to fix it myself lol