Project () 的 Application.MakeFieldEnterprise 方法

會將本機自訂欄位新增至 Project Server，做為企業自訂欄位。

語法

expression。 MakeFieldEnterprise( _FieldID_, _FieldName_, _LookupTableName_ )

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
FieldID	必要	Long	本機自訂欄位的識別碼。 使用 FieldNameToFieldConstant 方法來取得 FieldID 引數。
FieldName	必要	String	要建立之企業自訂欄位的名稱。
LookupTableName	選用	String	要建立之查閱表格的名稱。 預設值是空字串 ("")。

傳回值

布林值

註解

當 MakeFieldEnterprise 方法成功完成時，Project 會顯示一個包含下列訊息的對話方塊：「欄位已成功加入至 Project Server。 為了在專案中檢視和使用企業欄位，您將需要結束並重新啟動 Project Professional」。

MakeFieldEnterprise 方法對應於 自訂欄位] 對話方塊中的 [ 新增欄位至企業] 命令。 只能在 Project Professional 中使用此方法。 Project Professional 必須已連線至 Project Server。

範例

若要使用下列範例，請建立一個本機自訂欄位，例如任務文字自訂欄位，並命名為 LocalWithLUT2Enterprise。 針對有包含值的自訂欄位新增查閱表格。

Sub Local2Enterprise() 
 Dim localId As Long 
 localId = FieldNameToFieldConstant(FieldName:="LocalWithLUT2Enterprise") 
 
 MakeFieldEnterprise FieldID:=localId, FieldName:="NewTaskTextFromLocal", LookupTableName:="NewTaskTextLUTFromLocal" 
End Sub

支援和意見反應

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