Excel жұмыс парағының скриншотын Outlook электрондық поштаңызға енгізудің жылдам тәсілдері

Қазір бөлісу:

Кейде Excel жұмыс парағын электрондық пошта корпусына көшірудің орнына жұмыс парағының скриншотын енгізгіңіз келуі мүмкін. Осылайша, бұл мақалада оны алудың 2 әдісі көрсетілген.

Көптеген пайдаланушылар белгілі бір Excel жұмыс парағының скриншотын экспорттағысы келеді, содан кейін скриншотты Outlook электрондық поштасының хабарлар бөліміне енгізеді. Тек скриншотта ұяшық мәндерін өзгерту мүмкін емес. Скриншотты алушылар MS Excel бағдарламасын компьютерлеріне орнатпаса да көруге болады.

Мұны 2 әдіс арқылы жүзеге асыруға болады. Біріншісі - келесі кірістірілген 1-әдіске ендірілген «Кірістіру»> «Скриншот» ерекшелігі бойынша. Ал екіншісі 2-әдісте көрсетілгендей сценарийлердің біразын қолданады. Енді, оқыңыз оларды егжей-тегжейлі алыңыз.

1-әдіс: Excel терезесінің скриншотын кірістіру

  1. Алдымен электрондық поштаға енгізгіңіз келетін Excel жұмыс парағын ашыңыз.Excel жұмыс парағы
  2. Содан кейін Outlook бағдарламасын іске қосып, жаңа электрондық пошта жасаңыз.
  3. Содан кейін Хабар терезесінде «Кірістіру» қойындысына ауысыңыз.
  4. Содан кейін «Скриншот» батырмасын басыңыз.Скриншотты электрондық поштаға салыңыз
  5. «Қол жетімді Windows» тізімінде Excel жұмыс парағының скриншотын таңдаңыз.
  6. Бірден Excel жұмыс парағының скриншоты енгізіледі.Excel терезесінің скриншоты енгізілді
  7. Енді скриншотты өз қалауыңыз бойынша қиюға болады.

2-әдіс: Excel жұмыс парағының скриншотын VBA көмегімен көшіріңіз

  1. Ең басында Excel файлын ашыңыз.
  2. Содан кейін Excel VBA редакторын қосу үшін «Alt + F11» пернелерін басыңыз.
  3. Әрі қарай «MS Outlook Object Library »және« MS Word нысаны Library «сәйкес»Нысанды қалай қосуға болады Library VBA сілтемесі«.
  4. Осыдан кейін, жобаға немесе модульге келесі VBA кодын көшіріңіз.
Sub ExportInsert_ScreenshotOfSheet_Mail()
    Dim objSheet As Excel.Worksheet
    Dim objUsedRange As Excel.Range
    Dim objOutlookApp As Outlook.Application
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.document
 
    'Change "Sheets(1)" to the specific worksheet number
    Set objSheet = ActiveWorkbook.Sheets(1)
    Set objUsedRange = objSheet.UsedRange
    'Copy the screenshot of the sheet
    objUsedRange.CopyPicture xlScreen, xlPicture

    Set objOutlookApp = CreateObject("Outlook.Application")
    Set objMail = objOutlookApp.CreateItem(olMailItem)
    objMail.Display
    Set objMailDocument = objMail.GetInspector.WordEditor
    'Paste the copied screenshot
    objMailDocument.Range(0, 0).Paste
End Sub

VBA коды - Excel жұмыс парағының скриншотын пошта корпусына көшіріңіз

  1. Кейінірек осы макросты іске қосу үшін «F5» пернесін басыңыз.
  2. Дереу жаңа электрондық пошта көрсетіледі.
  3. Шағын диалог терезесінде «Рұқсат ету» батырмасын басыңыз.Excel бағдарламасына Outlook бағдарламасына кіруге рұқсат беру
  4. Соңында, Excel жұмыс парағының скриншоты пошта корпусына енгізіледі.Excel жұмыс парағының скриншоты енгізілді

Outlook файлының зақымдалуына қарсы тұру кезінде

Егер сіз кездейсоқ кез-келген вирус жұқтырған қосымшаларды жүктеп алсаңыз, сіздің Outlook файлыңыз шабуылға ұшырауы және сол арқылы бұзылуы мүмкін. Мұндай жағдайда алдымен вирустарды жою үшін антивирустық бағдарламалық қамтамасыздандыру керек. Осыдан кейін, сіз сияқты үшінші тараптың жөндеу утилитасына инвестиция салуыңыз керек DataNumen Outlook Repairмүмкін жөндеу PST тер төгпей файл.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. mdf қалпына келтіру және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.