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 Våra Bostäder under Utvecklare fliken, i Våra Bostäder skriv in texttexten du behöver i Bildtext fält, se skärmdump:
3. Stäng sedan Våra Bostäder 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 = ""
.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.
Bästa kontorsproduktivitetsverktyg
Kutools för Word - Höj din ordupplevelse med Over 100 Anmärkningsvärda funktioner!
🤖 Kutools AI Assistant: Förvandla ditt skrivande med AI - Generera innehåll / Skriv om text / Sammanfatta dokument / Fråga för information baserat på dokument, allt i Word
📘 Dokumentbehärskning: Dela sidor / Sammanfoga dokument / Exportera urval i olika format (PDF/TXT/DOC/HTML...) / Batchkonvertera till PDF / Exportera sidor som bilder / Skriv ut flera filer samtidigt...
✏ Innehållsredigering: Batch Hitta och ersätt över flera filer / Ändra storlek på alla bilder / Transponera tabellrader och kolumner / Konvertera tabell till text...
🧹 Enkel rengöring: Svep bort Extra utrymmen / Avsnitt bryter / Alla rubriker / Textrutor / Hyperlänkar / För fler borttagningsverktyg, gå till vår Ta bort gruppen...
➕ Kreativa inlägg: Föra in Tusen avskiljare / Kryssrutor / radio Knappar / QR-kod / Streckkod / Diagonal linjebord / Bildtext för ekvation / Bild Bildtext / Tabelltextning / Flera bilder / Upptäck mer i Infoga grupp...
🔍 Precisionsval: Precisera specifika sidor / Tabellerna / former / rubrikerna / Förbättra navigering med mer Välj funktioner...
⭐ Stjärnförbättringar: Navigera snabbt till vilken plats som helst / infoga repetitiv text automatiskt / växla sömlöst mellan dokumentfönster / 11 Konverteringsverktyg...