Task.ActualOvertimeWork property (Project)
Ruft die aktuelle Überstundenarbeit Arbeit (in Minuten) für einen Vorgang. Schreibgeschützter Variant-Wert.
Syntax
Ausdruck. ActualOvertimeWork
Ausdruck Eine Variable, die ein Task-Objekt darstellt.
Beispiel
Im folgenden Beispiel werden die Überstundenkosten dargestellt, indem die Gesamtkosten von Vorgängen mit Überstundenarbeit berechnet werden. Dabei werden auch die individuellen Kosten nach Vorgang aufgeschlüsselt.
Sub PriceOfOvertime()
Dim T As Task
Dim Price As Variant
Dim Breakdown As String
For Each T In ActiveProject.Tasks
If Not (T Is Nothing) Then
If T.ActualOvertimeWork <> 0 Then
Price = Price + T.ActualOvertimeCost
Breakdown = Breakdown & T.Name & ": " & _
ActiveProject.CurrencySymbol & _
T.ActualOvertimeCost & vbCrLf
End If
End If
Next T
If Breakdown <> "" Then
MsgBox Breakdown & vbCrLf & "Total: " & _
ActiveProject.CurrencySymbol & Price
End If
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für