IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
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 :

Exporter des tableaux du corps du message Outlook vers Excel


Sujet :

VBA Outlook

  1. #1
    Candidat au Club
    Homme Profil pro
    Auditeur informatique
    Inscrit en
    juillet 2022
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 25
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Auditeur informatique

    Informations forums :
    Inscription : juillet 2022
    Messages : 4
    Points : 3
    Points
    3
    Par défaut Exporter des tableaux du corps du message Outlook vers Excel
    Bonjour,
    Je suis débutant en vba. Je souhaite exporter des tableaux qui se trouve dans le CORPS d’un mail Outlook vers un fichier Excel en utilisant vba Excel.
    Je reçoit le même mail chaque mois qui contient le même sujet/objet. Donc j’ai besoin de filtrer pour prendre les données du dernier mail.
    Merci d’avance pour votre attention, si vous avez de plus de detail, demandez 🙏.

  2. #2
    Membre actif
    Profil pro
    Inscrit en
    février 2010
    Messages
    168
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : février 2010
    Messages : 168
    Points : 218
    Points
    218
    Par défaut
    Sous excel, il faut ouvrir la barre de tâche de développement et coller le code VB ci-après .
    Il est possible d'automatiser encore plus en créant un fichier BAT

    Pour ce faire, il faut taper ici pour rechercher taper Command
    une fenêtre noire apparaît
    après
    > copy con >exec.bat
    excel.exe chemin du fichier excel

    Il faut aller dans le panneau de configuration et chercher les tâches pour déclarer la date et l'heure d'arrivée du mail et demande l'exécution du fichier

    Sinon sous Office il faut déclarer une règle pour exécuter une Macron et sous office créer une macro

    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
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    Sub auto() 
    runas vba...
    end sub
     
     
     
    Sub GetFromInbox()
     
    Dim olApp As Outlook.Application
    Dim olNs As Outlook.Namespace
    Dim olFldr As Outlook.MAPIFolder
    Dim olItms As Outlook.Items
    Dim olMail As Variant
    Dim i As Long
    Dim xTable As Word.Table
    Dim xDoc As Word.document
    Dim xRow As Integer
     
    Set olApp = New Outlook.Application
    Set olNs = olApp.GetNamespace("MAPI")
    Set olFldr = olNs.GetDefaultFolder(olFolderInbox)
    Set olItms = olFldr.Items
     
    olItms.Sort "Subject"
     
    i = 1
    On Error Resume Next
     
    xRow = 1
    For Each olMail In olItms
        If InStr(1, olMail.Subject, "Supplier 2 Pipeline Schedule - 26 Mar 2021") > 0 Then
        Set xDoc = olMail.GetInspector.WordEditor
        For i = 1 To xDoc.Tables.Count
            Set xTable = xDoc.Tables(i)
            xTable.Range.Copy
            ThisWorkbook.Sheets("Sheet2").Paste
            xRow = xRow + xTable.Rows.Count + 1
            ThisWorkbook.Sheets("Sheet2").Range("A" & CStr(xRow)).Select
        Next
        End If
    Next olMail
     
    Set olFldr = Nothing
    Set olNs = Nothing
    Set olApp = Nothing
     
    End Sub

  3. #3
    Candidat au Club
    Homme Profil pro
    Auditeur informatique
    Inscrit en
    juillet 2022
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 25
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Auditeur informatique

    Informations forums :
    Inscription : juillet 2022
    Messages : 4
    Points : 3
    Points
    3
    Par défaut
    Merci pour ton retour mach,

    Je ne sais pas comment ça marche un BAT, je vais regarder ça…

    J’ai essayé ton code, mais j’ai une erreur au niveau de l’objet. En fait, je reçois un mail automatique qui a un object comme ; «*Raport hebdomadaire - 18/07/2022*». Le problem est dans la date qui se modifie chaque jour automatiquement. J’ai essayé de metre dans subject :*«*Raport **» mais ça ne marche pas.

    Si tu peux m’orienter plus..
    merci d’avance,

Discussions similaires

  1. Réponses: 0
    Dernier message: 30/09/2015, 10h11
  2. [WD17] Etat : Export des tableaux vers RTF
    Par michel.souris dans le forum WinDev
    Réponses: 19
    Dernier message: 28/11/2014, 11h22
  3. Exporter des mail Outlook vers Excel
    Par momobjk dans le forum VBA Outlook
    Réponses: 2
    Dernier message: 11/06/2013, 11h26
  4. Réponses: 1
    Dernier message: 10/04/2013, 20h12
  5. Exporter des données OUTLOOK vers EXCEL
    Par devdev dans le forum VBA Outlook
    Réponses: 1
    Dernier message: 04/03/2009, 15h35

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo