Application.MakeFieldEnterprise method (Project)

Adds a local custom field to Project Server as an enterprise custom field.

Syntax

expression. MakeFieldEnterprise( _FieldID_, _FieldName_, _LookupTableName_ )

expression A variable that represents an Application object.

Parameters

Name	Required/Optional	Data type	Description
FieldID	Required	Long	Identification number of the local custom field. Use the FieldNameToFieldConstant method to get the FieldID argument.
FieldName	Required	String	Name of the enterprise custom field to create.
LookupTableName	Optional	String	Name of the lookup table to create. The default value is an empty string ("").

Return value

Boolean

Remarks

When the MakeFieldEnterprise method completes successfully, Project shows a dialog box with the message, "The field was successfully added to Project Server. In order to view and use the enterprise field in the project, you will need to quit and restart Project Professional."

The MakeFieldEnterprise method corresponds to the Add Field to Enterprise command in the Custom Fields dialog box. The method is available only in Project Professional. Project Professional must be connected to Project Server.

Example

To use the following example, create a local custom field, such as a task text custom field, named LocalWithLUT2Enterprise. Add a lookup table for the custom field that has some values.

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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.