Wie wende ich eine Schaltfläche zum Senden von E-Mails mit angehängter aktueller Word-Datei an?
Wenn Sie eine E-Mail-Nachricht aus einem Word-Dokument über Outlook senden und auch die aktuelle Word-Datei anhängen müssen, können Sie eine Befehlsschaltfläche erstellen und die Nachricht dann senden, indem Sie auf diese Schaltfläche klicken, ohne Outlook zu öffnen. In diesem Artikel werde ich vorstellen, wie man schnell und einfach damit umgeht.
Wenden Sie eine Schaltfläche an, um E-Mails mit angehängter aktueller Word-Datei zu senden
Wenden Sie eine Schaltfläche an, um E-Mails mit angehängter aktueller Word-Datei zu senden
Führen Sie die folgenden Schritte aus, um diesen Job in der Word-Datei zu lösen:
1. Zuerst sollten Sie eine Befehlsschaltfläche erstellen, klicken Sie bitte Entwickler:in / Unternehmen > Legacy-Tools > Befehlsschaltfläche (ActiveX Control), siehe Screenshot:
2. Wählen Sie die Schaltfläche und klicken Sie auf Immobilien unter dem Entwickler:in / Unternehmen Registerkarte, in der Immobilien Geben Sie im gewünschten Bereich den gewünschten Beschriftungstext ein Bildunterschrift Feld, siehe Screenshot:
3. Dann schließen Sie die Immobilien Klicken Sie jetzt mit der rechten Maustaste auf die Schaltfläche und wählen Sie Code anzeigen, siehe Screenshot:
4. Und dann in der angezeigten Microsoft Visual Basic für Applikationen Fenster, kopiere und füge den folgenden Code zwischen die ursprünglichen Skripte ein, siehe Screenshot:
Dim xOutlookObj As Object
Dim xEmail As Object
Dim xDoc As Document
Application.ScreenUpdating = False
Set xOutlookObj = CreateObject("Outlook.Application")
Set xEmail = xOutlookObj.CreateItem(olMailItem)
Set xDoc = ActiveDocument
xDoc.Save
With xEmail
.Subject = "Fax-data"
.Body = "This is a test email."
.To = "yy@addin99.com"
.Importance = olImportanceNormal
.Attachments.Add xDoc.FullName
.Display
End With
Set xDoc = Nothing
Set xEmail = Nothing
Set xOutlookObj = Nothing
Application.ScreenUpdating = True
Hinweis: Im obigen Code sollten Sie den Betreff, den Text oder die gesendete Adresse nach Ihren Wünschen ändern.
5. Speichern und schließen Sie diesen Code und klicken Sie auf Entwurfsmodus um den Entwurfsmodus auszuschalten. Wenn Sie nun auf die von Ihnen erstellte Befehlsschaltfläche klicken, wird eine E-Mail mit dem aktuellen Word-Dokument als Anhang erstellt (siehe Abbildung):
6. Zum Schluss müssen Sie nur noch klicken Senden Schaltfläche, um diese Nachricht zu senden.
Empfohlene Word-Produktivitätswerkzeuge
Kutools für Word - Mehr als 100 erweiterte Funktionen für Word, sparen Sie 50% Zeit
- Komplizierte und wiederholte Vorgänge können in Sekunden einmalig verarbeitet werden.
- Fügen Sie mehrere Bilder über Ordner hinweg gleichzeitig in ein Word-Dokument ein.
- Führen Sie mehrere Word-Dateien in Ordnern zu einer gewünschten Reihenfolge zusammen.
- Teilen Sie das aktuelle Dokument nach Überschrift, Abschnittswechsel oder anderen Kriterien in separate Dokumente auf.
- Konvertieren Sie Dateien zwischen Doc und Docx, Docx und PDF, eine Sammlung von Tools für allgemeine Konvertierungen und Auswahl usw.
