Partager via


Méthode Application.MakeLocalCalendarEnterprise (Project)

Convertit un calendrier local en calendrier d’entreprise.

Syntaxe

expression. MakeLocalCalendarEnterprise( _OldName_, _NewName_ )

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
OldName Facultatif String Nom du calendrier local.
Newname Facultatif String Nom du calendrier Entreprise.

Valeur renvoyée

Boolean

Remarques

Le paramètre NewName n’est pas utilisé. Par exemple, si un calendrier local est nommé « TestCal » et que vous exécutez le code MakeLocalCalendarEnterprise OldName:="TestCal", NewName:="New TestCal" , le résultat est un calendrier d’entreprise nommé « TestCal ».

Pour créer un calendrier local lorsqu’une session de Project Professional est ouverte dans Project Server, activez l’option Permettre aux projets d’utiliser les calendriers de base locaux sur la page Paramètres serveur supplémentaires de Project Web Access. Après avoir modifié la configuration dans Project Web Access, redémarrez Project Professional.

Exemple

L’exemple suivant crée un calendrier local nommé TestCal, puis l’enregistre comme calendrier d’entreprise du même nom. Si Project Professional n’est pas connecté à Project Server, MakeLocalCalendarEnterprise génère une erreur d’exécution de type 1100.

Sub TestCalendar() 
 BaseCalendarCreate Name:="TestCal" 
 MakeLocalCalendarEnterprise OldName:="TestCal" 
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.