Conas bileog oibre a sheoladh trí Outlook ó Excel amháin?

Más mian leat bileog oibre amháin a sheoladh ar ríomhphost as leabhar oibre in Excel trí Outlook, is féidir leat an bhileog oibre a sheoladh mar cheangaltán, mar ábhar coirp nó mar chomhad PDF. Ach an bhfuil aon bhealaí níos tapa ann chun déileáil leis an bhfadhb seo in Excel?

Seol bileog oibre aonair mar chomhlacht ó Excel le Seol chuig ordú Faighteora Ríomhphoist

Seol bileog oibre aonair mar cheangaltán ó Excel le cód VBA

Seol bileog oibre aonair mar chomhad PDF ó Excel le cód VBA

Seol bileog oibre aonair mar chomhlacht ó Excel le Seol chuig ordú Faighteora Ríomhphoist

Tacaíonn Excel linn an bhileog oibre ghníomhach a sheoladh ar ríomhphost mar ábhar coirp trí úsáid a bhaint as an ordú Seol chuig Faighteoir Ríomhphoist. Is féidir leat a dhéanamh mar a leanas:

Má úsáideann tú Excel 2007, 2010 nó 2013, ní mór duit é seo a chur leis Seol chuig Faighteoir Ríomhphoist ordú don Barra Uirlisí Rochtana Tapa an chéad.

1. Cliceáil ar dheilbhín an Saincheap Barra Uirlisí Rochtana Tapa, agus roghnaigh Tuilleadh Orduithe, féach ar an scáileán:

2. Agus sa Roghanna Excel bosca dialóige, roghnaigh Orduithe nach bhfuil sa Ribbon sa Roghnaigh Orduithe ó liosta anuas, ansin roghnaigh an Seol chuig Faighteoir Ríomhphoist rogha, agus cliceáil Cuir >> leis cnaipe chun an t-ordú seo a chur leis, cliceáil ar deireadh OK chun an socrú seo a shábháil. Féach an pictiúr:

3. An Seol chuig Faighteoir Ríomhphoist tá ordú curtha isteach sa Barra Uirlisí Rochtana Tapa, féach ar an scáileán:

4. Ansin cliceáil seo Seol chuig Faighteoir Ríomhphoist cnaipe deilbhín, agus tagann bosca pras amach, sa Ríomhphost bosca pras, seiceáil Seol an bhileog reatha mar chomhlacht na teachtaireachta, agus cliceáil OK. Féach an pictiúr:

5. Agus bosca eagarthóireachta ríomhphoist ar taispeáint os cionn sonraí na bileoige oibre, is féidir leat d’fhaighteoirí, ábhar agus réamhrá a iontráil sa bhosca téacs comhfhreagrach. Féach an pictiúr:

6. Ansin cliceáil Seol an Shee seot an bhileog oibre ghníomhach seo a sheoladh mar chomhlacht teachtaireachta chuig do dhuine ar leith.

Díghlasáil Excel Magic le Kutools AI

• Forghníomhú Cliste: Oibríochtaí cille a dhéanamh, sonraí a anailísiú, agus cairteacha a chruthú - iad uile tiomáinte ag orduithe simplí.
• Foirmlí Saincheaptha: Gin foirmlí oiriúnaithe chun do shreafaí oibre a shruthlíniú.
• Códú VBA: Scríobh agus cuir i bhfeidhm cód VBA gan stró.
• Léiriú Foirmle: Foirmlí casta a thuiscint gan stró.
• Aistriúchán Téacs: Briseadh bacainní teanga laistigh de do scarbhileoga.

Feabhsaigh do chumas Excel le huirlisí atá á gcumhachtú le AI. Íosluchtaigh Anois agus taithí a fháil ar éifeachtúlacht mar nach raibh riamh cheana!

Seol bileog oibre aonair mar cheangaltán ó Excel le cód VBA

Más mian leat ríomhphost a sheoladh chuig an mbileog oibre ghníomhach mar cheangaltán, is féidir leis an gcód VBA seo a leanas fabhar a dhéanamh duit.

1. Gníomhachtaigh do bhileog oibre a theastaíonn uait a sheoladh.

2. Coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Fuinneog Microsoft Visual Basic for Applications.

3. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Fuinneog an Mhodúil.

Cód VBA: seol an bhileog oibre reatha mar cheangaltán ó Excel

Sub SendWorkSheet()
'Update 20131209
Dim xFile As String
Dim xFormat As Long
Dim Wb As Workbook
Dim Wb2 As Workbook
Dim FilePath As String
Dim FileName As String
Dim OutlookApp As Object
Dim OutlookMail As Object
On Error Resume Next
Application.ScreenUpdating = False
Set Wb = Application.ActiveWorkbook
ActiveSheet.Copy
Set Wb2 = Application.ActiveWorkbook
Select Case Wb.FileFormat
Case xlOpenXMLWorkbook:
    xFile = ".xlsx"
    xFormat = xlOpenXMLWorkbook
