Note: The other languages of the website are Google-translated. Back to English

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

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:

cnaipe doc chun ríomhphost 1 a sheoladh

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:

cnaipe doc chun ríomhphost 2 a sheoladh

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:

cnaipe doc chun ríomhphost 3 a sheoladh

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

cnaipe doc chun ríomhphost 4 a sheoladh

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:

cnaipe doc chun ríomhphost 5 a sheoladh

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


Uirlisí Táirgeachta Focal Molta

 

Kutools For Word - Níos mó ná 100 Gné Ardteist le haghaidh Word, Sábháil Do 50% Am

  • Is féidir oibríochtaí casta agus arís agus arís eile a dhéanamh próiseáil aon-uaire i soicindí.
  • Cuir isteach íomhánna iomadúla thar fhillteáin i ndoiciméad Word ag an am céanna.
  • Cumaisc agus comhcheangail comhaid Word iolracha thar fhillteáin i gceann amháin leis an ord atá uait.
  • Roinn an doiciméad reatha i ndoiciméid ar leithligh de réir ceannteidil, briseadh ailt nó critéir eile.
  • Tiontaigh comhaid idir Doc agus Docx, Docx agus PDF, bailiú uirlisí le haghaidh comhshó agus roghnú coitianta, agus mar sin de ...
Sórtáil tuairimí de réir
Comments (29)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Táim ag iarraidh an ríomhphost a sheoladh agus an líne ábhair mar ábhar ceann de mo réimsí. An bhfuil sé seo indéanta?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, is féidir liom a dhéanamh le haghaidh an chartlann a convierta i PDF agus tá sé ceangailte go díreach leis an bhfocal le haghaidh bhfabhar.
Raibh míle maith agat.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Foireann Oifige Extend,

Creidim go bhfuil ‘xEmile’ mícheart. Ba cheart gur ‘xEmail’ a bheadh ​​ann.

Cé go ritheann an cód agus nach bhfuil aon cheist ann, ní dhéanfaidh an ráiteas seo a leanas faic:

Socraigh xEmail = Ní dhéanfaidh aon ní
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Hi, Abhi,
Go raibh maith agat as do thuairim, mar a dúirt tú, tá an 'xEmile' mílitrithe, ba cheart go mbeadh 'xEmail' ann. Tá an cód nuashonraithe agam.
Go raibh maith agat arís!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An féidir é seo a dhéanamh ionas nach seolann tú ach leathanach amháin de dhoiciméad?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Don,
Chun déileáil le do thasc, cuir an cód thíos i bhfeidhm, le do thoil, sa chód, ba cheart duit an leathanach tosaigh agus an leathanach deiridh a athrú chuig do chuid féin:

Fo-ordú PríobháideachButton1_Cliceáil()

Dim xCurPageStart Chomh fada, xCurPageDeireadh Chomh fada, xCurPageRaon Mar Raon

Dim xCurPage Mar Shlánuimhir, xPages Mar Shlánuimhir

Dim xOutlookObj Mar Réad

Dim xR-phost Mar Réad

Dim xDoc Mar Doiciméad, xNewDoc Mar Doiciméad

Dim xFilePath Mar Teaghrán

Dim xOldStart Chomh Fada, xOldEnd Chomh fada

Ar Lean Earráid Aghaidh

Application.ScreenUpdating = Bréagach

Socraigh xOutlookObj = CreateObject("Outlook.Application")

Socraigh xEmail = xOutlookObj.CreateItem(olMailItem)

xFilePath = CreateObject("WScript.Shell").SpecialFolders(16)

Socraigh xDoc = ActiveDocument

xOldStart = xDoc.Application.Selection.Start

xOldEnd = xDoc.Application.Selection.End

xDoc.Sábháil

xFilePath = xFilePath + "\comhad ceangailte" + VBA.Mid(xDoc.FullName, VBA.InStrRev(xDoc.FullName, ".")) 'is é an comhad ceangailte ainm an chomhaid ceangaltáin, athraigh do riachtanas

