Bonjour,

Une petite aide:


Dim T as Task
Dim pj As Object

'Ouverture de MSProject
Set pj = CreateObject("MSProject.Project")