Reducing over many cells

Hi,

I have a problem with my code. Maybe somebody can help me.

I have 9 worksheets for every department of my company.
Every department has an own overtime sheet, the overtime is sorted by month and worker (Worker 1´s overtime is starting E5 (overtime 2016) to R5 (december 2017)).

The foremen writes freetime in Column "D". This freetime reduces the overtime (starting with E5). If e5 ist "0", the rest of the freetime reduces "F5" etc.

Example:
Worker 1 has 400 hours overtime in 2016, 20 in january 2017, 32 in february 2017....
foreman 2 writes 60 hours reducing freetime in "D5" = 340 hours overtime in 2016 for worker 1.
Worker 3 has 20 hours overtime in 2016, 20 hours in january 2017. etc.
Foreman 4 writes 30 hours reducing freetime in "d6" = 0 hours overtime left in 2016, 10 left in january 2017, etc.
Column "d" is emty after complete reduced.

My code has an error. It does not work.
Can you tell me where?
Thanks for your help.
Ben

Please Login or Register  to view this content.

Code Tags Added
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html



(I have added them for you today. Please take a few minutes to read all Forum Rules and comply in the future.)