Task.GetField 方法 (Project)

會傳回指定之任務自訂欄位的值。

語法

expression。 GetField( _FieldID_ )

表達 代表 Task 物件的變數。

參數

名稱	必要/選用	資料類型	描述
FieldID	必要	Long	為本機自訂欄位可以是 PjField 常數的任務] 自訂欄位。 企業自訂欄位，使用 FieldNameToFieldConstant 方法來取得 FieldID。

傳回值

字串

註解

如果任務自訂欄位是一個估計工期，所傳回的值也會包含表示估計值的字元。

您可以透過 ProjectSummaryTask 屬性來存取專案自訂欄位。

範例

下列範例會使用 SetField 方法和 GetField 方法，搭配 FieldNameToFieldConstant 方法及 FieldConstantToFieldName 方法：

1. 若要使用範例，請使用 Project Web App 來建立名為 TestEntProjText 的企業專案文字自訂欄位。

2. 以重新啟動 Project Professional 的 Project Server 設定檔，使其包含新的自訂欄位。

3. 使用 [專案資訊] 對話方塊，建立一個專案並為 TestEntProjText 欄位設定某值。

4. TestEnterpriseProjectCF 巨集會使用 FieldNameToFieldConstant 方法來尋找 projectfield 數字，例如，190873618。

5. 巨集會使用 GetField 方法，在訊息方塊中顯示數字和文字值。

6. 巨集會使用 FieldConstantToFieldName 方法來取得欄位名稱、 使用 SetField 方法，來設定新的值，然後另一個訊息方塊中顯示的欄位名稱和新的值。

Sub TestEnterpriseProjectCF() 
    Dim projectField As Long 
    Dim projectFieldName As String 
    Dim message As String 
 
    projectField = FieldNameToFieldConstant("TestEntProjText", pjProject) 
 
    ' Show the enterprise project field number and old value. 
    message = "Enterprise project field number: " & projectField & vbCrLf 
    MsgBox message & ActiveProject.ProjectSummaryTask.GetField(projectField) 
 
    ActiveProject.ProjectSummaryTask.SetField FieldID:=projectField, Value:="This is a new value." 
 
    ' For a demonstration, get the field name from the field number, and verify the new value. 
    projectFieldName = FieldConstantToFieldName(projectField) 
    message = "New value for field: " & projectFieldName & vbCrLf 
    MsgBox message & ActiveProject.ProjectSummaryTask.GetField(projectField) 
End Sub

支援和意見反應

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