Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Outlook Discussion :

extraction contacts to txt


Sujet :

VBA Outlook

  1. #1
    Membre habitué
    extraction contacts to txt
    Bonjour, je dois exporter des contacts outlook (2003) vers un format tiers, en gros, dans un fichier texte.

    Suite à la consultation des divers tuto, j'arrive à ecrire un fichier texte (en ayant rajouté la référence Microsoft scripting Runtime) mais maintenant, je lutte pour parcourir les contacts outlook.

    J'ai récupéré la macro suivante :

    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
     
    Public Sub ParcourirContact()
    Dim oCont As ContactItem
    Dim oFold As Folder
    Dim nM As NameSpace
    Dim olApp As Outlook.Application
     
    Set olApp = Outlook.Application
    Set nM = olApp.GetNamespace("MAPI")
    Set oFold = nM.GetDefaultFolder(olFolderContacts)
    For Each oCont In oFold.Items
        Debug.Print oCont.LastName
    Next oCont
     
     
    End Sub


    Mais sur le oFold.Items il me met une erreur de compilation "Membre de méthode ou de données introuvable".

    Pouvez vous m'expliquer ou je me trompe ?

  2. #2

###raw>template_hook.ano_emploi###