Conas ríomhphost a sheoladh le ceangaltáin iolracha ceangailte in Excel?
Tá an t-alt seo ag caint ar r-phost a sheoladh trí Outlook le ceangaltáin iolracha ceangailte in Excel.
Seol r-phost le ceangaltáin iolracha ceangailte in Excel le cód VBA
Seol r-phost le ceangaltáin iolracha ceangailte in Excel le cód VBA
Déan mar a leanas le do thoil chun ríomhphost a sheoladh le ceangaltáin iolracha ceangailte in Excel.
1. Cuir isteach cnaipe ordaithe trí chliceáil Forbróir > Ionsáigh > Cnaipe Ordú (Rialú ActiveX). Féach an pictiúr:
2. Tar éis duit an Cnaipe Ordú a chur isteach, cliceáil ar dheis air agus roghnaigh Féach an cód ón roghchlár comhthéacs.
3. San oscailt Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil le do thoil uirlisí > tagairtí mar a thaispeántar thíos an pictiúr.
4. Sa Tagairtí - VBAProject bosca dialóige, faigh agus seiceáil an Leabharlann Réada Microsoft Outlook rogha, agus ansin cliceáil ar an OK cnaipe.
5. Ansin cuir an cód VBA faoi bhun an chóid bhunaidh i bhfuinneog an Chóid.
Cód VBA: Seol r-phost ceangailte le ceangaltáin iolracha in Excel
Private Sub CommandButton1_Click()
Dim xStrFile As String
Dim xFilePath As String
Dim xFileDlg As FileDialog
Dim xFileDlgItem As Variant
Dim xOutApp As Outlook.Application
Dim xMailOut As Outlook.MailItem
Application.ScreenUpdating = False
Set xOutApp = CreateObject("Outlook.Application")
Set xMailOut = xOutApp.CreateItem(olMailItem)
Set xFileDlg = Application.FileDialog(msoFileDialogFilePicker)
If xFileDlg.Show = -1 Then
With xMailOut
.BodyFormat = olFormatRichText
.To = ""
.Subject = "test"
.HTMLBody = "test"
For Each xFileDlgItem In xFileDlg.SelectedItems
.Attachments.Add xFileDlgItem
Next xFileDlgItem
.Display
End With
End If
Set xMailOut = Nothing
Set xOutApp = Nothing
Application.ScreenUpdating = True
End Sub
nótaí: sonraigh d’fhaighteoir ríomhphoist, d’ábhar agus do chorp trí athrú a dhéanamh ar an athróg .Chun = , .Subject = "tástáil" agus .HTMLBody = "tástáil" línte sa chód.
6. Brúigh an Eile + Q eochracha le chéile chun imeacht as an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
7. cliceáil Forbróir > Mód Dearaidh chun an Mód Dearaidh a mhúchadh. Féach an pictiúr:
8. Cliceáil an Cnaipe Ordú chun an cód a rith. Sa popping suas Brabhsáil fuinneog, roghnaigh na comhaid a chaithfidh tú a cheangal sa ríomhphost, agus ansin cliceáil ar an OK cnaipe. Féach an pictiúr:
9. Ansin cruthaítear r-phost le réimsí agus ceangaltáin shonraithe liostaithe amach. Cliceáil le do thoil ar an Seol cnaipe chun é 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.
Seol r-phost go héasca trí Outlook bunaithe ar réimsí liosta seoltaí cruthaithe in Excel:
An Seol Ríomhphost fóntais de Kutools le haghaidh Excel cuidíonn sé le húsáideoirí ríomhphost a sheoladh trí Outlook bunaithe ar liosta postála cruthaithe in Excel.
Íoslódáil agus bain triail as anois! (Réalta saor in aisce 30-lá)
Earraí gaolmhara:
- Conas ríomhphost a sheoladh chuig seoltaí ríomhphoist atá sonraithe i gcealla in Excel?
- Conas ríomhphost a sheoladh le raon sonraithe a chóipeáil agus a ghreamú isteach sa chomhlacht ríomhphoist in Excel?
- Conas síniú a chur isteach i ríomhphost Outlook agus é á sheoladh ag vba in Excel?
- Conas ríomhphost a sheoladh má tá an dáta dlite comhlíonta in Excel?
- Conas ríomhphost a sheoladh go huathoibríoch bunaithe ar luach cille in Excel?
Uirlisí Táirgiúlachta Oifige is Fearr
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á!