VBA for filtering data between sheets

Need:
1. Update tabs based on current shift.
a. Ex. PROD A-1 & PROD A-2 employees and data will copy over to PROD A tab.
i. I would like to separate the A-1 and A-2 employees and have a total line for each subshift.
b. I am wanting to duplicate this process for each shift and subshift.
c. My biggest need and also what may be making this more difficult is that I need the sub tabs (PROD A, PROD B, etc) to update from FT ACTIVE ROSTER and would also like to update FT ACTIVE ROSTER from data gathered in the PROD A,
PROD B, etc tabs)
d. I will not include status “INACTIVE” employees into the shift folders
ROSTER SETUP.png

2. I would also like to use the “RED SCREEN DATA” tab to automatically pull data for employees that have a “YES’ under the “RED SCREEN” column F on the ACTIVE ROSTER. I am also hoping to have the data update from either tab on this as well. The Notes are often updated and I would like that to be viewed from either the ACTIVE ROSTER or the CURRENT SHIFT TABS. I will often change the employees STATUS during meetings and that it would help a lot if the employee and there data would move to their new assignment when that happens.

RED SCREEN.png

This iteration includes the following three sets of code:

This first code is executed for the active_roster tab and populates all the shift tabs. I expect that after any changes are executed on any tab, that the update button be pressed to record those changes. To disperse the changes to all the shift and red tabs, the active_roster update should then be depressed.

Please Login or Register  to view this content.

This code is in each of the 12 shift sheet modules and updates a row when there is a change in that row with the number 2:

Please Login or Register  to view this content.

This third code is in the main module and is duplicated for each of the 12 shift tabs. It looks for the value 2 and if it finds it then either adds the row or updates changes to the row over into the active_roster tab.

Please Login or Register  to view this content.

Let us know if you have any questions.

Thank you,

That works perfectly. Is there a way to modify the border of the areas that data is in, just to black outline each sheets data? I was also wondering if there is a way to move any employee listed as a new hire to the hired_on sheet and place them under the correct team name. There could be multiple people hired on the same shift group, so it would need to expand rows if that happened.

again, thank you so much for this.


Adam

Added this code to be called by the active_roster button to update the Hired sheet. Let us know how it works.

Please Login or Register  to view this content.

maniacb you have helped me so much with this. This is exactly what I was hoping it would do. I have a few other small things that I would like to do, but I am new to this work location and want to make sure that I get it right.

Thank you!

Adam

Updated Employees, just a couple fixes.

I updated the shift tab code and renamed headers in the Hire On tab. try it now

Please Login or Register  to view this content.

fixed error where more than one name addition to shift tabs were not populating correctly

Please Login or Register  to view this content.

Everything is working very good! Thank you. I did mess up and left 3-B PROD and 3-B LOG off the Hired_On tab. They were blacked out on the original spreadsheet that I sent.

I was also wondering about the possibility of adding a new column to the ACTIVE_ROSTER between STATUS and Notes? I forgot to add "Need to Replace" If that could also be added to all the PROD and LOG tabs so that the info could be updated back and forth that would be awesome.


Thank you so much!


Adam

Give this change update a try. Column added and code updated

Good Morning maniacb,

I noticed that when I am updating from the Red Screen tab that I am getting a VBA error. I tried to update John Ousley's note section via the Red Screen tab and that is when I got the error. It is looking good other than that so far.

Thank you,

Adam Newton

I was also wondering if there is a way to make the notes section automatically "wrap text" so that the notes will all show up on all the tabs.

Thanks again,

Adam Newton

I am getting a VB error when updating from the ACTIVE_ROSTER tab.

Thanks in advance,

Adam

There was a sheet added without an underscore in the name. Delete sheet1 or rename the sheet with an underscore. See post number 2

Thank you. I couldn't figure out what happened there.