Replace count totals

P

Panoos64

Well-known Member
Joined
Mar 1, 2014
Messages
890
Hi all, i would like to write a vba code in order to replace the count total in col. "P" so that where employees working hours are more than 4:51 should count 1 and where is less to 4:50 should count 0.50 (half). In my below extract the "2065 Count Total" should be 19.50.
Thanking you in advance



<tbody>
[TD="align: center"][/TD]
[TD="class: xl81, width: 87, align: center"]A[/TD]
[TD="class: xl81, width: 113, align: center"]B[/TD]
[TD="class: xl81, width: 95, align: center"]C[/TD]
[TD="class: xl81, width: 84, align: center"]D[/TD]
[TD="class: xl81, width: 63, align: center"]E[/TD]
[TD="class: xl81, width: 1, align: center"]O[/TD]
[TD="class: xl81, width: 72, align: center"]P[/TD]

[TD="align: center"]1[/TD]
[TD="class: xl69, align: center"]I.D.[/TD]
[TD="class: xl69, align: center"]Name[/TD]
[TD="class: xl69, align: center"]Date[/TD]
[TD="class: xl69, align: center"]IN[/TD]
[TD="class: xl69, align: center"]OUT[/TD]
[TD="class: xl69, align: center"][/TD]
[TD="class: xl75, align: center"]Total Time[/TD]

