parcourir une page MSP

salut
j'ai fais ce programme mais il foctionne pas toujours

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Public Sub test()   Dim oTa As Task   Dim oA As Assignment     For Each oTa In ActiveProject.Tasks   For Each oA In oTa.Assignments   oA.Text25 = oTa.Text25   Next oA   Next oTa   End Sub

---

le but parcourir les ligne , lorsque ont trouve une ressource , en regarde le champ text25 et en l'affecte la valeur du champ text25 de la tache qui est en dessus de cette ressource

Et ca plante sur qu'elle ligne?

bonjour,

quel est le code erreur ?