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

Conas ríomhphost a sheoladh trí Outlook nuair a shábháiltear leabhar oibre in Excel?

Tá an t-alt seo ag caint ar r-phost a sheoladh trí Outlook nuair a shábhálfar leabhar oibre ar leith in Excel. Déan mar a léiríonn an rang teagaisc le do thoil.

Seol r-phost trí Outlook nuair a shábhálfar leabhar oibre le cód VBA


Seol r-phost trí Outlook nuair a shábhálfar leabhar oibre le cód VBA


Chun ríomhphost a sheoladh trí Outlook nuair a shábhálfar an leabhar oibre in Excel, déan mar a leanas le do thoil.

1. Sábháil an leabhar oibre mar Leabhar Oibre Macra-Chumasaithe Excel ar dtús. Cliceáil Comhad > Sábháil Mar. Sa an Sábháil Mar bosca dialóige, roghnaigh fillteán chun an leabhar oibre a shábháil, ainmnigh é sa bhosca Ainm comhaid, roghnaigh Leabhar Oibre Macra-Chumasaithe Excel ó na Ach amháin mar chineál liosta anuas, agus ansin cliceáil ar an Sábháil cnaipe. Féach an pictiúr:

2. Oscail Leabhar Oibre Macra-Chumasaithe Excel a shábháil tú díreach anois, brúigh an Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil faoi dhó le do thoil An Leabhar Oibre seo sa bharra ar chlé, ansin cóipeáil agus greamaigh an cód VBA thíos sa An Leabhar Oibre seo fuinneog cód. Féach an pictiúr:

Cód VBA: Seol r-phost nuair a shábhálfar an leabhar oibre

Private Sub Workbook_AfterSave(ByVal Success As Boolean)
'Updated by Extendoffice 20181102
    Dim xOutApp As Object
    Dim xMailItem As Object
    Dim xName As String
    On Error Resume Next
    Set xOutApp = CreateObject("Outlook.Application")
    Set xMailItem = xOutApp.CreateItem(0)
    xName = ActiveWorkbook.FullName
    With xMailItem
        .To = "Email Address"
        .CC = ""
        .Subject = "The workbook has been saved"
        .Body = "Hi," & Chr(13) & Chr(13) & "File is now updated."
        .Attachments.Add xName
        .Display
       '.send
    End With
    Set xMailItem = Nothing
    Set xOutApp = Nothing
End Sub

nótaí: Cuir an Seoladh ríomhphoist le seoladh ríomhphoist an fhaighteora ar aon dul .To = "Seoladh Ríomhphoist", agus athraigh an Cc, Ábhar chomh maith le réimsí coirp sa chód VBA de réir mar a theastaíonn uait.

3. Brúigh an Eile + Q eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

As seo amach, nuair a dhéanfaidh tú an leabhar oibre a nuashonrú agus a shábháil, cruthófar r-phost go huathoibríoch agus an leabhar oibre nuashonraithe ceangailte leis. Cliceáil le do thoil ar an Seol cnaipe chun an ríomhphost a sheoladh. Féach an pictiúr:

nótaí: Níl an cód VBA ag obair ach nuair a úsáideann tú Outlook mar do chlár ríomhphoist.


Earraí gaolmhara:


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíochtaí Office / Excel 2007-2019 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d’fhiontar nó d’eagraíocht. Gnéithe iomlána triail saor in aisce 30 lá. Ráthaíocht ar ais airgid 60 lá.
cluaisín kte 201905

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab
Sórtáil tuairimí de réir
Comments (17)
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ú
Conas an fógra ríomhphoist a uathoibriú i VBA bunaithe ar raon Dáta, gan féachaint ar an bpíosa aníos le haghaidh cead slándála chun ligean do VBA an ríomhphost a sheoladh.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Gracias. Dul i gcomhairle le: utilizando esta misma rutina, mar a dhéanann tú podría enviar el correo agus un correo específico dependiendo el valor de otra celda?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
A chara, ba mhaith liom a iarraidh ar conas nasc feidhmiúil a cheangal le fillteán áirithe ar an bhfreastalaí, má ghreamaíonn mé an nasc, tá sé cosúil sa leabhar oibre díreach cosúil le gnáth-théacs agus mar sin ní oibríonn sé sa ríomhphost faighte, conas is féidir liom cas sé ina nasc, ionas gur féidir le glacadóirí cliceáil ar sé?
Ba mhaith liom an bealach seo a úsáid in ionad an comhad excel faoi iamh a sheoladh.
Go raibh maith agat as comhairle
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Hi Robert,
Ní féidir cabhrú leis seo, fáilte romhat aon cheist faoi Excel a phostáil chuig ár bhfóram: https://www.extendoffice.com/forum.html. Gheobhaidh tú níos mó tacaíochtaí Excel ónár lucht leanúna gairmiúla nó Excel eile.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Chuir mé é seo i gcorp an ríomhphoist agus d'oibrigh sé domsa ...
"comhad:///Z:\dir1\dir2\dir3\Test1.xlsm"
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, alt deas! Rud amháin a bhí mé ag iarraidh a bhaint amach leis seo ná staid reatha an leabhair oibre a cheangal leis an ríomhphost.

