none
Ordner gesendete auslesen unter Office 2013

    Frage

  • Hallo zusammen

    Unter 2010 hatte ich folgenden Code am laufen und alles war wunderbar....

    Nun habe ich Office 2013 und kann leider mit demselben Code und den neuen Verweisen den Ordner Gesendete nicht mehr auslesen.

    Hat jemand eine Ahnung was da geändert hat.....wäre schön, denn die Funktion hat bis dato Spass gemacht....

     Dim olApp As Outlook.Application
        Dim olExplorer As Outlook.Explorer
        Dim olMail As Outlook.MailItem
        
        Set olApp = New Outlook.Application
        Set olExplorer = olApp.ActiveExplorer
        Set olMail = olExplorer.Selection(1)
      
    '************************************************************************
    ' Prozess wenn die SenderMail dem User-Mail entspricht --> Outgoing Mail Prozess

    If olMail.SenderEmailAddress = DLookup("UEMail", "tUser", "WUser= '" & WinUser & "'") Then
        Empfänger = olMail.Recipients(1)

     usw.

    Für eure Hilfe bin ich sehr dankbar.

    Gruss

    René

    Dienstag, 14. Mai 2013 16:16

Alle Antworten

  • Hallo René

    Du meinst Outlook 2013, gell? Du hast Office geschrieben.

    Mit dieser Frage bist Du vermutlich in einem Outlook Forum besser aufgehoben. Mit Access hat das ja ziemlich wenig zu tun, ausser dass VBA von Access verwendet wird, welches in allen anderen Anwendungen auch der Fall ist.

    Eine Alternative wäre dann auch dieses Office Forum http://social.msdn.microsoft.com/Forums/de-DE/officede

    Gruss

    Henry


    Freitag, 31. Mai 2013 08:04
  • Hallo Henry

    Vielen Dank für deinen Hinweis. Ich war leider ein paar Tage weg, daher erst jetzt die Antwort.

    Hast du für dich persönlich schon Erfahrungen gemacht von Codes, welche im 2010 liefen und nun im 2013 nicht mehr ?

    Gruss

    Rene

    Mittwoch, 5. Juni 2013 12:32
  • Nein, ich setze Office 2013 noch nicht ein

    Gruss Henry

    Mittwoch, 5. Juni 2013 13:56