Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Ruft ab oder legt die aktuelle Dauer (in Minuten) eines Vorgangs. Nur Lesezugriff für Sammelvorgänge dar. Variant- Wert mit Lese-/Schreibzugriff.
Syntax
Ausdruck. ActualDuration
Ausdruck Eine Variable, die ein Task-Objekt darstellt.
Beispiel
Im folgenden Beispiel werden die Vorgänge des aktiven Projekts markiert, deren aktuelle Dauer eine angegebene Anzahl von Minuten überschreitet.
Sub MarkLongDurationTasks()
Dim T As Task ' Task object used in For Each loop
Dim Minutes As Long ' Duration entered by user
' Prompt user for the actual duration, in minutes.
Minutes = Val(InputBox$("Enter the actual duration, in minutes: "))
' Don't do anything if the InputBox$ was cancelled.
If Minutes = 0 Then Exit Sub
' Cycle through the tasks of the active project.
For Each T In ActiveProject.Tasks
' Mark a task if it exceeds the duration.
If T.ActualDuration > Minutes Then T.Marked = True
Next T
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.