Macro mise en page MS Project

Cette réponse a été automatiquement traduite. Par conséquent, il peut y avoir des erreurs grammaticales ou des formulations étranges.

Salut Kaoutar,   

Merci d’avoir posté dans la communauté Microsoft. 

En fonction de vos besoins, il existe plusieurs méthodes pour essayer cette solution de contournement en créant une macro pour formater automatiquement votre planification. Voici quelques solutions possibles pour résoudre ce problème : 

Étape 1 : Créer la macro de mise en page

Vous pouvez soit enregistrer une macro, soit en écrire une manuellement. Voici un exemple éprouvé qui applique une disposition cohérente à la vue du diagramme de Gantt : 

Ce que cela fait : 

• Uniformise la vue du diagramme de Gantt
• Fixe des calendriers favorables aux entreprises
• Applique une disposition de tableau lisible
• Met l’accent sur les tâches critiques

Vous pouvez l’améliorer pour inclure des paramètres de colonne, des styles de barre personnalisés et des jeux de couleurs spécifiques à l’entreprise. 

Étape 2 : Attribuer la macro à un bouton du ruban (accès en un clic) 

1. Allez dans Options de > de fichier > Personnaliser le ruban (ou la barre d’outils d’accès rapide).
2. Choisissez Macros dans la liste des types de commandes.
3. Sélectionnez FormatScheduleLayout, puis cliquez sur Ajouter.
4. Vous pouvez également renommer le bouton et lui attribuer une icône personnalisée.

Vous pouvez désormais appliquer l’intégralité de votre mise en page en un seul clic. 

Bonnes pratiques commerciales (par Microsoft Learning for Business) 

• Enregistrer la macro dans Global.mpt
  Cela garantit qu’il est disponible dans tous les projets pour tous les membres de l’équipe.
• Activer les macros dans le Centre de gestion de la confidentialité
  Accédez à Options de > de fichiers > Centre de gestion de la confidentialité > Paramètres de macro pour autoriser l’exécution de macros.
• Distribuer via des modèles d’entreprise ou un déploiement 
  Si vous êtes dans un environnement informatique géré, envisagez de demander à votre équipe informatique d’intégrer la macro dans un modèle partagé ou de la distribuer de manière centralisée pour une utilisation cohérente.
• Non pris en charge dans Project pour le Web 
  Les macros s’exécutent uniquement dans Project Desktop (Standard ou Professional), et non dans la version web.

Essayez ces solutions de contournement et faites-nous savoir si cela vous aide à résoudre votre problème. N’hésitez pas à nous contacter à nouveau si vous avez besoin d’aide supplémentaire.      

Merci beaucoup de votre compréhension et de votre coopération.    

Sinceres salutations  

Hendrix-C - MSFT | Spécialiste du support de la communauté Microsoft.

Cette réponse a été automatiquement traduite. Par conséquent, il peut y avoir des erreurs grammaticales ou des formulations étranges.

Salut Kaoutar, 

Y a-t-il une mise à jour de votre part ?  

Y a-t-il une mise à jour sur ce fil de discussion ? Si le problème a été résolu, veuillez marquer les réponses utiles comme réponses. Cela aide d’autres membres de la communauté confrontés à des problèmes similaires. 

Merci de votre compréhension.

Sinceres salutations  

Jason-NP - MSFT | Spécialiste du support de la communauté Microsoft.

Bonjour,

Je tiens à vous remercier sincèrement pour votre retour. Malheureusement, je n’ai pas réussi à faire fonctionner la macro : une erreur s’affiche à chaque exécution.
Je ne sais pas si cela est lié à ma version de MS Project ou à un autre paramètre. J’ai tenté d’apporter quelques corrections au code, mais cela n’a pas résolu le problème.
Pensez-vous que ce code soit compatible avec toutes les versions de MS Project ?

Encore merci pour votre aide.

Cordialement,

Kaoutar LAARAJ

Cette réponse a été automatiquement traduite. Par conséquent, il peut y avoir des erreurs grammaticales ou des formulations étranges.

Salut Kaoutar,

Bonne journée! Merci beaucoup de vous avoir invité à revenir et de nous avoir fait part de ces détails supplémentaires.

Si vous voyez une erreur lors de l’exécution de la macro, quelques facteurs courants peuvent y contribuer. Permettez-moi de vous guider à travers quelques étapes pour vous aider à dépanner et à clarifier la compatibilité :

Pour activer les macros :

