Dim t As task Dim a As Assignment On Error Resume Next For Each t In ActiveProject.tasks For Each a In t.Assignments a.Text1 = t.Text1 'Change above numbers to use alternate text fields. Next a Next t End Sub
|Terminology for project management||2||340|
|Requirements for Project Web A||2||172|
|Project 2010 - Highlight Completed Tasks||3||81|
|MSFT Project Plan shows Activity Days that is not in-line with Actual Days specified for each task.||4||67|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
26 Experts available now in Live!