VBA Code s not working even though the sum of filtered values are equal to 0.