Q
question
Hi,
I am tryign to assign a user to a task using VBA( project 2007)
For Each tsk In ActiveProject.Tasks
On Error Resume Next
If Not tsk Is Nothing Then
cf = tsk.GetField(FieldNameToFieldConstant("Deliverable_Type"))
If cf = "Interpretation" Then
tsk.Assignments.Add ResourceID:=RID
End If
End If
Next
This is the code I am using, but it is giving error (on assignments.add)
when I am saving the proect for the first time, on next save the assignment
orks fine.
Any pointers to solvethis will be helpful.
Thanks.
I am tryign to assign a user to a task using VBA( project 2007)
For Each tsk In ActiveProject.Tasks
On Error Resume Next
If Not tsk Is Nothing Then
cf = tsk.GetField(FieldNameToFieldConstant("Deliverable_Type"))
If cf = "Interpretation" Then
tsk.Assignments.Add ResourceID:=RID
End If
End If
Next
This is the code I am using, but it is giving error (on assignments.add)
when I am saving the proect for the first time, on next save the assignment
orks fine.
Any pointers to solvethis will be helpful.
Thanks.