1. Allez dans les options de > de fichier > le Centre de gestion de la confidentialité > Paramètres du Centre de gestion de la confidentialité
2. Sélectionnez les paramètres de macro
3. Choisissez « Activer toutes les macros » (vous pouvez le modifier plus tard pour des raisons de sécurité)

Assurez-vous également d’enregistrer votre macro dans Global.mpt afin qu’elle soit disponible dans d’autres projets.

Étape 2 - Confirmez votre version de Microsoft Project
Les macros sont prises en charge dans les domaines suivants :

• Project Standard 2016 ou version ultérieure
• Professionnel de projet
• Microsoft 365 Version de bureau

Ils ne sont pas disponibles en :
• Projet pour le Web
• Version navigateur de Project Online

Pour vérifier votre version :
Accédez à Déposer > compte > À propos du projet et recherchez le numéro de version complet et l’édition (Standard, Professional ou Web).

Si vous utilisez Project pour le Web, les macros VBA ne s’y exécutent malheureusement pas, car elles ne sont prises en charge que dans les applications de bureau.

Étape 3 - Tester une macro de base
Pour vous assurer que les macros fonctionnent dans votre environnement, essayez d’exécuter une macro de test simple comme celle-ci :
Sous-marin HelloWorld()
    MsgBox « La macro fonctionne ! »
Fin du sous-marin

Si cela échoue, le problème provient de l’environnement de macro lui-même plutôt que de la macro de mise en page.

Étape 4 - Tester la macro VBA
Sous-formatScheduleLayout()

    ' Vérifier la version de MS Project
    Dim projVersion As String
    projVersion = Application.Version

    Si Val(projVersion) < 16 alors
        MsgBox « Cette macro est conçue pour MS Project 2016 ou version ultérieure. » & vbCrLf & _
               « Votre version : " & projVersion, vbExclamation, « Version non prise en charge »
        Sortir du sous-marin
    Fin Si

    ' Confirmer que la macro est en cours d’exécution
    MsgBox « Application d’une mise en page de Gantt personnalisée... », vbInformation, « Macro de mise en page »

    ' Tableau des applications
    TableNom de l’application :="Entrée »

    ' Définir le diagramme de Gantt comme vue
    AfficherNom de l’application :="Diagramme de Gantt »

    ' Personnaliser l’échelle de temps (semaines et jours)
    TimescaleEdit TierCount :=2, _
        TierPosition :=0, _
        TierFormat :=pjTimescaleWeeks, _
        TierAlignment :=pjLeft, _
        TierLabel :=pjWeekLabel, _
        UseFiscalYear :=Faux

    TimescaleEdit TierCount :=2, _
        TierPosition :=1, _
        TierFormat :=pjTimescaleDays, _
        TierAlignment :=pjLeft, _
        TierLabel :=pjDayLabel, _
        UseFiscalYear :=Faux

    ' Appliquer des styles de mesure
    GanttBarFormat Name :="Tâche », ShowForTasks :="Normal », Row :1, _
        StartField :="Début », EndField :="Terminer », MiddleShape :=pjGanttBarRectangle, _
        MiddlePattern :=pjSolidFillPattern, MiddleColor :=pjBlue

    ' Mettre en évidence les tâches critiques
    FiltreApply « Critique »
    Couleur de la police :=pjRed, Bold :=True
    FiltreEffacer

    ' Zoom pour s’adapter à toutes les tâches
    ZoomTimescale entier :=True

    MsgBox « Mise en page personnalisée appliquée avec succès ! », vbInformation, « Terminé »

Fin du sous-marin

Notes:
• Assurez-vous que les macros sont activées dans le Centre de gestion de la confidentialité :
Accédez aux options de > de fichiers > Centre de gestion de la confidentialité > Paramètres du Centre de gestion de la confidentialité > Paramètres des macros.
• Cette macro doit être enregistrée dans Global.mpt si vous prévoyez de l’utiliser dans plusieurs projets.
• Vous pouvez attribuer cette macro au ruban ou à la barre d’outils d’accès rapide pour y accéder en un clic.

Essayez ces solutions de contournement et faites-nous savoir si elles vous aident à résoudre votre problème. Si les étapes ci-dessus ne le résolvent pas, n’hésitez pas à partager :

• Une capture d’écran de l’erreur
• La ligne exacte où l’erreur se produit (si elle est connue)
• Les informations sur la version actuelle de votre projet

Cela vous aidera à déterminer si le script doit être adapté à votre environnement spécifique.

Merci encore de votre compréhension et de votre coopération.

Sinceres salutations
Clover-L - MSFT |c Spécialiste du support communautaire Microsoft.