xCurPageStart = 2 'leathanach tosaigh

xCurPageEnd = 2 'leathanach deiridh

xPages = Roghnú.Information(wdNumberOfPagesInDocument)

xCurPageStart = Roghnú.GoTo(cad:=wdGoToPage, Cé acu:=wdGoToNext, Ainm:=xCurPageStart).Start

Má tá xCurPage = xPages Ansin

xCurPageEnd = ActiveDocument.Content.End

Eile

xCurPageEnd = Roghnú.GoTo(cad:=wdGoToPage, Cé acu:=wdGoToNext, Ainm:=xCurPageEnd + 1).Start

Deireadh Má

Socraigh xCurPageRange = ActiveDocument.Range(xCurPageStart, xCurPageEnd)

xCurPageRange.Roghnaigh

xCurPageRange.Cóip

Socraigh xNewDoc = Application.Documents.Add(Infheicthe:=Bréagach)

xNewDoc.Gníomhachtaigh

xNewDoc.Content.PasteAndFormat wdFormatOriginalFormatting

xNewDoc.SaveAs2 FileName:=xFilePath

xNewDoc.Dún

xDoc.Range(xOldStart, xOldEnd).Roghnaigh

Le xEmail

.Subject = "Facs-sonraí"

.Body = "Seo ríomhphost tástála."

.To = "yy@addin99.com"

.Importance = olImportanceNormal

.Ceangail.Cuir xFilePath leis

.Dráma

Deireadh Le

VBA.Kill xFilePath

Socraigh xDoc = Ní dhéanfaidh aon ní

Socraigh xEmail = Ní dhéanfaidh aon ní

Socraigh xOutlookObj = Ní dhéanfaidh aon ní

Feidhmchlár.ScreenUpdating = Fíor

Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá foirm inlíonta déanta agam i MS word. D'úsáid mé uirlisí oidhreachta le haghaidh ríomh srl. Tá cnaipe cuir isteach curtha agam freisin a oibríonn chun an fhoirm a sheoladh chuig ríomhphost. Is í an fhadhb atá ann ná nuair a athosclaíonn mé an doiciméad seo tar éis a shábháil, ní oibríonn sé. Tá iarracht déanta agam fiú é a shábháil mar dhoiciméad macra-chumasaithe ach gan úsáid ar bith. An féidir leat cabhrú le do thoil?
Go raibh maith agat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Bhí sé ag obair agam ar dtús, agus ansin ar chúis éigin anois, tugann sé earráid earráide dom 429 faoi chomhpháirt activeX nach féidir réad a chruthú. i literally díreach chóipeáil agus a ghreamú. D'oibrigh sé seo roimhe seo ach d'athraigh mé clómhéid, rinne mé an cnaipe níos mó, agus athlipéadaíodh an fotheideal. Ní dóigh liom gur athraigh mé roinnt socruithe eile trí thimpiste? aon smaoineamh cad a d'fhéadfadh sé a bheith?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh! Ba mhaith liom an cnaipe ordú a dhéanamh ríomhphost a sheoladh leis an doiciméad Word mar chorp an ríomhphoist (is foirm é mo dhoiciméad Word). An bhfuil bealach ann chun é sin a dhéanamh?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ba mhaith liom mo dhoiciméad a sheoladh mar dhoiciméad PDF seachas mar dhoiciméad Word.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Mar shampla úsáid a bhaint as téacs ó bhosca téacs/réimse téacs sa Word-document, agus é a chur isteach mar théacs i líne ábhair do R-phoist?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Sea, is é seo freisin a bhfuil mé ag iarraidh an féidir le duine ar bith cabhrú leis an iarratas seo?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An oibríonn sé seo freisin do Lotus Notes?
Cad is gá dom a athrú in "xOutlookObj"?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit an oifig a leathnú,
An féidir linn ríomhphost difriúil a shocrú nach bhfuil nasctha le Outlook? Cosúil le ríomhphost díreach chuig cuntas GoDaddy?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Táim ag iarraidh an t-eolas céanna a fháil amach. Úsáidim gmail agus ní mór dom foirm a chruthú le seoladh amach chuig seoltaí ríomhphoist éagsúla is féidir a chur ar ais go huathoibríoch chuig mo chuntas gmail.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá an doiciméad cruthaithe agam ach is í an cheist atá agam anois ná má sheolaim an fhoirm seo chun 4 duine a chomhlánú, nuair a osclaítear iad ón gceangaltán ríomhphoist osclaíonn sé sa mhodh inléite amháin agus nuair a chliceálann siad cuir isteach iarrann sé orthu í a shábháil mar a rinneadh cheana ligfidh sé don chód ríomhphost a oscailt a bheidh dírithe chugam. An bhfuil bealach timpeall air seo seachas suíomh an chomhaid a thabhairt dóibh?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An féidir leat Bcc a chur leis an gcód seo? Tá iarracht déanta agam Bcc a chur leis agus fuair mé earráid tiomsaithe don slonn a bhfuiltear ag súil leis.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Heather,

