Microsoft Project and VB - Help

Closed
Schedule_VBN00b - Feb 9, 2009 at 12:41 AM
 Schedule_VBN00b - Feb 9, 2009 at 04:22 AM
Hello,
Related:

1 response

diginum Posts 9 Registration date Tuesday October 21, 2008 Status Member Last seen April 22, 2009
Feb 9, 2009 at 03:38 AM
hi,
you have not given enough details so as i can find a specific answer for your post.
please post your question again elaborating more on the problem that you need.
thank you.
0
Schedule_VBN00b
Feb 9, 2009 at 04:22 AM
My problem is that when I run the macro (with the excerpt already in the page and attached again below) is that it says that it successfully copies x number of fields but doesnt actually copy the contents of the Percent Complete field into the Text field.
So text field is blank even after the macro runs.

I think I need to convert the percent complete field into a string/text so that it can save in that field. Because Percent complete is in percent format.


Dim t as task
Dim ts as tasks

Set Ts = ActiveProject.Tasks
intTcounter = 0

If not t is nothing then
t.PercentageComplete = t.Text7
intTcounter = intTcounter + 1
End If
next t
'Display message
MsgBox ("Macro done" & Chr(13) & intTcounter & " Task Complete")

End
0