Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
11.02.2020 15:53:10 |
Dirk |
|
|
|
12.02.2020 07:38:27 |
Torsten |
|
|
|
05.08.2023 22:46:25 |
FurysAssassin |
|
|
|
08.08.2023 15:48:16 |
Gast95954 |
|
|
|
08.08.2023 20:37:23 |
Gast76593 |
|
|
Outlook Attachments aus mehreren Emails speichern |
12.02.2020 07:53:28 |
Torsten |
|
|
|
17.02.2020 13:42:50 |
René Wiesenhöfer |
|
|
|
17.02.2020 14:04:35 |
Torsten |
|
|
|
17.02.2020 14:21:58 |
René |
|
|
|
17.02.2020 14:26:28 |
Torsten |
|
|
|
18.02.2020 08:08:02 |
Torsten |
|
|
|
18.02.2020 08:15:09 |
René |
|
|
Von:
Torsten |
Datum:
12.02.2020 07:53:28 |
Views:
685 |
Rating:
|
Antwort:
|
Thema:
Outlook Attachments aus mehreren Emails speichern |
Oder so mit Abfrage, um einen Dateinamen zu vergeben:
Public Sub SaveAttachments()
Dim coll As VBA.Collection
Dim obj As Object
Dim Att As Outlook.Attachment
Dim Sel As Outlook.Selection
Dim Path$
Dim i&
Dim Dateiname As String
Path = "C:\Users\DB\.1 L1\PL\"
Set coll = New VBA.Collection
If TypeOf Application.ActiveWindow Is Outlook.Inspector Then
coll.Add Application.ActiveInspector.CurrentItem
Else
Set Sel = Application.ActiveExplorer.Selection
For i = 1 To Sel.Count
coll.Add Sel(i)
Next
End If
For Each obj In coll
For Each Att In obj.Attachments
Dateiname = InputBox("Bitte Dateinamen vergeben", "Anhang speichern als")
Att.SaveAsFile Path & Dateiname
Next
Next
End Sub
Gruss Torsten
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
11.02.2020 15:53:10 |
Dirk |
|
|
|
12.02.2020 07:38:27 |
Torsten |
|
|
|
05.08.2023 22:46:25 |
FurysAssassin |
|
|
|
08.08.2023 15:48:16 |
Gast95954 |
|
|
|
08.08.2023 20:37:23 |
Gast76593 |
|
|
Outlook Attachments aus mehreren Emails speichern |
12.02.2020 07:53:28 |
Torsten |
|
|
|
17.02.2020 13:42:50 |
René Wiesenhöfer |
|
|
|
17.02.2020 14:04:35 |
Torsten |
|
|
|
17.02.2020 14:21:58 |
René |
|
|
|
17.02.2020 14:26:28 |
Torsten |
|
|
|
18.02.2020 08:08:02 |
Torsten |
|
|
|
18.02.2020 08:15:09 |
René |
|
|