Microsoft Project Duplicate Task VBA

Question

I wish to delete duplicate tasks from a project using a VBA script. I have multiple tasks imported from a maintenance management system, unfortunately some tasks are duplicated. Is it possible to right a script to remove all duplicate tasks but leave the original. I have managed to obtain the results in Excel but cannot replicate in MPP. I would be grateful for any assistance.

Answer 1

Hi,

First he easy question. There is only one good bok on Project VBA: "VBA programming for Microsoft Office Project" by Fellow MVP Rod Gill.

A code about duplicates may look like this:

set Col1=activeproject.tasks

set Col2=activeproject.tasks

For each T1 in Col1

if not T1 is nothing then

for each T2 in Col2

if not T2 is nothing then

If T2.ID>T1.ID then

if T2.name=T1.name then

T2.Flag1=true

end if 'names same

end if 'only for higher IDs

end if 'T2 is nothing

next T2

end if 'T1 is nothing

next T1

Greetings,

Answer 2

Hi Jan,

Code was ideal. tested a couple of times and then replaced flag option with delete.

Thanks so much.

Answer 3

Hi,

I will give the code a go tomorrow at work and let you know the outcome.

I will source the book you have recommended, and give it a try.

Once again thanks for your kind assistance and time.

Kind Regards

Ken

Answer 4

Hi Jan, thanks for the reply. Execution time will not be an issue. 

I will be able to identify the original tasks by their MPP ID No. New additions will be added below the original import data, so I will be able to differentiate all Originals from duplicates by a set ID No.(Imports will be done daily). Any assistance in writing a code would be of great help and support in developing my knowledge in MPP VBA objects and properties. (Even modifying the text format would help in identifying duplicates)

P.S could you recommend any reference books on this subject.

Once again thanks for your kind response and I look forward to hearing from you soon.

Ken.

Answer 5

Hi,

Can be done, sure.

Two questions come to mind, however:

• One can detect doubles or triplets but... how to know which one is the original?
• Does execution time matter? If not the code may be rather easy - providing you know which one is the original!

Greetings,