Hi,
Not an expert on macros, but using just the formulas I have got this t
work if this is what you want - it has only changed the last part o
your macro as it stood. I have just added my formula in here so don'
know if it will work or not.
If this is not working then you could delete the last section of you
macro and in cell B16 put the formula
=LEFT((C12+C15),LEN(C12)-3)&"hour
"&ROUND(((C12+C15)-(LEFT((C12+C15),LEN(C12)-3)))*60,0)&"mins"
Hope this works
Regards
Carl
Cell b11=time in
Format time format
Displayed 8:52
Cell b12= time out
Format time format
Display 12:00
Cell C12=
Formula
=IF((OR(B12="",B11="")),0,IF((B12<B11),((B12-B11)*24)+24,(B12-B11)*24))
format = 0.00_);[Red](0.00)
Display 3.13
Cell b14=time in pm
Format time format
Display 12:30
Cell b15= time out pm
Format time format
Display 17:14
Cell C15 =
Formula
=IF((OR(B15="",B14="")),0,IF((B15<B14),((B15-B14)*24)+24,(B15-B14)*24))
Display 4.73
Cell B16 = Total time worked
Formula =IF(OR(ISTEXT(C12),ISTEXT(C15)),"Error in C12 o
C15",LEFT((C12+C15),LEN(C12)-3)&"hour
"&ROUND(((C12+C15)-(LEFT((C12+C15),LEN(C12)-3)))*60,0)&"mins")
Format = general
Display = 7.8