One Final test of your "Bonus" code, Run the sub and input an Absent value greater than the Overtime value.
In the next assignment's code, give n a value of 32767 + 1 and run it. 
See my post # 4 above
For a simple incrementing loop like that use
For i = 1 to n
'
'
'
Next i
You can format your code here by using the # Icon on the VBAExpress Message Editor menu.
- Copy your code from the VBA editor, Click the Icon and press Ctrl+V to paste between the CODE Tags.
- Type or paste the Code into the VBAExpress Editor, Select the code, then click the icon to put them around the selected Text.
- Manually type the Code Tags where they belong The Closing CODE Tag is "[/Code]" and the Opening Tag is "[Code]". They are not Case Sensitive. Put them in order and every thing between them is in a Block and nicely formatted as VBA Code with Indents and Colors
I edited your post to put CODE Tags around your code , but next time you will have to do it yourself