Бүх диаграммуудыг Excel-ийн ажлын дэвтэрээс Outlook имэйл рүү хэрхэн хуулж авах вэ

Outlook шийдлүүд Есдүгээр сарын 29, 2025

Хэрэв та Excel-ийн ажлын дэвтэр дээрх бүх ажлын хуудаснаас бүх диаграмуудыг Outlook имэйл рүү хурдан хуулахыг хүсвэл энэ нийтлэлд тусгасан аргыг ашиглаж болно. Энэ нь танд нэг дор олж авахад тусална.

Магадгүй та Excel-ийн ажлын дэвтэрт статистикийн багц диаграмыг бүтээсэн байх. Дараа нь та эдгээр графикуудыг бүрэн ашиглаж, шинэ Outlook мэйл үүсгэхийг хүсч байна. Мэдээжийн хэрэг, та тэдгээрийг имэйлээр гараар нэг нэгээр нь хуулж авахаас татгалзаж болно. Гэсэн хэдий ч энэ нь нэлээд төвөгтэй юм. Тиймээс, дараахь зүйлсийн талаар бид танд илүү хялбар аргыг хуваалцах болно. Энэ нь товшоод л үүнийг ойлгоход тусална. Одоо үүнийг нарийвчлан авахын тулд уншина уу.

Бүх диаграммуудыг Excel-ийн ажлын дэвтэрээс Outlook имэйл рүү хуулах

Эхлээд тодорхой Excel ажлын дэвтрийг нээнэ үү.
Дараа нь Excel VBA засварлагч руу хандахын тулд “Alt + F11” товчийг дарна уу.
Шинэ цонхонд “MS Outlook Object Library” болон “MS Word Object Library” гэж нэмнэ үү. Алхамууд нь нийтлэлд танилцуулсантай төстэй байна – “VBA дээр объектын номын сангийн лавлагааг хэрхэн нэмэх вэ".
Үүний дараа дараахь VBA кодыг “ThisWorkbook” төсөлд оруулна уу.

Sub CopyAllChartsToOutlookEmail()
    Dim objOutlookApp As Outlook.Application
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
    Dim objSheet As Excel.Worksheet
    Dim objChart As Excel.ChartObject
 
    'Get Outlook Application
    On Error Resume Next
    Set objOutlookApp = GetObject(, "Outlook.Application")
    If objOutlookApp Is Nothing Then
       Set objOutlookApp = CreateObject("Outlook.Application")
    End If
 
 'Create an Outlook Email
 Set objMail = objOutlookApp.CreateItem(olMailItem)
 objMail.Display
 Set objMailDocument = objMail.GetInspector.WordEditor
 
 'Copy All Charts from Each Sheet to the New Email
 For Each objSheet In ActiveWorkbook.Worksheets
 For Each objChart In objSheet.ChartObjects
 objChart.Copy
 objMailDocument.Range(0, 0).Paste
 Next
 Next
End Sub

Үүний дараа "F5" товчлуур дээр дарж эсвэл багажны самбар дээрх "Ажиллуулах" дүрс дээр дарж макро ажиллуулна уу.
Дараа нь Outlook имэйлийг дараах зургаар харуулсан попап анхааруулгыг харуулах болно.
Та "Зөвшөөрөх" товчийг сонгоод товшоод дарахад Excel програмын ажлын дэвтэр дээрх бүх графикийг энэ имэйлд нэг дор хуулах болно.

Бүх эрсдлээс хамгаалах бамбай

Бидний өгөгдлийг тойрсон олон аюул заналхийлэл, мэдээжийн хэрэг Outlook мэдээллийн файлууд орно гэдгийг бид бүгд мэднэ. Түүнчлэн, Outlook-ийн авлигад өртөх дургүй хүн байхгүй. Тиймээс Outlook хэрэглэгч бүр өөрсдийн Outlook-ийг бүх төрлийн болзошгүй эрсдлээс хамгаалах арга хэмжээ авах ёстой. Тодорхой байхын тулд хэрэглэгчид Outlook-ийн өгөгдлийг тогтмол хадгалах хэрэгтэй бөгөөд ингэснээр хөнгөвчлөх боломжтой Outlook сэргээх олон. Түүнээс гадна PST засах хэрэгсэл гэх мэт хүчтэй хэрэгслийг барьж авсан нь дээр DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. авлига авсан кв програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com