Faoi láthair, ní sheolann sé ach staid bhunaidh an chomhaid agus ní fholaíonn sé aon athruithe a bheadh ​​déanta ag an úsáideoir.

Aon smaointe maidir le conas é seo a chur i bhfeidhm ag baint úsáide as macra?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Chris,
Nuashonraíodh an cód agus an fhadhb réitithe, bain triail as. Go raibh maith agat as do thuairim.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Chris,

Tá seans agam ar an gceist chéanna.
Faoi láthair úsáidtear na cóid sa mhodúl "roimh".
Rud a chiallaíonn go seolfaidh an ríomhphost an scarbhileog a shábháiltear roimhe seo.

Tá modúl eile ann "iar-choigilt".
Chuir mé an cód i bhfeidhm sa mhodúl seo agus d'oibrigh sé mar charm.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a láimhseáilfí é seo do dhoiciméad Office 365. Tá sé shábháil go huathoibríoch.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An bhfuil bealach ann chun an ríomhphost uathoibrithe a chriptiú go huathoibríoch?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Hi Mike,
Ár leithscéal ní féidir cabhrú leis an fhadhb seo a réiteach. Go raibh maith agat as do thuairim.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh! Go raibh míle maith agat as an treoirlíne seo :-) Ba mhaith liom rud éigin níos mó a dhéanamh sa chód seo - seol ríomhphost bunaithe ar na tíortha. Ciallaíonn sé go gcaithfidh mé orduithe a chruthú le if agus roghnaigh. Ceart? Scrios mé an ceangaltán ón ríomhphost cheana féin. Ba mhaith liom an nasc le cosán a chur isteach i bhfillteán ina ionad sin. Ach nuair a rith macra, níl an t-ordú bailí :-(
Is mór agam gach cúnamh conas é a chur ann.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit - Conas is féidir liom sonraí cille a chur san áireamh sa réimse ríomhphoist "cc"?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Brent,
Ag glacadh leis gur mhaith leat an luach i gcill a7 a chur san áireamh sa réimse "cc" ríomhphoist, bain triail as an VBA thíos.

Foleabhar Oibre Príobháideach_AfterSave(Rath ByVal Mar Boole)

' arna nuashonrú ag Extendoffice 20200628

Dim xOutApp Mar Réad

Dim xMailItem As Object

Dim xName As Teaghrán

Ar Lean Earráid Aghaidh

Socraigh xOutApp = CreateObject ("Outlook.Application")

Socraigh xMailItem = xOutApp.CreateItem(0)

xName = ActiveWorkbook.FullName

Le xMailItem

.To = "Seoladh Ríomhphoist"

.CC = Raon ("a7").Luach


.Subject = "Tá an leabhar saothair sábháilte"

.Body = "Dia duit," & Chr(13) & Chr(13) & "Tá an comhad nuashonraithe anois."

.Ceangail.Cuir xName

.Dráma

'.seol

Deireadh Le

Socraigh xMailItem = Ní dhéanfaidh aon ní

Socraigh xOutApp = faic

Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
A chara ar fad, an féidir le duine éigin cabhrú liom, is novice mé i gcódú VBA, tá roinnt modhnú déanta agam, ach conas is féidir liom é sin a dhéanamh seol ríomhphost má tá an leabhar oibre sábháilte, agus má tá ainm úsáideora difriúil, mar shampla ainm úsáideora de tá an stáisiún Glade2 ansin seol ríomhphost má tá an leabhar oibre a shábháil, eile ná seol.

Go raibh míle maith agat as do thacaíocht
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit florin,
Ní bhfuair tú do phointe. Cad a léiríonn d'ainm úsáideora?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit a chriostail, go raibh maith agat as do fhreagra, is úsáideoir comhshaoil ​​é usernane, agus rinne mé é, d'úsáid mé feidhm if agus fobhealach scoir.
Go raibh míle maith agat an méid sin.
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