VBA VBA VBA

Q5. (15 points) in Module Q5, write a function procedure named SumInteger Fn. It has one argument named num with Double data type. The argument value must be positive. This function returns a summation of all the positive integers up to the argument value. If the argument is non-positive, the function returns an error message "Please enter a positive number.". For example, if the user enters formula "=SumIntegerFn (4.6) " in a cell, the returned value is 1+2+3+4=10