[TD="align: center"]2[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]1/11/2017[/TD]
[TD="class: xl67, align: center"]7:45:20[/TD]
[TD="class: xl67, align: center"]17:43:31[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:58[/TD]

[TD="align: center"]3[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]2/11/2017[/TD]
[TD="class: xl67, align: center"]7:46:06[/TD]
[TD="class: xl67, align: center"]18:01:07[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]10:15[/TD]

[TD="align: center"]4[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]3/11/2017[/TD]
[TD="class: xl67, align: center"]7:57:06[/TD]
[TD="class: xl67, align: center"]18:11:06[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]10:14[/TD]

[TD="align: center"]5[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]4/11/2017[/TD]
[TD="class: xl67, align: center"]7:46:34[/TD]
[TD="class: xl67, align: center"]16:25:49[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]8:39[/TD]

[TD="align: center"]6[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]6/11/2017[/TD]
[TD="class: xl67, align: center"]7:39:45[/TD]
[TD="class: xl67, align: center"]11:30:20[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl77, align: center"]3:91[/TD]

[TD="align: center"]7[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]7/11/2017[/TD]
[TD="class: xl67, align: center"]7:45:18[/TD]
[TD="class: xl67, align: center"]17:43:49[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:58[/TD]

[TD="align: center"]8[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]8/11/2017[/TD]
[TD="class: xl67, align: center"]7:43:07[/TD]
[TD="class: xl67, align: center"]17:26:02[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:43[/TD]

[TD="align: center"]9[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]14/11/2017[/TD]
[TD="class: xl67, align: center"]7:43:54[/TD]
[TD="class: xl67, align: center"]17:54:35[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]10:11[/TD]

[TD="align: center"]10[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]15/11/2017[/TD]
[TD="class: xl67, align: center"]8:11:19[/TD]
[TD="class: xl67, align: center"]16:50:17[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]8:39[/TD]

[TD="align: center"]11[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]16/11/2017[/TD]
[TD="class: xl67, align: center"]7:55:30[/TD]
[TD="class: xl67, align: center"]17:29:32[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:34[/TD]

[TD="align: center"]12[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]17/11/2017[/TD]
[TD="class: xl67, align: center"]7:43:36[/TD]
[TD="class: xl67, align: center"]12:30:20[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl77, align: center"]4:87[/TD]

[TD="align: center"]13[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]20/11/2017[/TD]
[TD="class: xl67, align: center"]7:43:31[/TD]
[TD="class: xl67, align: center"]17:04:09[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:21[/TD]

[TD="align: center"]14[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]21/11/2017[/TD]
[TD="class: xl67, align: center"]7:40:08[/TD]
[TD="class: xl67, align: center"]16:41:41[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:01[/TD]

[TD="align: center"]15[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]22/11/2017[/TD]
[TD="class: xl67, align: center"]7:41:35[/TD]
[TD="class: xl67, align: center"]17:20:32[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:39[/TD]

[TD="align: center"]16[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]23/11/2017[/TD]
[TD="class: xl67, align: center"]7:39:23[/TD]
[TD="class: xl67, align: center"]17:02:59[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:23[/TD]

[TD="align: center"]17[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]24/11/2017[/TD]
[TD="class: xl67, align: center"]7:44:40[/TD]
[TD="class: xl67, align: center"]16:45:47[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:01[/TD]

[TD="align: center"]18[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]27/11/2017[/TD]
[TD="class: xl67, align: center"]7:43:02[/TD]
[TD="class: xl67, align: center"]16:52:56[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:09[/TD]

[TD="align: center"]19[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]28/11/2017[/TD]
[TD="class: xl67, align: center"]7:50:06[/TD]
[TD="class: xl67, align: center"]17:39:08[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:49[/TD]

[TD="align: center"]20[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]29/11/2017[/TD]
[TD="class: xl67, align: center"]7:42:02[/TD]
[TD="class: xl67, align: center"]17:16:47[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]9:34[/TD]

[TD="align: center"]21[/TD]
[TD="class: xl65, align: center"]2065[/TD]
[TD="class: xl65, align: center"]EMPL. 2065[/TD]
[TD="class: xl66, align: center"]30/11/2017[/TD]
[TD="class: xl67, align: center"]9:06:36[/TD]
[TD="class: xl67, align: center"]17:30:12[/TD]
[TD="class: xl68, align: center"][/TD]
[TD="class: xl76, align: center"]8:24[/TD]

[TD="align: center"]22[/TD]
[TD="class: xl74, align: center"]2065 Count[/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl72, align: center"][/TD]
[TD="class: xl73, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl78, align: center"]20[/TD]

[TD="align: center"]23[/TD]
[TD="class: xl70, align: center"]2065 Total[/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl72, align: center"][/TD]
[TD="class: xl73, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl79, align: center"][/TD]

[TD="align: center"]24[/TD]
[TD="class: xl70, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl72, align: center"][/TD]
[TD="class: xl73, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl71, align: center"][/TD]
[TD="class: xl79, align: center"][/TD]

[TD="align: center"]25[/TD]
[TD="class: xl65, align: center"]2088[/TD]
[TD="class: xl65, align: center"]EMPL. 2088[/TD]
[TD="class: xl66, align: center"]7/11/2017[/TD]
[TD="class: xl67, align: center"]8:59:22[/TD]
[TD="class: xl67, align: center"]17:47:46[/TD]
[TD="class: xl65, align: center"][/TD]
[TD="class: xl76, align: center"]8:48[/TD]

</tbody>
 

Excel Facts

Create a chart in one keystroke
Select the data and press Alt+F1 to insert a default chart. You can change the default chart to any chart type
Sort by date Sort by votes
Row 6 3:50 0.5
Row 12 4:46 0.5

2065 total sum 19

I'm using this formula

Code: 
[COLOR=#0000cd]=IF(((E2-D2)*1440)>=291,1,0.5)[/COLOR]
 
Upvote 0
Hi Ihart,
Thank you for your support. The above formula works but can u explain me whats the mean of the numbers 1440 & 291? I know that the working monthly hours should be 173.33. However thanks once again for your help. Have a nice day
 
Upvote 0
Those numbers I use to convert time value to decimal value.
1440 is from minutes in 1 day (24 hours * 60 minutes )
291 is from 4:51 * 1440

Sorry about my english.
 
Upvote 0
Hi lhart, Thank you so much for explanation. Just i wanted to see the logic of the formula.
I understand you very well and so do not worry about English. I am so glad, that you help me and you resolve my problem. It was very kind of you.
All the best to you!
 
Upvote 0
You must log in or register to reply here.

Similar threads

A
  • Solved
Count entry by time
Replies
3
Views
194
admvlad
A
Kellie220
  • Question Question
VBA to Collapse Rows (3 part question)
Replies
1
Views
272
Artik
Artik
S
  • Solved
Individual Ranking
2
Replies
11
Views
455
sksanjeev786
S
D
  • Question Question
Locate first instance of all dates in a column and hide all remaining rows
Replies
4
Views
83
Peter_SSs
Peter_SSs
D
  • Question Question
Formula help needed for working with days and times.
Replies
0
Views
319
dshtesy
D

Forum statistics

Threads
1,223,911
Messages
6,175,323
Members
452,635
Latest member
laura12345

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top