![]() After the code ran through, you can go to column "Text10" and filter the "Yes". If ProjTask3.Start < (DateValue(Deadline) + TimeValue(Deadline)) Thenīecause it contains 3 for-loops I tried to minimise the number of tasks, that are looped over.īecause I can see when my target task ends ( Deadline), I do not loop over tasks which have a beginning time after the end time of my target task.īe careful, that code takes some time to run through. PredArray() = Split(ProjTask2.Predecessors, " ") If ProjTask2.Start < (DateValue(Deadline) + TimeValue(Deadline)) Then If ProjTask.Start <</a> (DateValue(Deadline) + TimeValue(Deadline)) Then So here comes the main part of my code: For Each ProjTask In ProjTasks
My code flags all the predecessors with a simple "Yes" in the Projects Field "Text10" (you can use any other Text field), and then I filter all the tasks with the "Yes". I found a solution with the help of google.
0 Comments
Leave a Reply. |