Hur applicerar jag en knapp för att skicka e-post med aktuell Word-fil bifogad?
Om du behöver skicka ett e-postmeddelande från ett Word-dokument via Outlook och bifoga den aktuella Word-filen också kan du skapa en kommandoknapp och sedan skicka meddelandet genom att klicka på den här knappen utan att öppna Outlook. Den här artikeln kommer jag att presentera hur man hanterar det snabbt och enkelt.
Använd en knapp för att skicka e-post med aktuell Word-fil bifogad
Använd en knapp för att skicka e-post med aktuell Word-fil bifogad
Gör med följande steg för att lösa detta jobb i Word-fil:
1. Först bör du skapa en kommandoknapp, klicka Utvecklare > Äldre verktyg > Kommandoknapp (ActiveX-kontroll), se skärmdump:
2. Välj knappen och klicka Fastigheter under Utvecklare fliken, i Fastigheter skriv in texttexten du behöver i Bildtext fält, se skärmdump:
3. Stäng sedan Fastigheter högerklicka på knappen och välj Visa kod, se skärmdump:
4. Och sedan, i det visade Microsoft Visual Basic för applikationer fönster, kopiera och klistra in koden nedan mellan originalskripten, se skärmdump:
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
Anmärkningar: I ovanstående kod bör du ändra ämne, brödtext eller skickad adress efter dina behov.
5. Spara och stäng sedan den här koden och klicka Designläge för att stänga av designläget. Nu när du klickar på kommandoknappen du har skapat skapas ett e-postmeddelande med det aktuella Word-dokumentet som bilaga, se skärmdump:
6. Äntligen behöver du bara klicka Skicka knappen för att skicka detta meddelande.
Rekommenderade Word-produktivitetsverktyg
Kutools For Word - Mer än 100 avancerade funktioner för Word, spara 50 % tid
- Komplicerade och upprepade operationer kan göras engångsbehandling på några sekunder.
- Infoga flera bilder över mappar i Word-dokumentet samtidigt.
- Slå ihop och kombinera flera Word-filer över mappar till en med önskad ordning.
- Dela upp det aktuella dokumentet i separata dokument enligt rubrik, avsnittbrytning eller andra kriterier.
- Konvertera filer mellan Doc och Docx, Docx och PDF, samling verktyg för vanliga konverteringar och val, och så vidare ...
