Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jan De Messemaeker
Bonjour,
Qu'est-ce au plus juste le format calendrier?
-- Jan De Messemaeker Microsoft Project Most Valuable Professional Project Management Consultancy Prom+ade BVBA 32-495-300 620 "Jeff" schreef in bericht news:030101c35786$dfb410e0$ Comment peut on avoir pour une en format calendrier le nom de la tâche récaputilative à laquelle elle est rattachée ?
Bonjour,
Qu'est-ce au plus juste le format calendrier?
--
Jan De Messemaeker
Microsoft Project Most Valuable Professional
Project Management Consultancy
Prom+ade BVBA
32-495-300 620
"Jeff" <urmanfr@yahoo.fr> schreef in bericht
news:030101c35786$dfb410e0$a101280a@phx.gbl...
Comment peut on avoir pour une en format calendrier le nom
de la tâche récaputilative à laquelle elle est rattachée ?
-- Jan De Messemaeker Microsoft Project Most Valuable Professional Project Management Consultancy Prom+ade BVBA 32-495-300 620 "Jeff" schreef in bericht news:030101c35786$dfb410e0$ Comment peut on avoir pour une en format calendrier le nom de la tâche récaputilative à laquelle elle est rattachée ?
Jan De Messemaeker
Bonjour,
Il s'agit donc de l'affichage Calendrier (Désolé le mot Format est utilisé un peu partout et je n'étais pas sur de ce que vous vouliez)
Je crains qu'il faille passer par un peu de VBA Mais d'abord, dans l'affichage Calendrier, clickez à gauche, sélectionnez Style des Barres, et dans Tous, pour Texte, sélectionnez une zone libre telle que Text1.
Puis allez dans Outils, Macros, Editeur VBA Sélectionnez dans la petite frnêtre de gauche Project Global, puis Insert, Module. Dans la fenêtre Module qui apparait, collez le suivant:
Sub RecapDansText1() Dim tache as task For each tache in activeproject.tasks if not tache is nothing then tache.text1=tache.name if not tache.outlinelevel=1 then tache.text1=tache.outlineparent.name & " " & tache.name end if end if next tache end sub
Dans Outils, Macro, Macros, sélectionnez maintenant Recapdanstext1, Exécur)ter, puis amirer le résultat.
Bien à vous, -- Jan De Messemaeker Microsoft Project Most Valuable Professional Project Management Consultancy Prom+ade BVBA 32-495-300 620 "Jeff" schreef in bericht news:078801c35d98$c5fd2660$
C'est un format d'affichage au même titre que le Gantt, il y a un format Calendrier
Bonjour,
Il s'agit donc de l'affichage Calendrier
(Désolé le mot Format est utilisé un peu partout et je n'étais pas sur de ce
que vous vouliez)
Je crains qu'il faille passer par un peu de VBA
Mais d'abord, dans l'affichage Calendrier, clickez à gauche, sélectionnez
Style des Barres, et dans Tous, pour Texte, sélectionnez une zone libre
telle que Text1.
Puis allez dans Outils, Macros, Editeur VBA
Sélectionnez dans la petite frnêtre de gauche Project Global, puis Insert,
Module.
Dans la fenêtre Module qui apparait, collez le suivant:
Sub RecapDansText1()
Dim tache as task
For each tache in activeproject.tasks
if not tache is nothing then
tache.text1=tache.name
if not tache.outlinelevel=1 then
tache.text1=tache.outlineparent.name & " " & tache.name
end if
end if
next tache
end sub
Dans Outils, Macro, Macros, sélectionnez maintenant Recapdanstext1,
Exécur)ter, puis amirer le résultat.
Bien à vous,
--
Jan De Messemaeker
Microsoft Project Most Valuable Professional
Project Management Consultancy
Prom+ade BVBA
32-495-300 620
"Jeff" <urmanfr@yahoo.fr> schreef in bericht
news:078801c35d98$c5fd2660$a601280a@phx.gbl...
C'est un format d'affichage au même titre que le Gantt, il
y a un format Calendrier
Il s'agit donc de l'affichage Calendrier (Désolé le mot Format est utilisé un peu partout et je n'étais pas sur de ce que vous vouliez)
Je crains qu'il faille passer par un peu de VBA Mais d'abord, dans l'affichage Calendrier, clickez à gauche, sélectionnez Style des Barres, et dans Tous, pour Texte, sélectionnez une zone libre telle que Text1.
Puis allez dans Outils, Macros, Editeur VBA Sélectionnez dans la petite frnêtre de gauche Project Global, puis Insert, Module. Dans la fenêtre Module qui apparait, collez le suivant:
Sub RecapDansText1() Dim tache as task For each tache in activeproject.tasks if not tache is nothing then tache.text1=tache.name if not tache.outlinelevel=1 then tache.text1=tache.outlineparent.name & " " & tache.name end if end if next tache end sub
Dans Outils, Macro, Macros, sélectionnez maintenant Recapdanstext1, Exécur)ter, puis amirer le résultat.
Bien à vous, -- Jan De Messemaeker Microsoft Project Most Valuable Professional Project Management Consultancy Prom+ade BVBA 32-495-300 620 "Jeff" schreef in bericht news:078801c35d98$c5fd2660$
C'est un format d'affichage au même titre que le Gantt, il y a un format Calendrier