recherche deux instruction outlook depuis excel

[zephir94]

Bonjour à tous,

Depuis Excel j'accède à Outlook, je voudrais récupérer un éléments que je n'arrive pas à atteindre dans la boite d'envoi.
le récipient ou des récipients du mail que je n'arrive pas à récupérer.

Merci par avance pour vos aides

 

[zephir94]

Je suis sur un projet qui permet par un Userform de générer des document officiel et de gérer les boites mails en conservant un archivage pour soulager les boites mails qui ne sont jamais vidées.
Mon but est donc à habituer l'utilisateur à n'utiliser que mon interface 🙄
Car le plus gros du projet n'utilise pas Outlook mais je suis obligé au cœur du projet de l'utiliser.

 

[Staple1600]

Re

Remets du carburant dans le moteur, camarade, parce ce que...😉
(voir ici)

PS: Sinon, avec les régles+VBA dans Outlook, on peut pas mal de choses (comme par exemple "vider les boites")

 

[zephir94]

Youpiiiii 😛

Grace à ton carburant j'ai adapté un bout de code qui fonctionne à merveille pour interagir dans Outlook sur le bouton envoyer/recevoir depuis Excel pour ceux que ça intéresses voici le code :

 Dim OLmail As Outlook.MailItem
Dim pceJointe As Outlook.Attachment
Dim myFolder As Outlook.Folder
  Set olApp = CreateObject("Outlook.Application")
  Set olNs = olApp.GetNamespace("MAPI")
  Set olxFolder = olNs.GetDefaultFolder(6)
  Set myNameSpace = olNs
  Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox)
On Error Resume Next
Application.ScreenUpdating = False
Set nsp = olNs
Set sycs = nsp.SyncObjects
For i = 1 To sycs.Count
Set syc = sycs.item(i)
syc.Start
Next

je pourrais repasser à ta pompe ? 😳

 

[Staple1600]

Re

Ne repasse à la pompe que si tu es sur d'avoir raclé le fond du réservoir* 😉
(*notamment du web anglophone dédié à Excel)

 

[zephir94]

Merci pour tout, mais tu sais je fais beaucoup de recherches, preuve en est les listview je me suis rencarder tout seul 😉