2017-02-15 1 views
2

Désolé, c'est une question facile, je viens de commencer à utiliser vba avec MS Project. J'essaie de faire défiler toutes les tâches dans un fichier MS Project et de supprimer une tâche si elle répond à certains critères. Le problème survient après la suppression d'une tâche, il semble que la variable j tâche soit définie sur Nothing, ce qui résout tout. Une idée de comment je peux faire ça?Microsoft Project, utilisez vba pour supprimer des tâches

For Each j In prj.Tasks 

    If j.Text10 = "1" Or j.Text10 = "2" Then ' If criteria is met 

     SelectRow Row:=j ' Select the row 
     EditDelete  ' Delete the row 

    End If 
Next j 
+0

utiliser un pour x = maxTasks à 1 étape -1 cette façon, votre compteur ne perd pas sa place – Sorceri

Répondre

1

Voici comment je l'ai fait dans le passé, vérifiez toutes les tâches du projet.

Je ne suis pas sûr à 100% sur la syntaxe comme il a été un moment que j'ai travaillé avec le projet et je copiais ce après avoir regardé votre code de vb.net

Dim T as Task 

For Each T In Application.Tasks 
    If T.Text10 = "1" Or T.Text10 = "2" Then 
     T.Delete 
    End If 
Next 

encore, il ressemble vous avez juste besoin de changer

.... Then 
    j.Delete 
End if 
+0

ce fut tout. Merci –

+0

si cette réponse a fonctionné pour vous pourriez s'il vous plaît l'accepter comme réponse, il aide les autres qui ont des questions semblables à trouver une solution de travail. – ballsy26