Bonjour à tous ,
J'ai crée un calendrier supplementaire dans outlook 2007 Ce calendrier est commun à plusieurs personnes. J'ai ce code qui me permet d'ouvrir ce calendrier commun Il sera mis en taches journalieres à une heure fixe
Malheureusement, s'il ouvre bien ce calendrier mon code m'affiche une
erreur d'execution 13
incompatibilité de type
Pourriez vous me dire ou est l'erreur ?
Merci pour votre aide
J'ai crée un calendrier supplementaire dans outlook 2007 Ce calendrier est commun à plusieurs personnes. J'ai ce code qui me permet d'ouvrir ce calendrier commun Il sera mis en taches journalieres à une heure fixe
Malheureusement, s'il ouvre bien ce calendrier mon code m'affiche une
erreur d'execution 13
incompatibilité de type
Code:
Sub caly()
Dim mOutlookApp As New Outlook.Application
Dim mNameSpace As Outlook.Namespace
Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderCalendar)
[COLOR="Orange"]Set myNewFolder = myFolder.Folders("calendrier communautaire").Display[/COLOR]Set myNewFolder = myFolder.Folders
End Sub
Pourriez vous me dire ou est l'erreur ?
Merci pour votre aide