Case xlOpenXMLWorkbookMacroEnabled:
    If Wb2.HasVBProject Then
        xFile = ".xlsm"
        xFormat = xlOpenXMLWorkbookMacroEnabled
    Else
        xFile = ".xlsx"
        xFormat = xlOpenXMLWorkbook
    End If
Case Excel8:
    xFile = ".xls"
    xFormat = Excel8
Case xlExcel12:
    xFile = ".xlsb"
    xFormat = xlExcel12
End Select
FilePath = Environ$("temp") & "\"
FileName = Wb.Name & Format(Now, "dd-mmm-yy h-mm-ss")
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
Wb2.SaveAs FilePath & FileName & xFile, FileFormat:=xFormat
With OutlookMail
    .To = "skyyang@extendoffice.com"
    .CC = ""
    .BCC = ""
    .Subject = "kte features"
    .Body = "Please check and read this document."
    .Attachments.Add Wb2.FullName
    .Send
End With
Wb2.Close
Kill FilePath & FileName & xFile
Set OutlookMail = Nothing
Set OutlookApp = Nothing
Application.ScreenUpdating = True
End Sub

nótaí: Sa chód thuas, is féidir leat an fhaisnéis seo a leanas a athrú go do riachtanas féin.

• .Chuig = "skyyang@extendoffice.com "
• .CC = ""
• .BCC = ""
• .Subject = "gnéithe kte"
• .Body = "Seiceáil agus léigh an doiciméad seo le do thoil."

4. Ansin cliceáil F5 eochair chun an cód seo a rith, agus tiocfaidh bosca pras amach, cliceáil Ceadaigh nuair a bheidh an barra dul chun cinn críochnaithe, agus ansin an bhileog oibre reatha seolta chuig d’fhaighteoir mar cheangaltán.

Seol bileog oibre aonair mar chomhad PDF ó Excel le cód VBA

Uaireanta, ní mór duit tuairisc do bhileog oibre a sheoladh chuig daoine eile ach níl tú ag iarraidh ar dhaoine eile í a mhodhnú. Sa chás seo, is féidir leat an bhileog oibre a sheoladh mar chomhad PDF ó Excel.

1. Gníomhachtaigh do bhileog oibre a theastaíonn uait a sheoladh.

2. Coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Fuinneog Microsoft Visual Basic for Applications.

3. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Fuinneog an Mhodúil.

Cód VBA: seol an bhileog oibre reatha mar chomhad PDF ó Excel

Sub SendWorkSheetToPDF()
'Update 20131209
Dim Wb As Workbook
Dim FileName As String
Dim OutlookApp As Object
Dim OutlookMail As Object
On Error Resume Next
Set Wb = Application.ActiveWorkbook
FileName = Wb.FullName
xIndex = VBA.InStrRev(FileName, ".")
If xIndex > 1 Then FileName = VBA.Left(FileName, xIndex - 1)
FileName = FileName & "_" + ActiveSheet.Name & ".pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=FileName
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
With OutlookMail
    .To = "skyyang@extendoffice.com"
    .CC = ""
    .BCC = ""
    .Subject = "kte features"
    .Body = "Please check and read this document."
    .Attachments.Add FileName
    .Send
End With
Kill FileName
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub

Nóta: Sa chód thuas, is féidir leat an fhaisnéis seo a leanas a athrú go do riachtanas.

• .Chuig = "skyyang@extendoffice.com "
• .CC = ""
• .BCC = ""
• .Subject = "gnéithe kte"
• .Body = "Seiceáil agus léigh an doiciméad seo le do thoil."

4. Ansin brúigh F5 eochair, agus popfaidh bosca pras amach, cliceáil Ceadaigh tar éis críochnú an bharra dul chun cinn, ansin cuireadh an bhileog oibre ghníomhach chuig an duine ar leith mar chomhad PDF.

Nótaí:

1. Níl na modhanna seo ar fáil ach nuair a úsáideann tú Outlook mar do chlár ríomhphoist.

2. Tar éis duit an bhileog oibre reatha a sheoladh, féadfaidh tú dul chuig do Outlook chun a chinntiú go bhfuil an ríomhphost seolta go rathúil.

Cruthaigh Liosta Ríomhphoist Ansin Seol Ríomhphoist

An Kutools le haghaidh Excel's Cruthaigh Liosta Ríomhphoist agus Seol Emails is féidir le fóntais liosta seoltaí a chruthú go tapa i mbileog oibre, ansin an t-ábhar céanna, an t-ábhar céanna agus na ceangaltáin chéanna a sheoladh chuig seoltaí ríomhphoist iolracha.

Téigh go dtí Íoslódáil

Earraí gaolmhara:

Conas leabhar oibre reatha a sheoladh trí Outlook ó Excel?

Conas raon cealla a sheoladh / ríomhphost trí ionchas ó Excel?