Skip to main content

Kutools per Office — Una Suite. Cinque Strumenti. Ottieni di Più.

Come applicare un pulsante per inviare un'email con il file Word corrente allegato?

Author Xiaoyang Last modified

Se hai bisogno di inviare un'email da un documento Word utilizzando Outlook e allegare il file Word corrente, puoi inserire un pulsante di comando che invia l'email con un solo clic, senza dover aprire manualmente Outlook. Questa guida mostra come configurarlo rapidamente e facilmente.

Applica un pulsante per inviare un'email con il file Word corrente allegato


Applica un pulsante per inviare un'email con il file Word corrente allegato

Segui questi passaggi per completare l'operazione nel tuo documento Word:

  1. Per prima cosa, inserisci un pulsante di comando. Vai su "Sviluppatore" > "Strumenti legacy" > "Pulsante di comando (Controllo ActiveX)".

    Nota: Se non vedi la scheda Sviluppatore nella barra multifunzione, visita: Come mostrare la scheda Sviluppatore nella barra multifunzione di Word.

    Developer tab with Controls group selected, Legacy Tools clicked, and Command Button highlighted
  2. Seleziona il pulsante, quindi fai clic su "Proprietà" sotto la scheda "Sviluppatore". Nel riquadro Proprietà, digita il testo che desideri visualizzare sul pulsante nel campo "Didascalia".
    Properties button on the ribbon and Properties dialog popped up
  3. Chiudi il riquadro Proprietà. Quindi, fai clic con il tasto destro del mouse sul pulsante e scegli "Visualizza codice".
    View Code option on the context menu
  4. Nella finestra "Microsoft Visual Basic for Applications", incolla il seguente codice tra i tag della subroutine esistenti:
    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
    VBA window with the above code pasted

    Nota: Puoi modificare l'oggetto, il contenuto del corpo e l'indirizzo email del destinatario nel codice per adattarli ai dettagli effettivi del tuo messaggio.

  5. Salva e chiudi l'editor VBA. Fai clic su "Modalità Progettazione" nella scheda Sviluppatore per disattivarla. Ora, quando fai clic sul pulsante di comando, un'email viene creata automaticamente in Outlook con il documento Word corrente allegato.
    An email is created with the current Word document as an attachment
  6. Infine, fai clic sul pulsante "Invia" in Outlook per inviare il messaggio.

I migliori strumenti per la produttività in ufficio

Kutools for Word - Eleva la tua esperienza su Word con oltre 100 funzioni straordinarie!

🤖 Funzionalità AI di Kutools: Assistente AI / Assistente in Tempo Reale / Super Lucida (Mantieni Formato) / Super Traduci (Mantieni Formato) / Redazione AI / Correzione AI...

📘 Maestria del Documento: Dividi Pagine / Unisci Documenti / Esporta Intervallo in vari formati (PDF/TXT/DOC/HTML...) / Conversione in batch in PDF...

Modifica del Testo: Trova e Sostituisci in batch su più file / Ridimensiona tutte le Immagini / Trasponi Righe e Colonne della Tabella / Converti Tabella in Testo...

🧹 Pulizia senza sforzo: Elimina Spazi Extra / Interruzioni di Sezione / Casella di testo / Collegamenti ipertestuali / Per altri strumenti di rimozione, visita il gruppo Rimuovi...

Inserimenti Creativi: Inserisci Separatore delle Migliaia / Casella di Controllo / Pulsante di Opzione / Codice QR / Codice a Barre / Immagini multiple / Scopri di più nel gruppo Inserisci...

🔍 Selezioni Accurate: Individua Pagine Specifiche / Tabelle / Forma / Paragrafo di Intestazione / Migliora la navigazione con altre funzioni di Seleziona...

Miglioramenti Speciali: Vai a qualsiasi Intervallo / Inserimento automatico di testo ripetitivo / Passa tra Finestre dei Documenti /11 strumenti di Conversione...

🌍 Supporta oltre40 lingue: Usa Kutools nella lingua che preferisci – Inglese, Spagnolo, Tedesco, Francese, Cinese, e più di altre40 lingue!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Vuoi provare queste funzionalità? Scarica subito Kutools for Word! 🚀
 

✨ Kutools for Office – Una sola installazione, cinque strumenti potenti!

Include Office Tab Pro · Kutools per Excel · Kutools per Outlook · Kutools for Word · Kutools for PowerPoint

📦 Ottieni tutti e5 gli strumenti in un'unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta subito la produttività

I migliori strumenti per la produttività in ufficio

Kutools for Word - 100+ strumenti per Word