Hi there,
Not sure if this is the wrong location, hopefully not.
I have two custom fields for Date1 and Date3 which represent dates of calibration for a resource (instrumentation, and devices) I'm trying to generate a macro that automatically inputs these two dates as the start and end date for a resource's exception, therefore blocking the device.
This macro would then run for all resources in the list, acting as a master resource pool for our instruments and devices.
the code i've been able to make is below, but it gives an 1101 runtime error, saying the number of implied occurances from this exception's configuration is too large. I know this should be a relatively simple macro to write, but i'm completely lost in the syntax, and can't see the error when using MSProject.
Sub Macro1() Dim R As Resource For Each R In ActiveProject.Resources ActiveProject.Resources(R).Calendar.Exceptions.Add Type:=1, Start:=R.Date1, Finish:=R.Date3, Name:="Calibration" Next R End Sub
Thanks for your help!