Lone-wolf
XLDnaute Barbatruc
Bonjour à tous,
Est-il est possible, à partir d'Excel, de mettre à jour les champs:
Adresse(bureau) complète - Téléphone(bureau) - Tél. mobile - Adresse de messagerie - Page Web.
En VBA, à quoi correspond le A: dans Réunion, et si ce code lui correspond.
Pour l'envois de messages c'est: olmail.To = Nouveau.Email.Value
J'ai mis .To là aussi, mais ce n'est pas ça.
Merci pour vos réponses
Est-il est possible, à partir d'Excel, de mettre à jour les champs:
Adresse(bureau) complète - Téléphone(bureau) - Tél. mobile - Adresse de messagerie - Page Web.
En VBA, à quoi correspond le A: dans Réunion, et si ce code lui correspond.
Pour l'envois de messages c'est: olmail.To = Nouveau.Email.Value
Code:
Sub Reunions()
Dim olApp As Outlook.Application
Dim rns As Outlook.AppointmentItem
Set olApp = Outlook.Application
Set rns = olApp.CreateItem(olAppointmentItem)
With rns
.MeetingStatus = olMeeting
.Importance = olImportanceNormal
.Subject = ""
.Body = ""
.Location = ""
.Start = Now
.Duration = 0
.Categories = ""
.Display
End With
Set olApp = Nothing
Set rdv = Nothing
End SubJ'ai mis .To là aussi, mais ce n'est pas ça.
Merci pour vos réponses