Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: email Anhang Öffnen

email Anhang Öffnen
14.11.2016 16:24:46
Raphael
Hallo Zusammen,
ich hoffe ihr könnt mir besser helfen als google (da finde ich nichts passendes)
wie kann ich einen email anhang öffnen (Betreff is als "DailySegmentReport.xls" fest definiert), ebenso soll er nur die email von heute danach in der Inbox durchsuchen.
Besten dank für eure Hilfe
Raphael
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: email Anhang Öffnen
15.11.2016 10:57:51
baschti007
Das geht so
Dabei wird die erste Mail mit dem Betreff= "Betreffsuch" gefunden und dann der Anhang in den Pfad gespeicher und dann die Mappe geöffnet.
Gruß Basti
Sub Bestimmte_mail_Anhang_finden()
' Es wird der Qutlook verweis benötigt  0 Then
Set Anlagen = oMail.Attachments
For Each Anlage In Anlagen
If Anlage = Betreffsuch Then
Anlage.SaveAsFile Pfad & Anlage
Workbooks.Open (Pfad & Anlage)
Set Wb = ActiveWorkbook
'......... Hier kannst du das Workbook bearbeiten
Wb.Close
GoTo ende
End If
Next
End If
End If
End If
Next
ende:
Set objNS = Nothing
Set oFldInbox = Nothing
End Sub

Anzeige
AW: email Anhang Öffnen
18.11.2016 16:55:32
Raphael
Hallo Basti,
Besten dank für deine Hilfe!!!! Ja das ist echt gut! wie aber schaffe ich es wenn der Betreff Name anders als der Anhang ist?
Für mich ist der Betreff wichtig! da der immer gleich ist.
Besten dank
Raphael
AW: email Anhang Öffnen
19.11.2016 14:23:42
Bastian
dann muss
das hier
If Anlage = Betreffsuch Then
und das end if uten weg
Gruß Basti
Anzeige
AW: email Anhang Öffnen
21.11.2016 12:53:49
Raphael
Danke dir Basti, das hilft mir echt weiter
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

E-Mail-Anhänge in Outlook öffnen und bearbeiten


Schritt-für-Schritt-Anleitung

Um einen E-Mail-Anhang in Outlook zu öffnen, kannst du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Outlook und drücke ALT + F11, um den VBA-Editor zu starten.

  2. Klicke im Projekt-Explorer mit der rechten Maustaste auf "ThisOutlookSession" und wähle "Einfügen" -> "Modul".

  3. Füge den folgenden Code in das Modul ein:

    Sub Bestimmte_mail_Anhang_finden()
        Dim oMail As Outlook.MailItem
        Dim Anlagen As Outlook.Attachments
        Dim Anlage As Outlook.Attachment
        Dim Pfad As String
        Dim Betreffsuch As String
    
        Pfad = "C:\DeinSpeicherort\" ' Pfad anpassen
        Betreffsuch = "DailySegmentReport.xls" ' Betreff anpassen
    
        For Each oMail In Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Items
            If oMail.Subject = Betreffsuch And oMail.ReceivedTime >= Date Then
                Set Anlagen = oMail.Attachments
                For Each Anlage In Anlagen
                    If Anlage.FileName = "DeinAnhang.xls" Then ' Anhangsname anpassen
                        Anlage.SaveAsFile Pfad & Anlage.FileName
                        Workbooks.Open (Pfad & Anlage.FileName)
                        Set Wb = ActiveWorkbook
                        '......... Hier kannst du das Workbook bearbeiten
                        Wb.Close
                        Exit Sub
                    End If
                Next
            End If
        Next
    End Sub
  4. Ändere den Pfad und den Anhangsnamen nach Bedarf.

  5. Schließe den VBA-Editor und führe das Makro aus.

Damit kannst du spezifische E-Mail-Anhänge öffnen und bearbeiten.


Häufige Fehler und Lösungen

  • Fehlermeldung beim Speichern des Anhangs: Stelle sicher, dass der angegebene Pfad existiert und du Schreibrechte hast.
  • Anhang nicht gefunden: Überprüfe den Anhangsnamen. Er muss exakt mit dem im Code angegebenen übereinstimmen.
  • VBA funktioniert nicht: Stelle sicher, dass Makros in deinen Outlook-Einstellungen aktiviert sind.

Alternative Methoden

Falls du keine VBA-Lösung verwenden möchtest, gibt es auch manuelle Methoden:

  1. E-Mail öffnen: Doppelklicke auf die E-Mail, um sie zu öffnen.
  2. Anhang öffnen: Klicke auf den Anhang und wähle "Öffnen" oder "Speichern unter", um ihn auf deinem Computer zu speichern.

Praktische Beispiele

Ein praktisches Beispiel wäre das Öffnen eines PDF-Anhangs:

If Anlage.FileName Like "*.pdf" Then
    ' PDF-Anwendung zum Öffnen verwenden
    ' Hier Code für das Öffnen eines PDF-Anhangs einfügen
End If

Mit dieser Methode kannst du ebenfalls E-Mail-Anhänge wie PDF-Dateien öffnen.


Tipps für Profis

  • Automatisierung: Du kannst das VBA-Skript so anpassen, dass es regelmäßig ausgeführt wird, um neue Anhänge automatisch zu speichern.
  • Fehlerbehandlung: Füge Fehlerbehandlungsroutinen hinzu, um besser mit unerwarteten Problemen umzugehen.
  • Anpassungen: Experimentiere mit verschiedenen Dateitypen, um andere Anhänge wie .docx oder .xlsx zu öffnen.

FAQ: Häufige Fragen

1. Wie kann ich Anhänge von E-Mails öffnen, ohne VBA zu verwenden? Du kannst den Anhang manuell öffnen, indem du auf die E-Mail klickst und den Anhang auswählst.

2. Was mache ich, wenn Outlook keinen Anhang anzeigt? Überprüfe den Spam-Ordner oder mögliche Filtereinstellungen, die die E-Mail blockieren könnten.

3. Kann ich mehrere Anhänge auf einmal öffnen? Ja, du kannst den Code anpassen, um mehrere Anhänge zu speichern und zu öffnen.

4. Wie bearbeite ich einen E-Mail-Anhang? Nachdem du den Anhang geöffnet hast, kannst du ihn wie jede andere Excel-Datei bearbeiten und speichern.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige