Task.StartVariance property (Project)

Ruft die Varianz (in Minuten) zwischen dem geplanten Anfangstermin und das Startdatum des Vorgangs ab. Schreibgeschützter Variant-Wert.

Syntax

Ausdruck. StartVariance

Ausdruck Eine Variable, die ein Task-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird die Anzahl der verspätet angefangenen Vorgänge mit den Vorgangsnamen im aktiven Projekt angezeigt.

Sub CountLateTasks() 
 
 Dim t As Task 
 Dim numLateTasks As Long 
 Dim lateTasks As String 
 Dim daysLate As Single 
 
 numLateTasks = 0 
 
 ' Look for late tasks in the active project. 
 For Each t In ActiveProject.Tasks 
 If t.BaselineStart < ActiveProject.CurrentDate And t.StartVariance > 0 Then 
 numLateTasks = numLateTasks + 1 
 daysLate = Round(t.StartVariance / 1440, 1) 
 lateTasks = lateTasks & vbCrLf & vbTab & t.Name _ 
 & ": " & daysLate & " days" 
 End If 
 Next t 
 
 MsgBox "There are " & numLateTasks & " late tasks in this project: " & lateTasks 
 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.