If a cells value is greater or less than the value of another cell then run macros

Maybe:

If Not Intersect(Target, Range("A6")) Is Nothing Then
      On Error Resume Next
      Application.EnableEvents = False
      If Target.Value > Range("E7").Value Then Call Macro1
      If Target.Value < Range("E7").Value Then Call Macro2
      Application.EnableEvents = True
   End If
End Sub