Partager via


Méthode Application.MakeFieldEnterprise (Project)

Ajoute un champ personnalisé local à Project Server sous la forme d’un champ personnalisé d’entreprise.

Syntaxe

expression. MakeFieldEnterprise( _FieldID_, _FieldName_, _LookupTableName_ )

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
FieldID Obligatoire Long Numéro d’identification du champ personnalisé local. Utilisez la méthode FieldNameToFieldConstant pour obtenir l’argument FieldID.
FieldName Requis String Nom du champ personnalisé d’entreprise à créer.
LookupTableName Facultatif String Nom de la table de choix à créer. La valeur par défaut est une chaîne vide ("").

Valeur renvoyée

Boolean

Remarques

Lorsque la méthode MakeFieldEnterprise se termine correctement, Project affiche une boîte de dialogue avec le message « Le champ a été correctement ajouté à Project Server. Pour afficher et utiliser le champ d’entreprise dans le projet, vous devez quitter et redémarrer Project Professionnel. »

La méthode MakeFieldEnterprise correspond à la commande Ajouter le champ à l’entreprise de la boîte de dialogue Champs personnalisés. Cette méthode est disponible uniquement dans Project Professional. Project Professional doit être connecté à Project Server.

Exemple

Pour utiliser l’exemple suivant, créez un champ personnalisé local, tel qu’un champ personnalisé de texte de tâche, nommé LocalWithLUT2Enterprise. Ajoutez une table de recherche pour le champ personnalisé qui a des valeurs.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.