Well that has been hard work.
But I have got it working after a fashion.
I have added an update query to reset the NewWork Assigned field.
I have also copied the Preferences Table so that it can be replaced with the original setup if required.
I will let you run the VBA code and see how much it does of what you want.




Reply With Quote