VBA to tabulate by different statuses and shifts

Hello All

Attached is a sample of an employee database that I'm trying to get tallies from.

The "Data Input" tab in the sample has two columns (but three pieces of information) I need to work with to get the info to the "Results" tab. (IN REALITY the employee list will be about 2500 people).

I'd like it to tally the total number of people in each work department. The numbers 1,2,3 in the work dept column, after the actual job listing (which are copied from another program into Excel) represent the shift number. They are always at the end of the work department.

Secondly, (but third piece of info) I would like have the results sorted with active employees (those that aren't on LOA) and also the total WITH people on LOA (hence the two different tables in the "Results" tab). Any leave ALWAYS starts with "LOA" so it can disregard what comes after those three letters, but still count them in "Total" results on the "Results" tab.

Is this possible? If so, how can I achieve this?

Thanks for any help!

title updated....