Dans la Table Entrée Taches, je crée une Colonne Champ Texte1 pour placer un
numéro de Bon de Travail ;
Je souhaite récupérer ce Champ dans l'affichage Utilisation des Ressources,
comment dois je créer ce champ commun ;
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
Gérard Ducouret
Bonjour J-Yves, Impossible de faire figurer un champ de Tâche dans un affichage de Ressource. Par contre une petite routine de VBA peut recopier le contenu du champ Texte 1 (Tâche) vers le champ Texte1 (Affectation) Voir ci-dessous. Cordialement,
Gérard Ducouret [Project MVP] PragmaSoft ® - Paris
Sub JYves() 'Contenu de Texte1 (Tâche) dans Texte1 (Affectation) Dim oTache As Object, Aff Dim BDT As String 'Bon de travail For Each oTache In ActiveProject.Tasks BDT = oTache.Text1 For Each Aff In oTache.Assignments If Aff.TaskName = oTache.Name Then Aff.Text1 = BDT End If Next Aff Next End Sub
"J-Yves" a écrit dans le message de news:
Bonjour,
Dans la Table Entrée Taches, je crée une Colonne Champ Texte1 pour placer un
numéro de Bon de Travail ; Je souhaite récupérer ce Champ dans l'affichage Utilisation des Ressources,
comment dois je créer ce champ commun ;
Merci d'avance, bien à vous, J-Yves
Bonjour J-Yves,
Impossible de faire figurer un champ de Tâche dans un affichage de
Ressource.
Par contre une petite routine de VBA peut recopier le contenu du champ Texte
1 (Tâche) vers le champ Texte1 (Affectation) Voir ci-dessous.
Cordialement,
Gérard Ducouret [Project MVP]
PragmaSoft ® - Paris
Sub JYves()
'Contenu de Texte1 (Tâche) dans Texte1 (Affectation)
Dim oTache As Object, Aff
Dim BDT As String 'Bon de travail
For Each oTache In ActiveProject.Tasks
BDT = oTache.Text1
For Each Aff In oTache.Assignments
If Aff.TaskName = oTache.Name Then
Aff.Text1 = BDT
End If
Next Aff
Next
End Sub
"J-Yves" <JYves@discussions.microsoft.com> a écrit dans le message de
news:8AE9B405-89A7-4D53-B182-7F026D6B1E2E@microsoft.com...
Bonjour,
Dans la Table Entrée Taches, je crée une Colonne Champ Texte1 pour placer
un
numéro de Bon de Travail ;
Je souhaite récupérer ce Champ dans l'affichage Utilisation des
Ressources,
Bonjour J-Yves, Impossible de faire figurer un champ de Tâche dans un affichage de Ressource. Par contre une petite routine de VBA peut recopier le contenu du champ Texte 1 (Tâche) vers le champ Texte1 (Affectation) Voir ci-dessous. Cordialement,
Gérard Ducouret [Project MVP] PragmaSoft ® - Paris
Sub JYves() 'Contenu de Texte1 (Tâche) dans Texte1 (Affectation) Dim oTache As Object, Aff Dim BDT As String 'Bon de travail For Each oTache In ActiveProject.Tasks BDT = oTache.Text1 For Each Aff In oTache.Assignments If Aff.TaskName = oTache.Name Then Aff.Text1 = BDT End If Next Aff Next End Sub
"J-Yves" a écrit dans le message de news:
Bonjour,
Dans la Table Entrée Taches, je crée une Colonne Champ Texte1 pour placer un
numéro de Bon de Travail ; Je souhaite récupérer ce Champ dans l'affichage Utilisation des Ressources,