Enregistrer des tâches sous Outlook

[chris90]

Bonjour à tous,

Voilà ce que je désire faire.... Je souhaiterais créer un petit programme en vba sous excel dans lequel je rentrerais NOM + Prénom + Adresse du contact. Ce contact a été vu par Monsieur Harry Cover (à entrer également). Je voudrais :
1 - enregistrer le contact (nom + prénom + adresse) en tant que contact partagé sous outlook - créer une finche contact quoi
2 - le plus important. Je souhaiterais qu'une tâche sois créée dans les tâche outlook de Harry Cover lui disant par exemple 'Téléphoner Monsieur NOM Prénom' 15 jours plus tard par exemple.... et que j'en conserve une copie dans mes propres tâches outlook.....

Est-ce possible svp ? Pour info je suis en réseau...

Merci d'avance de vos lumières.

 

[MichelXld]

bonsoir

j'espere que cet exemple pourra t'aider à creer une tache dans Outlook


'
'necessite d'activer la reference Microsoft Outlook xx.x Object Library

Dim myOlApp As Outlook.Application
Dim myItem As Outlook.TaskItem
'
Set myOlApp = CreateObject('Outlook.Application')
Set myItem = myOlApp.CreateItem(olTaskItem)

With myItem
.Status = olTaskInProgress
.Importance = olImportanceHigh
.DueDate = DateValue('06/26/06')
.Body = 'Rendez vous sur le Chat'
.TotalWork = 40
.ActualWork = 20
.Subject = 'le titre'
.Assign
.Recipients.Add ('leNom lePrenom') ' le nom doit exister dans le dossier d'adresses
.Save
.Send
End With



tu trouveras des exemples pour ajouter des contatcs , dans ce lien

https://www.excel-downloads.com/thr...oter-dautres-applications-depuis-excel.92359/



bonne soirée
MichelXld

 

[chris90]

Bonjour,

Merci pour ce code et ce lien. . Je vais tester ça dès que je peux. Ca m'enlève une sacrée épine du pied en tous cas....

Bonne journée.