Jak použít tlačítko pro odeslání e-mailu s připojeným aktuálním souborem Word?
Pokud potřebujete odeslat e-mailovou zprávu z dokumentu aplikace Word prostřednictvím aplikace Outlook a připojit také aktuální soubor aplikace Word, můžete vytvořit příkazové tlačítko a poté zprávu odeslat kliknutím na toto tlačítko bez otevření aplikace Outlook. V tomto článku vám představím, jak se s tím rychle a snadno vypořádat.
Pomocí tlačítka odešlete e-mail s připojeným aktuálním souborem Word
Pomocí tlačítka odešlete e-mail s připojeným aktuálním souborem Word
Při řešení této úlohy v souboru Word proveďte následující kroky:
1. Nejprve byste měli vytvořit příkazové tlačítko, klikněte prosím Vývojka > Starší nástroje > Příkazové tlačítko (ovládání ActiveX), viz screenshot:
2. Vyberte tlačítko a klikněte na Nemovitosti pod Vývojka v záložce Nemovitosti v podokně zadejte požadovaný text titulku do Titulek pole, viz screenshot:
3. Poté zavřete Nemovitosti v podokně nyní klikněte pravým tlačítkem na tlačítko a vyberte Zobrazit kód, viz screenshot:
4. A pak, na displeji Microsoft Visual Basic pro aplikace okno, zkopírujte a vložte níže uvedený kód mezi původní skripty, viz 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 = ""
.Importance = olImportanceNormal
.Attachments.Add xDoc.FullName
.Display
End With
Set xDoc = Nothing
Set xEmail = Nothing
Set xOutlookObj = Nothing
Application.ScreenUpdating = True
Poznámka: Ve výše uvedeném kódu byste měli podle potřeby změnit předmět, hlavní text nebo zaslanou adresu.
5. Poté tento kód uložte a zavřete, klikněte na Režim návrhu vypnete režim návrhu. Nyní, když kliknete na příkazové tlačítko, které jste vytvořili, bude vytvořen e-mail s aktuálním dokumentem Word jako přílohou, viz screenshot:
6. Nakonec stačí kliknout Poslat tlačítko pro odeslání této zprávy.
Nejlepší nástroje pro produktivitu v kanceláři
Kutools pro Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!
🤖 Kutools AI asistent: Transformujte své psaní pomocí AI - Generovat obsah / Přepsat text / Shrnout dokumenty / Vyžádejte si informace na základě dokumentu, vše ve Wordu
📘 Mistrovství dokumentů: Rozdělit stránky / Sloučit dokumenty / Exportovat výběr v různých formátech (PDF/TXT/DOC/HTML...) / Dávkový převod do PDF / Exportujte stránky jako obrázky / Tisk více souborů najednou...
✏ Úprava obsahu: Dávkové hledání a nahrazení přes více souborů / Změnit velikost všech obrázků / Transponujte řádky a sloupce tabulky / Převést tabulku na text...
🧹 Čištění bez námahy: Smést pryč Extra prostory / Sekce přestávky / Všechny záhlaví / Textová pole / Odkazy / Další nástroje pro odstraňování naleznete u nás Odstranit skupinu...
➕ Kreativní vložky: Vložit Tisíc separátorů / Zaškrtávací políčka / Tlačítka rádia / QR kód / čárový kód / Tabulka diagonálních čar / Titulek rovnice / Titulek obrázku / Titulek tabulky / Více obrázků / Objevte více v Vložit skupinu...
???? Přesné výběry: Přesně konkrétní stránky / Tabulky / Tvary / nadpisové odstavce / Vylepšete navigaci pomocí vice Vyberte funkce...
⭐ Vylepšení hvězd: Navigujte rychle na libovolné místo / automatické vkládání opakujícího se textu / plynule přepínat mezi okny dokumentů / 11 Konverzní nástroje...