ზოგჯერ შეიძლება დაგჭირდეთ ყველა ჩაშენებული სურათის კოპირება Excel-ის სამუშაო ფურცელში Outlook-ის ელფოსტაზე. ამ დროისთვის შეგიძლიათ წაიკითხოთ ეს სტატია. აქვე გაგაცნობთ 2 სწრაფ მეთოდს.
მარტივია გამოსახულების კოპირება Excel-ის სამუშაო ფურცლიდან Outlook-ის ელფოსტაზე. თქვენ უბრალოდ შეგიძლიათ აირჩიოთ და დააჭიროთ "Ctrl + C" ამ სურათის დასაკოპირებლად. თუმცა, თუ ბევრი სურათია დასაკოპირებელი, სათითაოდ კოპირება უდავოდ სულელური და დამღლელი გზაა. აქედან გამომდინარე, აქ გაგაცნობთ 2 ბევრად უფრო ეფექტურ გზას. ახლა წაიკითხეთ, რომ მიიღოთ ისინი დეტალურად.
მეთოდი 1: აირჩიეთ და დააკოპირეთ ყველა სურათი Excel-ის სამუშაო ფურცელში ხელით
- დასაწყებად, გახსენით კონკრეტული Excel-ის სამუშაო ფურცელი.
- შემდეგ დააჭირეთ ღილაკს "F5".
- დიალოგურ ფანჯარაში "გადასვლა" დააჭირეთ ღილაკს "სპეციალური".
- შემდეგი, ახალ დიალოგურ ფანჯარაში "გადადით სპეციალურზე", აირჩიეთ "ობიექტები" და დააჭირეთ "OK".
- ერთდროულად შეირჩა ყველა ჩაშენებული სურათი.
- ახლა დააჭირეთ "Ctrl + C" ყველა არჩეული სურათის კოპირებისთვის.
- ამის შემდეგ გაუშვით Outlook და შექმენით ახალი ელ.წერილი.
- მოგვიანებით ჩადეთ კურსორი შეტყობინების ტექსტში და დააჭირეთ "Ctrl + V".
- დაუყოვნებლივ, ყველა კოპირებული სურათი იქნება ჩასმული ელ.ფოსტის ტექსტში, როგორც ქვემოთ მოცემული სურათი.
მეთოდი 2: დააკოპირეთ ყველა სურათი სამუშაო ფურცლიდან ელფოსტაზე VBA-ით
- დასაწყებად, Excel-ში, დააჭირეთ „Alt + F11“-ს Excel VBA რედაქტორის გასააქტიურებლად.
- შემდეგ ჩადეთ VBA კოდი ქვემოთ მოდულში ან პროექტში.
Sub CopyImagesToMail()
Dim objWorksheet As Excel.Worksheet
Dim objOutlookApp As Object
Dim objMail As Object
Dim objMailDocument As Object
Dim objShape As Excel.Shape
'Get the specific worksheet
Set objWorksheet = ThisWorkbook.Worksheets(1)
'Create a new email
Set objOutlookApp = CreateObject("Outlook.application")
Set objMail = objOutlookApp.CreateItem(objOutlookAppobjMailItem)
objMail.Display
Set objMailDocument = objMail.GetInspector.WordEditor
'Copy images to the email
For Each objShape In objWorksheet.Shapes
objShape.Copy
objMailDocument.Range(0, 0).Paste
Next
End Sub
- შემდეგი, დააჭირეთ "F5" ღილაკს მიმდინარე მაკროში.
- ერთდროულად გამოჩნდება ახალი ელ.წერილი.
- აქ შეიძლება მიიღოთ გაფრთხილება, რომელშიც უნდა დააჭიროთ "ნებას".
- საბოლოო ჯამში, ყველა სურათი Excel-ის კონკრეტულ სამუშაო ფურცელში იქნება ელ.ფოსტის ტექსტში, როგორც ნაჩვენებია შემდეგ ეკრანის სურათზე.
დააკვირდით Outlook-ის გარშემო არსებულ ყველა რისკს
Outlook მგრძნობიარეა კორუფციის მიმართ, რადგან მის გარშემო არის ძალიან ბევრი საფრთხე, როგორიცაა ვირუსი, სისტემის გაუმართაობა, ტექნიკის გაუმართაობა და დენის პრობლემები და ა.შ. აქედან გამომდინარე, თქვენ უნდა დააკვირდეთ ყველა ამ საშიშ ფაქტორს. უპირველეს ყოვლისა, არასოდეს უნდა ენდოთ უცნობი გამომგზავნის წერილებს. გარდა ამისა, სჯობს პერიოდულად განაგრძოთ Outlook ფაილის სარეზერვო ასლის შექმნა. ბოლოს და ბოლოს, იმისთვის, რომ შეასწორეთ PST დროულად შეიტანოთ, თქვენ უნდა მოამზადოთ უახლესი სარემონტო ინსტრუმენტი, როგორიცაა DataNumen Outlook Repair.
ავტორი შესავალი:
შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის კორუმპირებული sql და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად