Share via


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