FreeSlack Property
Returns the free slack for a task in minutes. Read-only Variant.
Example
The following example eliminates free slack in the active project by changing the start dates of tasks with free slack.
Sub EliminateFreeSlack()
Dim T As Task ' Task object used in For Each loop
For Each T In ActiveProject.Tasks
If T.FreeSlack > 0 Then
T.Start = Application.DateAdd(T.Start, T.FreeSlack)
End If
Next T
End Sub
Applies to | Task Object, Tasks Collection Object
See Also | Critical Property | Delay Property | FinishSlack Property | StartSlack Property | TotalSlack Property