Solved

MS Project 2010 pastelink fields - finding tasks with VBA

Posted on 2015-01-29
3
95 Views
Last Modified: 2016-02-23
We have used the copy and Paste Special - Text Link feature to create hammock tasks in MS Project 2010. I know they show a small gray triangle in the lower right corner of a start or finish date field which is linked to another task's date field. But, we need to document which tasks have that link in either start or finish or both. I'm sure this requires some VBA examination of the contents of a date field and then either adding that link reference information to the task's notes, a custom text field, or another list to be pasted into a Word or Excel document for further viewing.

I have little VBA experience, so I'm using my paid resource to see if someone here can show what that kind of loop through all the tasks would look like. I'm just looking for links in start and finish. If we can store the UID of the linked task  in a number field or text field, I would be fine with that. Probably one field for a start link and one for a finish link. And, whether the link is to the task's start or finish field, now that I think about it. Those would go in a text field.

Thanks for the guidance.
0
Comment
Question by:Shannon Mollenhauer
  • 2
3 Comments
 
LVL 12

Expert Comment

by:thausla
ID: 40583445
Hi,

as far as I know you can only find the tasks with linked fields by running through all tasks and checking for the LinkedFields property. Unfortunately there is no way to see WHERE the link goes to.

A simple Version of the code would be:
---
Sub FindLinkedTasks()

    Dim oTask As Task
   
    For Each oTask In ActiveProject.Tasks
        If Not oTask Is Nothing Then
            If oTask.LinkedFields Then
                'need some code here to count or display the tasks that have linked fields
            End If
        End If
    Next

End Sub
---

Hope this helps

Thomas
0
 

Author Comment

by:Shannon Mollenhauer
ID: 40612218
Thanks for the help. I'll use your structure for the basic loop and see if I can get an accumulator in there to display the count and task IDs for linked tasks. Maybe I can post something in the MS community or some MSP SIG forum about this. The data indicating where the link goes has to be stored somewhere in order for the program itself to know what to link, so hopefully it's accessible through code.
0
 
LVL 12

Accepted Solution

by:
thausla earned 500 total points
ID: 41457888
Hi,

while the source of the object link is not accessible via VBA code you can use this as a workaround:

     For Each oTask In ActiveProject.Tasks
         If Not oTask Is Nothing Then
             If oTask.LinkedFields Then
 ***                ObjectLinks
             End If
         End If
     Next

The *** indicates the ObjectLinks command that opens a window showing THAT there is a link. If you then click on "Open source" the current (selected) task jumps to the source of the link. Unfortunately it does NOT even show you WHICH field has been used as the source...sigh

Sorry I don't have a better answer!

Thomas
0

Featured Post

Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

Join & Write a Comment

No matter the version of Windows you are using, you may have some problems with Windows Search running too slow or possibly not running at all. Before jumping into how you can solve this issue, just know there are many other viable alternative deskt…
Using Word 2013, I was experiencing some incredible lag when typing.  Here's what worked for me....
This video shows where to find the word count, how to display it, and what it breaks down to in Microsoft Word.
The viewer will learn how to  create a slide that will launch other presentations in Microsoft PowerPoint. In the finished slide, each item launches a new PowerPoint presentation and when each is finished it automatically comes back to this slide: …

757 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now