Wie benenne ich Anhänge im Outlook-Fenster um, ohne sie auf einer Disc zu speichern?
Bei Anhängen einer empfangenen E-Mail-Nachricht möchten Sie diese Anhänge möglicherweise umbenennen, damit sie in zukünftigen Arbeiten leicht erkannt werden können. Tatsächlich gibt es keine integrierte Outlook-Funktion, mit der Sie Anhänge im Outlook-Fenster direkt umbenennen können, ohne sie auf der Disc zu speichern. In diesem Artikel zeigen wir Ihnen Methoden zum Umbenennen von Anhängen in Outlook.
Anhänge mit VBA-Code in Outlook automatisch speichern und umbenennen
Benennen Sie Anhänge in E-Mails einfach um, ohne sie mit Kutools for Outlook auf CD zu speichern
Speichern und umbenennen Sie Anhänge mit VBA-Code in Outlook
In diesem Abschnitt stellen wir einen VBA-Code zur Verfügung, mit dem die Anhänge der ausgewählten E-Mail automatisch gespeichert werden. Nach dem Speichern sehen Sie, dass das Datum der letzten Änderung der Anhänge als Präfix zu den ursprünglichen Anhangsnamen hinzugefügt wurde. Bitte gehen Sie wie folgt vor.
1. In dem Dokumente Ordner, erstellen Sie einen neuen Ordner mit dem Namen Anlagen um die Anhänge einer ausgewählten E-Mail zu speichern und umzubenennen.
2. Wählen Sie die E-Mail mit den Anhängen aus, die Sie speichern möchten, und benennen Sie sie mit geänderten Daten um.
3. Drücken Sie Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Anwendung Fenster. In dem Microsoft Visual Basic für Anwendung Klicken Sie im Fenster Insert > Modulund fügen Sie dann den folgenden VBA-Code in das Modulfenster ein.
VBA-Code: Speichern Sie Anhänge und fügen Sie das Änderungsdatum vor dem Dateinamen hinzu
Public Sub saveattachmentsadddate()
Dim itm As Outlook.MailItem
Dim currentExplorer As Explorer
Dim Selection As Selection
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
Dim fso As Object
Dim oldName
Dim file As String
Dim DateFormat As String
Dim newName As String
Dim enviro As String
enviro = CStr(Environ("USERPROFILE"))
saveFolder = enviro & "\Documents\Attachments\"
Set currentExplorer = Application.ActiveExplorer
Set Selection = currentExplorer.Selection
Set fso = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
For Each itm In Selection
For Each objAtt In itm.Attachments
file = saveFolder & objAtt.DisplayName
objAtt.SaveAsFile file
'Get the file name
Set oldName = fso.GetFile(file)
DateFormat = Format(oldName.DateLastModified, "yyyy-mm-dd ")
newName = DateFormat & objAtt.DisplayName
oldName.Name = newName
Set objAtt = Nothing
Next
Next
Set fso = Nothing
End Sub4. Drücken Sie die Taste F5 Der Schlüssel zum Ausführen des Codes und die Anhänge in der ausgewählten E-Mail werden im Ordner gespeichert "\ Dokumente \ Anhänge \" und das letzte Änderungsdatum der Anhänge wurde automatisch als Präfix zu den ursprünglichen Anhangsnamen hinzugefügt.
Notizen:
Benennen Sie Anhänge in E-Mails einfach um, ohne sie mit Kutools for Outlook auf CD zu speichern
Hier sehr zu empfehlen Benennen Sie Anhänge um Merkmal von Kutools for Outlook. Mit dieser Funktion können Sie Anhänge im Outlook-Fenster direkt umbenennen, ohne sie auf Disc zu speichern.
Kutools for Outlook : mit mehr als 100 praktischen Outlook-Add-Ins, Kostenlos ohne Einschränkung in 60 Tagen zu versuchen.
1. Nach der Installation Kutools for OutlookWählen Sie eine E-Mail mit den Anhängen aus, die Sie umbenennen möchten, und klicken Sie dann auf Kutoolen > Anbaugeräte > Alles Umbenennen.
2. In dem Anhänge umbenennen Im Dialogfeld sehen Sie, dass der Name aller Anhänge der ausgewählten E-Mail in der Liste aufgeführt ist Name und Vorname Säule. Bitte doppelklicken Sie auf einen Anhangsnamen, um ihn zu bearbeiten, und klicken Sie dann auf OK Schaltfläche, um die Änderungen zu speichern.
Tips: Sie können alle Anhangsnamen oder einfach einen der Anhangsnamen nach Bedarf im Dialogfeld ändern.
Anschließend werden Anhänge im ausgewählten E-Mail-Fenster umbenannt.
Note: Sie können einen bestimmten Anhang umbenennen, indem Sie ihn im Lesebereich auswählen und auf klicken Kutoolen > UmbenennenGeben Sie im Dialogfeld Umbenennen einen neuen Namen in das Feld ein Name und Vorname Feld und klicken Sie dann auf OK Schaltfläche, um es zu speichern. Siehe Screenshot:
Wenn Sie dieses Dienstprogramm kostenlos testen möchten, gehen Sie zu Laden Sie die Software kostenlos herunter Wenden Sie zuerst die Operation gemäß den obigen Schritten an.
In Verbindung stehende Artikel:
- Wie speichere ich alle Anhänge aus mehreren E-Mails in einem Ordner in Outlook?
- Wie behalte ich Anhänge bei der Beantwortung in Outlook?
- Wie entferne ich alle Anhänge aus E-Mails in Outlook?
Beste Office-Produktivitätstools
Kutools for Outlook - Über 100 leistungsstarke Funktionen zur Optimierung Ihres Outlooks
🤖 KI-Mail-Assistent: Sofortige Profi-E-Mails mit KI-Magie – geniale Antworten mit einem Klick, perfekter Ton, mehrsprachige Beherrschung. Verwandeln Sie den E-Mail-Versand mühelos! ...
📧 E-Mail Automation: Abwesenheit (verfügbar für POP und IMAP) / Planen Sie das Senden von E-Mails / Automatisches CC/BCC nach Regeln beim E-Mail-Versand / Automatische Weiterleitung (erweiterte Regeln) / Begrüßung automatisch hinzufügen / Teilen Sie E-Mails mit mehreren Empfängern automatisch in einzelne Nachrichten auf ...
📨 E-Mail-Management: E-Mails einfach abrufen / Blockieren Sie betrügerische E-Mails nach Betreff und anderen / Doppelte E-Mails löschen / Erweiterte Suche / Ordner konsolidieren ...
📁 Anhänge Pro: Batch speichern / Stapeltrennung / Stapelkomprimierung / Automatisches Speichern / Automatische Trennung / Automatische Komprimierung ...
???? Schnittstellenmagie: 😊Mehr hübsche und coole Emojis / Steigern Sie Ihre Outlook-Produktivität mit Registerkartenansichten / Ausblick minimieren statt schließen ...
👍 Wunder mit einem Klick: Allen mit eingehenden Anhängen antworten / Anti-Phishing-E-Mails / 🕘Zeitzone des Absenders anzeigen ...
👩🏼🤝👩🏻 Kontakte und Kalender: Fügen Sie Kontakte aus ausgewählten E-Mails im Stapel hinzu / Teilen Sie eine Kontaktgruppe in einzelne Gruppen auf / Geburtstagserinnerungen entfernen ...
Auf über 100 Eigenschaften Warten Sie auf Ihre Erkundung! Klicken Sie hier, um mehr zu erfahren.
