Получите выгоду от ресурсов задачи

Я хочу сделать макрос, который получает значения ресурсов задачи ("Eträge" и "Kosten") и устанавливает эти значения в переменные, чтобы я мог использовать их для вычислений t

Я использую «Для каждого t в ActiveProject.Tasks», чтобы сделать то же самое со всеми задачами. Моя единственная проблема заключается в том, что я не знаю, как получить эти значения из «Ressourcenamen».

Пример кода для моего расчета:

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

«Е» и «А» должны быть ресурсами.


person Community    schedule 30.05.2016    source источник


Ответы (1)


Я узнал это сам

A = ActiveProject.Tasks(t).Assignments(1).Cost
E = ActiveProject.Tasks(t).Assignments(2).Cost
person Community    schedule 30.05.2016