Get Wert von Aufgabenressourcen

Question

ich Makro machen wollen, dass die Werte der Aufgabe Ressourcen („gleiche Erträge“ und „Kosten“) und stellen diese Werte zu Variablen bekommen, damit ich sie verwenden können, um Dinge zu berechnen

Ich verwende "For Each t in ActiveProject.Tasks", um das gleiche mit allen Aufgaben zu machen. Mein einziges Problem ist, dass ich nicht weiß, wie ich diese Werte von "Ressourcennamen" bekomme.

Beispiel-Code für meine Berechnung:

Sub Macro1() 

Dim E As Double 
Dim A As Double 
Dim test As Double 

For Each t In ActiveProject.Tasks 

test = E + A + test 

Debug.Print test 

Next t 
End Sub 

"E" und "A" sollten die Ressourcen sein.

Answer 1

Ich fand es selbst heraus

A = ActiveProject.Tasks(t).Assignments(1).Cost 
E = ActiveProject.Tasks(t).Assignments(2).Cost