Is féidir leat Bcc a chur leis an gcód seo. Mar shampla, is féidir leat .Bcc = "zmt@addin99.com" a chur díreach faoi bhun .To = "yy@addin99.com". Mar sin déantar an cód:

Dim xOutlookObj Mar Réad
Dim xR-phost Mar Réad
Dim xDoc Mar Dhoiciméad
Application.ScreenUpdating = Bréagach
Socraigh xOutlookObj = CreateObject("Outlook.Application")
Socraigh xEmail = xOutlookObj.CreateItem(olMailItem)
Socraigh xDoc = ActiveDocument
xDoc.Sábháil
Le xEmail
.Subject = "Facs-sonraí"
.Body = "Seo ríomhphost tástála."
.To = "yy@addin99.com"
.Bcc = "zmt@addin99.com"
.Importance = olImportanceNormal
.Ceangail.Cuir xDoc.FullName leis
.Dráma
Deireadh Le
Socraigh xDoc = Ní dhéanfaidh aon ní
Socraigh xEmail = Ní dhéanfaidh aon ní
Socraigh xOutlookObj = Ní dhéanfaidh aon ní
Feidhmchlár.ScreenUpdating = Fíor

Féach ar an bpictiúr ceangailte le do thoil. Lá maith agat.
Le meas,
Mandyhttps://www.extendoffice.com/images/stories/comments/comment-zmt/Add_Bcc_to_code.png
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia dhaoibh,

Ba mhaith liom cnaipe a chur i bhfeidhm ina gcuirim cliceáil agus an doiciméad a sheoladh mar ríomhphost, ní mar cheangaltán, chuig Seoladh Ríomhphoist amháin. Ionas go mbeidh an doiciméad mar théacs an ríomhphoist. Díreach mar éifeacht an cnaipe "seol chuig faighteoir" ar an ribín.

An féidir le duine an cód ceart a thabhairt dom le haghaidh sin?

Go raibh maith agat.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,
B'fhéidir nach féidir leis an gcód cabhrú leis an doiciméad Word reatha a sheoladh mar chomhlacht an ríomhphoist, má tá sé le déanamh, caillfear formáidiú an phictiúir agus an chomhaid laistigh den doiciméad.
Más mian leat an doiciméad reatha a sheoladh mar chomhlacht ríomhphoist, is féidir leis an Mail Merge fabhar a dhéanamh duit.
An bhfuil an Cumasc Ríomhphoist uait chun ríomhphost a sheoladh?
Más gá duit, déan trácht anseo.
Go raibh maith agat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,

go raibh maith agat as do chuidiú!

Dhéanfainn iarracht é le do mholadh. Mar sin tá, tá an Cumasc Ríomhphoist de dhíth orm chun R-phost a sheoladh.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,

go raibh maith agat as do chuidiú!

