перешел на MAC а макрос не работает
из под винды макрос выглядит так
If .Address(False, False) = "C17" Then
           If IsNumeric(.Value) Then
              Application.EnableEvents = False
              Range("B17").Value = Range("B17").Value - .Value
              Application.EnableEvents = True
           End If
        End If