Lberteh
08-16-2013, 01:59 PM
Hi all,
I've been trying to come up with a solution for this but didn't succeed so far.
I need to calculate the effective time of each activity in my company, but as we have 24 hours shift, some activities start at, for example, 23:00 and finish at 00:30. I get 22:30 as a result instead of 01:30. Here is the code.
Private Sub TextBox2_Change()
TextBox3 = Format(TimeValue(TextBox1) - TimeValue(TextBox2), "hh:nn")
If I try to change the value to 24:30 instead of 00:30 I get an error msg.
Any ideas?
I've been trying to come up with a solution for this but didn't succeed so far.
I need to calculate the effective time of each activity in my company, but as we have 24 hours shift, some activities start at, for example, 23:00 and finish at 00:30. I get 22:30 as a result instead of 01:30. Here is the code.
Private Sub TextBox2_Change()
TextBox3 = Format(TimeValue(TextBox1) - TimeValue(TextBox2), "hh:nn")
If I try to change the value to 24:30 instead of 00:30 I get an error msg.
Any ideas?