Files used in class with answers

Hi Julie,

I am sorry that you cannot get the functions to work.

I have tested the functions in Excel 2013 and I didn't get any errors.

If you get the message "function takes no arguments" it can have something to do with the name of the functions or which add-ins installed on your computer.

Try to copy below functions and paste the functions in Excel module in a new Excel workbook. See if you get the same error message.

Please let me know if the problem continue

Function ship(total)

ship = total * 0.14

End Function
Function disc(cust_average)

If cust_average > 20000 Then
disc = 0.08 * cust_average
ElseIf cust_average > 15000 Then
disc = 0.035 * cust_average
ElseIf cust_average > 10000 Then
disc = 0.01 * cust_average
Else
disc = 0
End If


End Function
Function NewSalary(salary, hire_date)

NewSalary= salary + (((Date - hire_date) / 365) * 150)

End Function


I hope it will work for you.


Kind regards

Jens Bonde
Microsoft Office Specialist Trainer

Tel: 0207 987 3777
Best STL - https://www.stl-training.co.uk
98%+ recommend us

London's leader with UK wide delivery in Microsoft Office training and management training to global brands, FTSE 100, SME's and the public sector

Read more: https://www.stl-training.co.uk/post-34560-formula-shows-quarters.html #ixzz2wE8kbKnu