VBA insert formula & SUM negative time format problem

[Lukael]

Hi,

I have workbook for monthly work schedules. It should calculate working time of each employee, but It's not working - problems are negative times.

I calculate times in range (E6:BM6)+BO5 in cell D6, and then SUM that time with D1 in cell A1 (employee working hours of month).

BO5 is actually transferred SUM of working hours from previous months (SUM in A1), which is in my workbook included after sheet called January. Everything works fine if times are positive, but employee can also work less hour in month that he should - so in that case negative time should be displayed & calculated in SUM.

I allready have formula for A1 which displays negative time as Text, but when that negative Text is inserted in BO5, I get #VALUE error in A1 and D1.

Tried with this formula in D1 :

Please Login or Register  to view this content.

Also, this problem:

Please Login or Register  to view this content.

This code is inside macro "Create_months" and It should insert formula in column under "Transfer" text. On sheet 1 that is column BO, but when new months are created, column is not the same anymore as number of days in months are different, so I want to insert formula correctly in all months (in column under "Transfer" text, row 5).

Please see attached workbook - focus on cell A1, D1 and row 5 under "Transfer" (BO5 in Sheet 1), and run Cmdbutton "Run!", I hope then you'll understand what I want !

Any help much appreciated, thanks in advance !