Skip to main content
 

Conas cnaipe a chur i bhfeidhm chun ríomhphost a sheoladh leis an gcomhad Word reatha ceangailte? 

Údar: Xiaoyang Athraithe Deiridh: 2024-08-08

Más gá duit teachtaireacht ríomhphoist a sheoladh ó dhoiciméad Word trí Outlook, agus an comhad Word reatha a cheangal leis freisin, is féidir leat cnaipe ordaithe a chruthú, agus ansin, an teachtaireacht a sheoladh tríd an gcnaipe seo a chliceáil gan an Outlook a oscailt. An t-alt seo, tabharfaidh mé isteach conas déileáil leis go tapa agus go héasca.

Cuir cnaipe i bhfeidhm chun ríomhphost a sheoladh leis an gcomhad Word reatha ceangailte leis


Cuir cnaipe i bhfeidhm chun ríomhphost a sheoladh leis an gcomhad Word reatha ceangailte leis

Déan na céimeanna seo a leanas chun an post seo a réiteach i gcomhad Word:

1. Ar dtús, ba cheart duit cnaipe ordaithe a chruthú, cliceáil le do thoil Forbróir > Uirlisí Oidhreacht > Cnaipe Ordú (Rialú ActiveX), féach ar an scáileán:

Cluaisín forbróra leis an ngrúpa Rialuithe roghnaithe, Uirlisí Legacy a chliceáil, agus an Cnaipe Ceannais aibhsithe

2. Roghnaigh an cnaipe, agus cliceáil Airíonna faoi ​​na Forbróir tab, sa Airíonna pána, clóscríobh an téacs fotheidil atá uait sa Fotheideal réimse, féach an scáileán:

Airíonna cnaipe ar an ribín agus Airíonna dialóg popped suas

3. Ansin, dún an Airíonna pána, anois, cliceáil ar dheis ar an gcnaipe, agus roghnaigh Féach an cód, féach ar an scáileán:

Féach ar an rogha Cód ar an roghchlár comhthéacs

4. Agus ansin, sa taispeáint Microsoft Visual Basic d’Fheidhmchláir an cód thíos a fhuinneogú, a chóipeáil agus a ghreamú idir na scripteanna bunaidh, féach an scáileán:

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

Fuinneog VBA leis an gcód thuas greamaithe

nótaí: Sa chód thuas, ba cheart duit an t-ábhar, an téacs coirp nó an seoladh seolta a athrú de réir do riachtanas.

5. Ansin, sábháil agus dún an cód seo, cliceáil Mód Dearaidh chun an modh dearaidh a mhúchadh. Anois, agus an cnaipe ordaithe a chruthaigh tú á chliceáil, cruthófar r-phost leis an doiciméad Word reatha mar cheangaltán, féach an scáileán:

Cruthaítear ríomhphost leis an doiciméad Word reatha mar cheangaltán

6. Faoi dheireadh, ní gá duit ach cliceáil Seol cnaipe chun an teachtaireacht seo a sheoladh.

Uirlisí Táirgiúlachta Oifige is Fearr

Kutools le haghaidh Word - Elevate Your Word Experience with Over 100 Gnéithe Suntasacha!

🤖 Gnéithe Kutools AI: Gin Ábhar / Athscríobh Téacs / Doiciméad C&A / Faigh Freagraí Tapa / Aistrigh doiciméid / Doiciméad Polainnis (Caomhnaigh Formáid)...

📘 Máistreacht Doiciméad: Leathanaigh Scoilte / Cumaisc Doiciméid / Roghnú Easpórtála i bhFormáidí Éagsúla (PDF/TXT/DOC/HTML...) / Baisc a thiontú go PDF...

Eagarthóireacht na nÁbhar: Baisc Aimsigh agus Ionadaigh thar Chomhaid Il / Athraigh Méid Gach Pictiúr / Trasnaigh Rónna Tábla agus Colúin / Tiontaigh Tábla go Téacs...

🧹 Effortless Glan: Sguab as Spásanna Breise / Sosanna Alt / Boscaí Téacs / Hipearnasc / Chun níos mó uirlisí a bhaint, ceann chuig an Bain grúpa...

Ionsáigh Cruthaitheach: cuir isteach Míle Deighilteoir / Boscaí Seiceála / Cnaipí Raidió / Cód QR / barcode / Pictiúir Il / Faigh amach níos mó sa Ionsáigh grúpa...

🔍 Roghanna Beachtais: Pionta Leathanaigh Sonracha / Táblaí / cruthanna / Míreanna Ceannteideal / Feabhsaigh an loingseoireacht le níos mó Roghnaigh bailte fearainn...

Feabhsuithe Réalta: Déan nascleanúint chuig Suíomh ar bith / Uath-Ionsáigh Téacs Athchleachtach / Scoránaigh Idir Windows Doiciméad / 11 Tiontú uirlisí...

Cluaisíní Kutools agus Kutools Plus ar an Ribbon Word
???? Ar mhaith leat triail a bhaint as na gnéithe seo? Íoslódáil Kutools le haghaidh Word anois! 🚀
 

Uirlisí Táirgiúlachta Oifige is Fearr

Kutools le haghaidh Word - 100+ Uirlisí le haghaidh Word