Skip to main content
 

Conas ríomhphost a sheoladh nuair a osclaíonn na faighteoirí an comhad ceangaltáin Excel?

Údar: Xiaoyang Athraithe Deiridh: 2020-08-06

Féadfaidh an chuid is mó dínn roinnt teachtaireachtaí tábhachtacha le ceangaltán comhad Excel a sheoladh chuig ár gcliaint, mar sin caithfimid a fháil amach an bhfuair an faighteoir an teachtaireacht agus gur oscail sé an ceangaltán comhaid. Sa chás seo, is féidir leat cód VBA a chruthú do do chomhad ceangaltáin Excel, nuair a osclaíonn an faighteoir an leabhar oibre agus an cód a ghníomhachtú, ansin seolfar r-phost pras chugat go huathoibríoch.

Seol r-phost nuair a osclaíonn na faighteoirí an comhad ceangaltáin Excel le cód VBA


mboilgeog cheart gorm saighead Seol r-phost nuair a osclaíonn na faighteoirí an comhad ceangaltáin Excel le cód VBA

Sula seolfaidh tú an comhad Excel seo, ba cheart duit cód a chruthú mar a leanas:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Ansin cliceáil faoi dhó An Leabhar Oibre seo faoi ​​na Tionscadal VBA roinn chun modúl bán a oscailt, agus ansin an cód seo a leanas a chóipeáil agus a ghreamú isteach sa mhodúl:

Cód VBA: Seol r-phost nuair a osclaítear an comhad Excel:

Private Sub Workbook_Open()
'Updateby Extendoffice
    Dim olkObj As Object
    Dim olkEm As Object
    Dim strbody As String
    Set olkObj = CreateObject("Outlook.Application")
    Set olkEm = olkObj.CreateItem(0)
    strbody = "Hi there" & vbNewLine & vbNewLine & _
              ThisWorkbook.Name & vbNewLine & _
              "was opened by" & vbNewLine & _
              Environ("username")
    On Error Resume Next
    With olkEm
        .To = ""
        .CC = ""
        .BCC = ""
        .Subject = "File opened"
        .Body = strbody
        .Send
    End With
    On Error GoTo 0
    Set olkEm = Nothing
    Set olkObj = Nothing
End Sub

seol doc nuair a osclaítear comhad 1

nótaí: Sa chód thuas, ba cheart duit an seoladh ríomhphoist a athrú go do sheoladh féin ar mhaith leat an ríomhphost pras a fháil, agus an t-ábhar a athrú de réir do riachtanas.

3. Ansin sábháil an leabhar oibre seo mar Leabhar Oibre Macra-Chumasaithe Excel formáid comhaid, féach an scáileán:

seol doc nuair a osclaítear comhad 2

4. Agus ansin seol teachtaireacht leis an gceangal comhaid seo chuig na faighteoirí a theastaíonn uait, nuair a dhéanfaidh na faighteoirí an comhad Excel seo a íoslódáil agus a oscailt agus an cód a ghníomhachtú, seolfar r-phost pras chugat go huathoibríoch agus inseoidh sé duit cé a d’oscail an comhad mar a leanas taispeántar an scáileán:

seol doc nuair a osclaítear comhad 3

nótaí: Níl an modh seo ar fáil ach nuair a úsáideann tú Outlook mar do chlár ríomhphoist.

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...


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á!