[UP][UP] Excel vers calendrier partagé

[jerem512]

Bonjour,


Je post ce message car je n'arrive à trouver la solution.

J'utilise un planning excel avec une macro pour renvoyer vers Outlook.

Cependant, nous avons un calendrier Outlook sur une adresse principale que nous partageons.

Ayant les droits de créations, je souhaiterais renvoyer le rendez vous directement sur le calendrier mais je n'y arrive pas.

Sub CALENDRIER()
'nécéssite d'activer la référence Microsoft Outlook 10.0 Object Library

Dim objOutlook As Outlook.Application
Dim objAppt As Outlook.AppointmentItem
Dim olns As Outlook.Namespace
Dim MyFolder As Outlook.Items
Dim Cell As Range

Set objOutlook = CreateObject("Outlook.Application")
Set olns = objOutlook.GetNamespace("MAPI")

For Each Cell In Range("A12:A" & Range("A500").End(xlUp).Row)
If Cell <> "" Then

Set MyFolder = olns.Folders("@adresse mail").Folders("calendrier").Folders("APPEL D'OFFRES").Items

Set objAppt = MyFolder.Add

With objAppt
.MeetingStatus = olNonMeeting
.Subject = Cell.Offset(0, 4)
.Start = Cell.Offset(0, 15)
.Duration = 60 'minutes
.Location = Cell.Offset(0, 3)
.Body = "RG: " & Cell.Offset(0, 9) & vbCrLf & "TBE: " & Cell.Offset(0, 10) _
& vbCrLf & "Mémoire Technique: " & vbCrLf & "Maître d'ouvrage : " _
& Cell.Offset(0, 2) & vbCrLf & "Maître d'œuvre: " & Cell.Offset(0, 12) _
& vbCrLf & "BET: " & Cell.Offset(0, 13)
.Save
End With
End If
Set objAppt = Nothing
Set MyFolder = Nothing
Next Cell

End Sub

Dans l'attente d'un retour

 

[jerem512]

Re : Excel vers calendrier partagé

Bonjour,

Voyant que personne ne répond, je fait un petit UP et réexplique mon soucis.

Nous avons au sein de notre société un calendrier outlook appel d'offres se trouvant sur l’adresse contact@société.com
Je souhaite pouvoir créer par macro des rendez vous automatique à partir de mon adresse électronique.

Dans l'attente d'un retour,
Merci

 

[jerem512]

Re : Excel vers calendrier partagé

Bonjour,

Je n'ai toujours pas eu de réponse concernant ce sujet.

Est ce que quelqu'un a une idée ou est ce tout simplement impossible?

 

[jerem512]

Re : Excel vers calendrier partagé

Bonjour,

Je reviens une nouvelle fois sur ce sujet sans réponse.

dans l'attente,
Merci

 

[jerem512]

Re : [UP][UP] Excel vers calendrier partagé

Bonjour,

Je reste sans nouvelles de cette conversation.
Y a t il quelqu'un qui aurait une solution??

Merci d'avance

 

[Marc L]

Bonjour,

poser une problématique Outlook dans un forum dédié à Excel …

​

 

[jerem512]

Re : [UP][UP] Excel vers calendrier partagé

Bonjour,

Mon sujet concerne bien Excel et l'envoi vers un calendrier que l'on me partage dont j'ai l'accès.

Il est possible manuellement de le faire depuis outlook mais je n'arrive pas à le faire depuis une macro excel....