共用方式為


Task.RemainingOvertimeCost 屬性 (Project)

取得任務的剩餘加班成本。 唯讀 Variant

語法

expressionRemainingOvertimeCost

表達 代表 Task 物件的變數。

範例

下面範例會傳回使用中專案之每一項任務的剩餘加班成本。

Sub ReturnOvertimeCost() 
 Dim T As Task ' Task object used in For Each loop 
 Dim Results As String 
 
 For Each T In ActiveProject.Tasks 
 Results = Results & T.Name & ": " & ActiveProject.CurrencySymbol & _ 
 T.RemainingOvertimeCost & ListSeparator & " " 
 Next T 
 
 Results = Left$(Results, Len(Results) - Len(ListSeparator & " ")) 
 
 MsgBox Results 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應