Kadang kala, anda mungkin perlu menyalin semua gambar yang tersemat dalam lembaran kerja Excel ke e-mel Outlook. Pada masa ini, anda boleh membaca artikel ini. Di sini kami akan memperkenalkan anda 2 kaedah cepat.
Sangat mudah untuk menyalin gambar dari lembaran kerja Excel ke e-mel Outlook. Anda hanya boleh memilih dan tekan "Ctrl + C" untuk menyalin gambar ini. Namun, jika terdapat banyak gambar yang akan disalin, menyalin satu persatu pastinya adalah cara yang bodoh dan membosankan. Oleh itu, di sini kami akan memperkenalkan anda 2 cara yang lebih berkesan. Sekarang baca untuk mendapatkannya secara terperinci.
Kaedah 1: Pilih & Salin Semua Imej dalam Lembaran Kerja Excel Secara Manual
- Sebagai permulaan, buka lembaran kerja Excel tertentu.
- Kemudian, tekan butang kekunci "F5".
- Dalam kotak dialog "Pergi Ke" pop timbul, klik butang "Khas".
- Selanjutnya, dalam kotak dialog "Pergi ke Istimewa" yang baru, pilih "Objek" dan klik "OK".
- Sekali gus, semua gambar yang disematkan telah dipilih.
- Sekarang, tekan "Ctrl + C" untuk menyalin semua gambar yang dipilih.
- Selepas itu, lancarkan Outlook dan buat e-mel baru.
- Kemudian, masukkan kursor di badan mesej dan tekan "Ctrl + V".
- Segera, semua gambar yang disalin akan ditampal ke badan e-mel, seperti gambar berikut.
Kaedah 2: Salin Semua Imej dari Lembaran Kerja ke E-mel dengan VBA
- Untuk bermula, dalam Excel, tekan "Alt + F11" untuk mengaktifkan editor VBA Excel.
- Kemudian, masukkan kod VBA di bawah ke dalam modul atau projek.
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
- Seterusnya, tekan kekunci "F5" dalam makro semasa.
- Sekali gus, e-mel baru akan dipaparkan.
- Di sini anda mungkin menerima amaran, di mana anda harus mengklik "Benarkan".
- Akhirnya, semua gambar dalam lembaran kerja Excel tertentu akan berada di badan e-mel, seperti yang ditunjukkan dalam tangkapan skrin berikut.
Perhatikan Semua Risiko di sekitar Outlook
Outlook rentan terhadap korupsi kerana terdapat terlalu banyak ancaman di sekitarnya, seperti virus, kegagalan sistem, kesalahan perkakasan, dan masalah kuasa dan sebagainya. Oleh itu, anda perlu berhati-hati dengan semua faktor berbahaya ini. Pertama sekali, anda tidak seharusnya mudah mempercayai e-mel daripada pengirim yang tidak dikenali. Selain itu, lebih baik anda membuat sandaran fail Outlook anda secara berkala. Akhir sekali, untuk betulkan PST fail dalam masa, anda harus menyediakan alat pembaikan canggih, seperti DataNumen Outlook Repair.
Pengenalan Pengarang:
Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk sql rosak dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com