Bonjour,
Je cherche à créer des tâches dans Outlook à partir d'excel.
Mais dans des dossiers prédéfinis Sous MyTask.
Voilà mon code qui crée une tâche. Je suis novice, c'est donc peut être pas top, mais ça fonctionne.
ça fonctionne mais créé une tâche dans le dossier "Aufgaben" alors que je souhaiterai le dossier "BAS_Ausbildung". Vois image jointe.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Sub Create_task() Dim olApp As Outlook.Application Dim olTsk As TaskItem Dim myDestFolder As Task.Folder Set olApp = New Outlook.Application Set olTsk = olApp.CreateItem(olTaskItem) olTsk.Subject = "Test" olTsk.DueDate = "15/11/2019" olTsk.Body = "retest" olTsk.Save End Sub
Merci
Partager