par , 13/03/2015 à 22h24 (1161 Affichages)
Envoyé par
Oliv-
Quand on utilises OUTLOOK à partir d'un autre programme, il faut déclarer
Set objApp =createobject("outlook.application")
alors que si on utilise une macro dans outlook c'est
(ou alors dans ce dernier cas c'est implicite on n'est pas obligé de la déclarer)
ensuite l'objet
objApp doit précéder chaque commande spécifique outlook comme dans le bout de code que je t'ai donné
dans le code du précédent POST outlook était désigné par
appOutLook, tu peux bien sûr homogénéisé tout cela.
tu peux aussi utiliser une variable PUBLIC pour désigner
PUBLIC appOutLook as object
Si tu n'a pas ajouté de référence dans VBE à "Microsoft Outlook 14.0 object library" tu dois aussi déclarer dans ton code les constantes spécifiques à OUTLOOK
on peut utiliser cette syntaxe dans tous les cas
1 2 3 4 5 6
| Dim OL As Outlook.Application
If UCase(Application) = "OUTLOOK" Then
Set OL = Application
Else
Set OL = CreateObject("outlook.application")
End If |