Dhéanfainn iarracht é le do mholadh. An bhféadfá an cód le haghaidh cumasc ríomhphoist a thabhairt dom?

Go raibh maith agat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,
Chun doiciméad focal reatha a sheoladh mar chomhlacht ríomhphoist, is féidir leat an Seol chuig Faighteoir Ríomhphoist ordú do QAT, déan mar seo le do thoil:
1. Oscail do chomhad focal is mian leat a sheoladh, agus ansin cliceáil Comhad > Roghanna.
2. Ar an phána chlé, roghnaigh Barra Uirlisí Rochtana Tapa.
3. Roghnaigh Orduithe nach bhfuil sa Ribbon ó na Roghnaigh orduithe ó.
4. Roghnaigh agus roghnaigh Seol chuig Faighteoir Ríomhphoist agus cliceáil an cnaipe Cuir >>.
5. cliceáil OK chun an dialóg a dhúnadh.
https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-send-file-1.png

Anois, seo Seol chuig Faighteoir Ríomhphoist Beidh ordú thaispeáint suas sa Barra Uirlisí Rochtana Tapa ag barr do fhuinneog Word. Ansin, is féidir leat an fhaisnéis choibhneasta a chur isteach i gceanntásc na teachtaireachta. Tar éis duit an fhaisnéis a chríochnú, cliceáil le do thoil Seol cóip, seolfar an teachtaireacht le doiciméad word reatha mar chorp láithreach.

https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-send-file-3.png

Bain triail as seo le do thoil, tá súil gur féidir leis cabhrú leat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Fuair ​​​​mé amach go n-oibríonn an cnaipe chun ríomhphost a oscailt ach nuair a bhíonn mailmerge á úsáid éiríonn an cnaipe VBA neamhghníomhach ar chúis éigin?
Conas is féidir liom a chinntiú nuair a úsáidtear postcumasc go n-oibreoidh an cnaipe don úsáideoir chun an fhoirm a chomhlánú agus ansin an cnaipe a ghníomhachtú le do thoil?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Mike,
Nuair a úsáidim gné mailmerge, tá an cnaipe i ngníomh.
An bhféadfá d’fhadhb a mhíniú níos mionsonraithe?
Nó is féidir leat do chomhad a uaslódáil anseo, ionas gur féidir linn a sheiceáil cá bhfuil an fhadhb.
Go raibh maith agat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Skyyang,

Féach, le do thoil, an post a chuir mé isteach thíos a bhfuil an chóip iniata leis.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,
Féach an doiciméad thíos le do thoil.
Ní mór dom é a nuashonrú le haghaidh úsáid athnuachana 2023 agus nuair a dhéantar an cnaipe a chumasc is cosúil go bhfuil sé faoi mhíchumas mar a dúirt roinnt ball liom nach n-oibríonn sé.

Go raibh maith agat,

Mike
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Mike,
Tá tástáil déanta agam ar do chomhad ar mo ríomhaire, éiríonn go maith leis. Tá Oifig 2019 á úsáid agam. Féach an taispeántas thíos:
https://www.extendoffice.com/images/stories/comments/comment-skyyang/send-doeument.gif
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Skyyang,

Chinn mé go n-oibríonn sé seo nuair a bhíonn MS Word ag úsáideoir ach is cosúil go bhfuil ríomhphoist cosúil le @hotmail; @gmail; agus seoltaí ríomhphoist @live a bhfuil fadhbanna ag na húsáideoirí sin nach n-oibríonn an cnaipe?
Dealraíonn sé nach n-oibríonn sé ar fhóin chliste ach an oiread má bhraitheann an t-úsáideoir iad seo a úsáid seachas ríomhaire.
Ar deireadh fuair mé freagra ó úsáideoir eile ag baint úsáide as Windows 11 nuair nach n-oibríonn an cnaipe ar chor ar bith.

Cén taithí atá agat leis na samplaí thuas, le do thoil?

Go raibh maith agat,

Mike
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL