Macro to Convert Time Format and Filter Into Columns By Time

Hello,

I'm looking for some assistance in using vba to convert the format of time in a column from standard to military timing.

Background
In the attached document 'Activity Detail' the time I'm looking to be converting is in Column P 'Time Submitted'. The current VBA I use is in the attached file 'SOD Reporting'. I copy and paste activity detail into cell A1 of 'SOD I Reporting' then hit unique contacts button to get my results. I received a lot of help with this but now I'm looking to expand it and will need some more assistance.

Next Steps
I would like to add the following columns based on the 'Time Submitted' and 'Form Name' columns in the 'Activity Detail document'

which require analysis of the data.
Knocks by 1PM
-Count of 'Form Name' up to 1pm
Knocks by 3pm
-Count of 'Form Name' up to 3pm
Knocks by 5pm
-Count of 'Form Name' up to 5pm
Knocks after 5pm
-Count of 'Form Name' after 5pm
Knocks by 7pm
-Count of 'Form Name' after 7pm
Knocks by after 7pm
-Count of 'Form Name' after 7pm

Here is my current code:

Please Login or Register  to view this content.

Any assistance would be greatly appreciated.

Thank You