Pop up messages when many programs are executed in VBA PowerPoint

[CuriosityBug]

is it possible to do something like:

Function Apple() As Variant
    --code--
    'If code runs well then it is successful. if error comes it is " failed". 
    If code = successful Then
        Apple = True
    Else
        Apple = False ' when error occurred anywhere in the code
    End If
End Function

what if the code doesn't have IF condition to compare anything with. Here the comparison is whole code executed. Not sure if this practical. Any insights which can guide me.