Discussion :

[Liz99]

Bonjour,

J'ai réussi à générer un courriel Outlook à partir d'Excel mais j'aimerais savoir si je peux créer une tâche Outlook (ou une demande de tâche) en utilisant une liaison tardive.

D'abord, je déclare mes objets :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Dim applicOutlook As Object
    Dim elementCourrier As Object

Puis :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Set applicOutlook = CreateObject("Outlook.Application")
    Set elementCourrier = applicOutlook.CreateItem(0)

Par quoi dois-je remplacer « Set elementCourrier = applicOutlook.CreateItem(0) » pour créer une tâche au lieu d'un courriel ?

Merci.

[Pierre Fauconnier]

Salut.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

applicOutlook.CreateItem(3)

Comme je suppose que tu as Outlook, tu peux utiliser l'inspecteur d'objets (F2) pour identifier les valeurs des constantes.

[Liz99]

Merci beaucoup!