Sangat mudah bagi kebanyakan dari kita untuk memasukkan gambar yang disimpan di komputer ke dalam lembar kerja. Harap lakukan seperti ini:

1. Di lembar kerja, klik tempat Anda ingin menyisipkan gambar.

2. Lalu klik Menyisipkan > Film > Alat ini, lihat tangkapan layar:

3. Di muncul keluar Sisipkan Gambar jendela, buka folder yang berisi gambar, lalu tahan Ctrl kunci untuk memilih gambar yang ingin Anda masukkan, lihat tangkapan layar:

4. Lalu klik Menyisipkan tombol, gambar yang dipilih telah dimasukkan ke dalam lembar. Sekarang, Anda dapat menyesuaikan atau mengubah ukuran gambar ke sel yang Anda butuhkan, lihat tangkapan layar:

Jika Anda memiliki Excel 2013 atau versi yang lebih baru, Anda dapat memasukkan gambar dari web atau One Drive, lakukan seperti ini:

1. Di lembar kerja, klik tempat Anda ingin menyisipkan gambar.

2. Lalu klik Menyisipkan > Film > Gambar online, lihat tangkapan layar:

3. Jendela berikut akan ditampilkan. Dalam Gambar online bagian, ketikkan apa yang Anda cari ke dalam kotak teks, lalu tekan Enter kunci. Semua gambar yang sesuai dicari sekaligus, lihat tangkapan layar:

4. Lalu, pilih gambar yang Anda inginkan, lalu klik Menyisipkan tombol. Setelah menyisipkan gambar, harap ubah ukuran atau sesuaikan gambar ke posisi yang Anda butuhkan.

Kode VBA berikut dapat membantu Anda memasukkan beberapa gambar ke dalam sel berdasarkan ukuran sel. Harap lakukan seperti ini:

1. Sesuaikan ukuran sel yang Anda inginkan untuk meletakkan gambar, lalu pilih sel.

2. Lalu, tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

3. Klik Menyisipkan > Modul, dan tempelkan makro berikut di file Modul jendela.

Kode VBA: Sisipkan beberapa gambar berdasarkan ukuran sel

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Lalu tekan F5 kunci untuk menjalankan kode ini. Dalam Open jendela, pilih folder yang berisi gambar, lalu pilih gambar yang ingin Anda sisipkan, lalu klik Open tombol, dan semua gambar yang dipilih telah dimasukkan ke dalam pilihan Anda berdasarkan ukuran sel. Lihat tangkapan layar:

Jika Anda tidak terbiasa dengan kode VBA, di sini, Anda dapat menggunakan fitur daya - Impor Gambar of Kutools untuk Excel. Dengan fitur berguna ini, Anda dapat mengimpor banyak gambar ke dalam sel dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan dengan langkah-langkah berikut:

1. Klik Kutools Ditambah > Ekspor Impor > Impor Gambar, lihat tangkapan layar:

2. Di muncul keluar Impor Gambar dialog, lakukan operasi berikut:

• Tentukan urutan gambar dari daftar drop-down Impor pesanan, Anda dapat memilih Isi secara vertikal sel demi sel or Isi sel horizontal demi sel;
• Lalu klik Add tombol untuk memilih file gambar atau folder untuk menambahkan gambar ke dalam Daftar gambar;
• klik Ukuran impor tombol, di Impor Ukuran Gambar kotak dialog, pilih Ukuran sel yang cocok .
• 

3. Setelah menyelesaikan pengaturan, silakan klik impor tombol, dan sekarang, lagi Impor Gambar muncul, tentukan sel tujuan yang akan Anda impor gambarnya, lihat tangkapan layar:

4. Lalu klik OK tombol, semua gambar yang dipilih telah dimasukkan agar sesuai dengan ukuran sel tertentu seperti gambar di bawah ini yang ditampilkan:

Kode VBA berikut dapat membantu Anda memasukkan banyak gambar yang cocok dengan namanya dengan cepat, lakukan seperti ini:

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik menyadarit> Modul, dan tempelkan makro berikut di file Modul jendela.

Kode VBA: Masukkan beberapa gambar yang cocok dengan namanya

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Note: Pada kode di atas, Anda dapat mengubah tinggi dan lebar gambar di dalam skrip ".ShapeRange.Tinggi = 60",".ShapeRange.Lebar = 60"Untuk kebutuhan Anda.

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan di jendela yang terbuka, pilih folder yang berisi gambar yang ingin Anda masukkan, lihat tangkapan layar:

4. Dan kemudian, klik OK tombol, kotak prompt muncul, pilih sel yang berisi nama gambar, lihat tangkapan layar:

5. Lanjutkan mengklik OK tombol, dan kotak prompt lain diikuti, pilih sel yang Anda ingin menampilkan gambar, lihat tangkapan layar:

6. Terakhir, klik OK, dan gambar telah dimasukkan ke dalam sel berdasarkan namanya sekaligus, lihat tangkapan layar:

Jika Anda memiliki Kutools untuk Excel, Dengan yang Cocokkan Gambar Impor Fitur, Anda dapat memasukkan gambar berdasarkan nama gambar dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Klik Kutools Ditambah > Ekspor Impor > Cocokkan Gambar Impor, lihat tangkapan layar:

2. Di muncul keluar Cocokkan Gambar Impor kotak dialog, lakukan operasi berikut:

• Tentukan urutan gambar dari daftar drop-down Impor pesanan, Anda dapat memilih Isi secara vertikal sel demi sel or Isi sel horizontal demi sel;
• Lalu, dari Rentang pertandingan kotak teks, pilih nama gambar yang ingin Anda sisipkan gambar berdasarkan;
• Dan kemudian, klik Add tombol untuk memilih file gambar atau folder untuk menambahkan gambar ke dalam Daftar gambar;
• Selanjutnya, Anda harus menentukan ukuran gambar. Silakan klik Ukuran impor tombol, di Impor Ukuran Gambar kotak dialog, pilih satu ukuran gambar yang Anda butuhkan.
• 

3. Setelah menyelesaikan pengaturan, silakan klik impor tombol, pilih satu sel atau daftar sel untuk mencari gambar dari yang muncul Cocokkan Gambar Impor dialog, lihat tangkapan layar:

4. Lalu klik OK, dan semua gambar yang namanya cocok dengan nilai sel telah dimasukkan, lihat tangkapan layar:

Harap terapkan kode VBA berikut untuk memasukkan gambar berdasarkan daftar URL.

1. Pertama, sesuaikan ukuran sel yang ingin Anda temukan gambarnya.

2. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

3. Klik Menyisipkan > Modul, dan tempelkan makro berikut di file Modul jendela.

Kode VBA: Masukkan gambar dari daftar URL

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Catatan: Pada kode di atas, A2: A5 adalah rentang sel yang berisi alamat URL yang ingin Anda ekstrak gambarnya, Anda harus mengubah referensi sel sesuai kebutuhan Anda.

4. Lalu tekan F5 kunci untuk menjalankan kode ini, gambar yang cocok akan diekstraksi dari URL ke kolom yang berdekatan dan ditempatkan di tengah sel, lihat tangkapan layar:

Kutools untuk Excel memiliki fitur luar biasa - Sisipkan Gambar dari Path (URL). Dengan utilitas ini, gambar yang sesuai akan diekstraksi dari URL dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan dengan langkah-langkah berikut:

1. Klik Kutools > Menyisipkan > Sisipkan Gambar dari Path (URL), lihat tangkapan layar:

2. Di muncul keluar Sisipkan Gambar dari Path (URL) kotak dialog, setel operasi berikut:

• Pilih daftar sel URL dan rentang sel tempat Anda ingin meletakkan gambar;
• Tentukan ukuran gambar yang Anda butuhkan dari Ukuran gambar bagian.
• 

3. Dan kemudian, klik Ok tombol, dan semua gambar telah diekstraksi dari URL, lihat tangkapan layar:

Anda dapat menerapkan kode VBA berikut untuk menyisipkan gambar berdasarkan jalur file gambar.

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, lalu tempel kode berikut di Modul Jendela.

Kode VBA: Masukkan gambar dari berbagai jalur file

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Setelah memasukkan kode di atas, tekan F5 kunci untuk menjalankan kode ini, kemudian kotak prompt muncul, pilih sel dari jalur file, lihat tangkapan layar:

4. Lalu klik OK tombol, semua gambar berdasarkan jalur file telah ditampilkan ke kolom berikutnya seperti gambar berikut yang ditampilkan:

Kutools untuk Excel'S Sisipkan Gambar dari Path (URL) Fitur ini juga dapat membantu Anda untuk menampilkan gambar relatif dari jalur file.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Klik Kutools > Menyisipkan > Sisipkan Gambar dari Path (URL), di kotak dialog yang muncul, harap tentukan rentang jalur file, rentang untuk gambar keluaran, ukuran gambar yang Anda butuhkan, lihat tangkapan layar:

2. Setelah mengatur opsi, klik Ok tombol, gambar akan dimasukkan ke dalam sel yang dipilih sekaligus, lihat tangkapan layar:

Tips: Terkadang, Anda mungkin menemukan bahwa gambar tumpang tindih dengan area data lembar kerja seperti gambar di bawah ini. Ini terjadi karena gambar terlalu besar dan ukurannya tidak akan diubah agar pas dengan kotak bagian header atau footer secara otomatis.

Untuk mengatasi masalah ini, Anda hanya perlu mengubah ukuran gambar di header atau footer, lakukan dengan langkah-langkah berikut:

1. Klik di bagian header atau footer tempat gambar berada, lalu klik Format Gambar bawah Mendesain tab, lihat tangkapan layar:

2. di Format Gambar kotak dialog, di bawah Ukuran tab, sesuaikan ukuran gambar agar sesuai dengan kotak bagian header atau footer, lihat tangkapan layar:

3. Dan kemudian, klik OK, Anda akan mendapatkan hasil sesuai kebutuhan.

1. Buka lembar kerja tempat Anda ingin menyisipkan gambar latar belakang.

2. Lalu klik Page Layout > Latar Belakang, lihat tangkapan layar:

3. Di muncul keluar Sisipkan Gambar jendela, pilih satu gambar dari komputer, situs web, atau OneDrive yang Anda butuhkan, lihat tangkapan layar:

4. Sekarang, gambar telah dimasukkan ke dalam lembar kerja sebagai latar belakang seperti gambar di bawah ini yang ditampilkan:

Dengan metode di atas, Anda tidak dapat mengubah transparansi gambar latar yang disisipkan, jadi, jika warna gambar latar belakang berat, Anda tidak akan nyaman membaca data di lembar kerja. Bagian ini, saya akan berbicara tentang cara menyisipkan gambar transparan di belakang sel.

1. Klik Menyisipkan > bentuk, dan pilih bentuk persegi panjang, lihat tangkapan layar:

2. Kemudian, gambar bentuk sebesar yang Anda butuhkan di lembar kerja aktif.

3. Setelah menggambar bentuk, a menggambar Tools tab ditampilkan di pita, lalu klik dibentuk > Bentuk Garis Besar > Tidak ada garis besar, lihat tangkapan layar:

4. Dan kemudian, klik kanan bentuknya, dan pilih Format Bentuk dari menu konteks, lihat tangkapan layar:

5. Di diperluas Format Bentuk panel, di bawah Isi & Garis tab, lakukan operasi berikut:

• Di bawah Mengisi bagian, pilih Isi gambar atau tekstur pilihan;
• Klik Menyisipkan tombol dari Sumber gambar, dan pilih satu gambar yang ingin Anda sisipkan;
• Kemudian, sesuaikan transparansi gambar dengan kebutuhan Anda dari Transparansibagian y.
• 

6. Dan kemudian, Anda akan melihat bentuk yang penuh dengan gambar tampak seperti gambar latar belakang seperti gambar di atas.

Note: Setelah memasukkan jenis gambar latar belakang ini, Anda tidak akan diizinkan memasukkan teks apa pun dalam rentang gambar.

Kedua metode di atas memiliki batasannya masing-masing, metode pertama tidak dapat mengubah transparansi gambar, metode kedua tidak memungkinkan memasukkan teks ke dalam sel di dalam area gambar. Untuk mengatasi masalah ini, Kutools untuk Excel'S Sisipkan Tanda Air fitur dapat membantu Anda.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Klik Kutools > Menyisipkan > Sisipkan Tanda Air, lihat tangkapan layar:

2. Di muncul keluar Sisipkan Tanda Air kotak dialog, pilih Tanda Air Gambar, Dan Kemudian klik Pilih Gambar untuk memilih satu gambar yang ingin Anda sisipkan, lalu tentukan skala gambar dan centang opsi Washout, lihat tangkapan layar:

3. Lalu klik Ok tombol, gambar telah dimasukkan ke dalam lembar kerja sebagai gambar latar belakang.

Di Excel, Anda dapat menggunakan file Salin sebagai Gambar berfungsi untuk menyalin dan menyisipkan rentang sel sebagai gambar.

1. Pilih rentang sel yang ingin Anda salin dan sisipkan sebagai gambar.

2. Lalu klik Beranda > Copy > Salin sebagai Gambar, lihat tangkapan layar:

3. Di muncul keluar Salin Gambar dialog, pilih Gambar dari dibentuk bagian, lihat tangkapan layar:

4. Lalu klik OK tombol, sekarang, Anda hanya perlu menekan Ctrl + V untuk menempelkan gambar ke bagian mana pun dari buku kerja.

Di Excel, ada file Kamera alat yang dapat membantu Anda mengambil foto untuk data yang Anda pilih, dan kemudian menempelkannya sebagai gambar. Ketika data asli berubah, gambar yang disalin akan diubah secara dinamis.

Pertama, Anda harus menampilkan file Kamera di pita, lalu terapkan.

1. Klik Sesuaikan Bilah Alat Akses Cepat ikon, lalu klik Lebih Banyak Perintah opsi, lihat tangkapan layar:

2. Di tempat terbuka Opsi Excel kotak dialog, lakukan operasi berikut:

• Pilih Semua perintah dari Pilih perintah dari turun;
• Lalu, gulir untuk memilih Kamera dari kotak daftar;
• Dan kemudian, klik Add tombol untuk menambahkan alat ini ke Sesuaikan Bilah Alat Akses Cepat;
• Terakhir, klik OK untuk menutup kotak dialog ini.
• 

3. Dan Kamera alat telah ditampilkan di pita, lihat tangkapan layar:

4. Kemudian, pilih rentang sel yang Anda inginkan gambarnya.

5. Dan kemudian, klik Kamera alat, lalu pergi ke lembar kerja dan klik di mana saja, rentang data akan dimasukkan sebagai gambar seperti yang ditunjukkan demo di bawah ini:

Jika Anda memiliki Kutools untuk Excel, Dengan yang Perpustakaan Sumberdaya fitur, Anda dapat menyimpan data yang dipilih ke dalam Perpustakaan Sumberdaya, lalu gunakan sebagai gambar atau teks untuk masa depan sesuka Anda.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang data yang ingin Anda sisipkan sebagai gambar.

2. Lalu klik Kutools > Navigasi, lihat tangkapan layar:

3. Di diperluas Navigasi pane, klik Perpustakaan Sumberdaya ikon, lalu klik Tambahkan konten yang dipilih ke Perpustakaan Sumber Daya ikon, lihat tangkapan layar:

4. di Entri Perpustakaan Sumber Daya Baru kotak dialog, tentukan nama untuk item ini, lalu pilih grup yang ingin Anda tambahkan. Lihat tangkapan layar:

5. Lalu klik Add tombol untuk menambahkannya Perpustakaan Sumberdaya panel. Jika Anda ingin menyisipkan rentang ini sebagai gambar, hanya perlu mengklik sel untuk menemukan gambar, lalu temukan item yang disimpan dari Perpustakaan Sumberdaya panel, dan klik Sisipkan sebagai > Gambar (EMF) dari daftar drop-down item. Dan rentang data akan dimasukkan ke dalam lembar sebagai gambar, lihat tangkapan layar:

Biasanya, di Excel, Anda bisa membuat rentang bernama dinamis, lalu menggunakan gambar tertaut untuk menyelesaikan tugas ini di Excel.

1. Pertama, Anda harus membuat dua kolom yang berisi nama produk dan gambar relatif, lihat tangkapan layar:

2. Kemudian, buat daftar drop-down untuk nilai sel. Klik sel untuk menampilkan daftar drop-down, lalu klik Data > Validasi Data > Validasi Data, lihat tangkapan layar:

3. Di muncul keluar Validasi Data kotak dialog, di bawah Settings tab, pilih Daftar dari mengizinkan turun bawah, lalu pilih sel yang ingin Anda buat daftar turun bawah dari sumber kotak teks, lihat tangkapan layar:

4. Klik OK, dan daftar drop-down dengan nilai sel telah dibuat, pilih satu item dari daftar drop-down, lihat tangkapan layar:

5. Lalu klik Rumus > Tentukan Nama, lihat tangkapan layar:

6. di Nama baru kotak dialog, lakukan operasi berikut:

• Masukkan nama yang disebut myimage ke dalam file Nama kolom tulisan;
• Kemudian salin dan tempel rumus ini: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) ke dalam kotak teks Merujuk ke.

Note: Dalam rumus di atas:

• Lembar11! $ A $ 2: $ B $ 6: adalah lembar kerja dan rentang yang berisi nilai dan gambar yang ingin Anda gunakan;
• Lembar11! $ E $ 2: adalah sel di dalam lembar kerja tempat Anda membuat daftar drop-down;
• Lembar11! $ A $ 2: $ A $ 6: adalah daftar sel yang Anda buat berdasarkan daftar drop-down;
• Nomor variabel 2 adalah nomor kolom yang berisi gambar. Jika gambar Anda ada di kolom C, Anda harus memasukkan 3.

7. Dan kemudian, klik OK tombol, lalu silakan salin dan tempel gambar yang sesuai berdasarkan nilai sel di E2 dari kisaran asli ke sel F2, lihat tangkapan layar:

8. Selanjutnya silahkan pilih gambar di sel F2, lalu masukkan rumus ini = myimage (gambarku adalah nama rentang yang telah Anda buat pada langkah 6) ke dalam bilah rumus, lihat tangkapan layar:

9. Setelah memasukkan rumus, tekan Enter kunci, dan sekarang, ketika Anda memilih satu item dari daftar drop-down, gambar relatifnya akan segera ditampilkan. Lihat tangkapan layar:

Metode di atas mungkin sulit bagi kebanyakan dari kita, di sini, saya akan memperkenalkan fitur praktis - Daftar Tarik-turun Gambar of Kutools untuk Excel, dengan alat yang berguna ini, Anda dapat membuat beberapa daftar tarik-turun dengan gambar relatifnya hanya dengan beberapa klik.

Setelah menginstal Kutools untuk Excel, lakukan dengan langkah-langkah berikut:

1. Pertama, Anda harus membuat dua kolom yang berisi nama produk dan gambar relatif di lembar kerja Anda.

2. Dan kemudian, klik Kutools > Daftar Drop-down > Daftar Tarik-turun Gambar, lihat tangkapan layar:

3. di Daftar Tarik-turun Gambar kotak dialog, jika Anda telah membuat kolom nilai sel dan gambar, abaikan langkah 1, lalu, pilih data asli dan kisaran gambar dan kisaran output, lihat tangkapan layar:

4. Dan kemudian, klik Ok tombol, daftar drop-down dengan gambar telah dibuat ke dalam sel yang dipilih, dan ketika memilih item dari sel drop-down, gambar yang sesuai akan ditampilkan sekaligus, lihat demo di bawah ini:

Biasanya, Anda dapat menggunakan Save As fitur untuk menyimpan semua gambar dari workbook, lakukan seperti ini:

1. Klik File > Save As, Dalam Save As jendela, tentukan folder untuk meletakkan file yang diekspor, lalu pilih Halaman Web (*. Htm; *. Html) dari Simpan sebagai ketik daftar drop-down, lihat tangkapan layar:

2. Dan kemudian klik Save tombol, pergi ke folder tertentu, Anda akan melihat dua file, satu adalah file format HTML, dan yang lainnya adalah folder yang berisi gambar, bagan, atau objek lain dari buku kerja. Lihat tangkapan layar:

3. Kemudian Anda hanya dapat menyeret gambar ke folder lain sesuai kebutuhan.

Note: Dengan menggunakan ini Save As Fitur, Anda akan mendapatkan setiap gambar dua kali, satu lebih kecil, yang lain lebih besar, sehingga Anda dapat menyimpan gambar dengan resolusi lebih tinggi sesuai kebutuhan.

Untuk menyimpan semua gambar dari file Excel, Anda juga dapat mengubah ekstensi file menjadi RAR. Harap lakukan seperti ini:

1. Ubah ekstensi file xlsx untuk langka seperti gambar di bawah ini yang ditampilkan:

2. Kemudian, unzip file tersebut, dan Anda akan melihat 3 folder dan 1 file di folder tersebut, lihat tangkapan layar:

3. Kemudian, klik untuk membuka xl folder, lalu buka media folder, Anda akan melihat semua gambar disimpan di sini tanpa duplikat, lihat tangkapan layar:

Jika Anda memiliki Kutools untuk Excel, Dengan yang Ekspor Grafik fitur, Anda dapat dengan cepat mengekspor beberapa objek tertentu, seperti gambar, bagan, bentuk ke format gambar yang Anda butuhkan.

Setelah menginstal Kutools untuk Excel, lakukan dengan langkah-langkah berikut:

1. Klik Kutools Ditambah > Ekspor Impor > Ekspor Grafik, lihat tangkapan layar:

2. di Ekspor Grafik kotak dialog, lakukan operasi berikut:

• Pilih Film pilihan dari jenis daftar drop-down;
• Tentukan folder untuk menyimpan gambar ekspor Anda;
• Kemudian klik daftar drop-down dari Format ekspor untuk memilih satu format untuk gambar Anda.
• 

3. Terakhir, klik Ok tombol, semua gambar di buku kerja saat ini telah disimpan ke dalam folder yang Anda tentukan, lihat tangkapan layar:

Untuk menghapus gambar dari lembar kerja saat ini, kode VBA di bawah ini dapat membantu Anda, lakukan seperti ini:

1. Aktifkan lembar kerja yang berisi gambar yang ingin Anda hapus.

2. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

3. Klik Menyisipkan > Modul, dan tempelkan makro berikut di file Modul Jendela.

Kode VBA: Hapus semua gambar dari lembar kerja saat ini

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Lalu tekan F5 kunci untuk menjalankan kode ini, dan semua gambar di lembar kerja aktif dihapus sekaligus.

Jika Anda perlu menghapus gambar hanya dari berbagai sel, berikut adalah kode sederhana lain yang dapat membantu Anda.

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan tempelkan makro berikut di file Modul Jendela.

Kode VBA: Hapus gambar dari berbagai sel

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Note: Pada kode di atas, B4: C6 adalah rentang yang ingin Anda hapus gambarnya.

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan gambar dalam kisaran yang dipilih akan dihapus sekaligus, lihat tangkapan layar:

Jika Anda memiliki Kutools untuk Excel, Dengan yang Hapus Ilustrasi & Objek fitur, Anda dapat dengan cepat menghapus gambar dari lembar kerja, beberapa lembar yang dipilih atau seluruh buku kerja.

Setelah menginstal Kutools untuk Excel, lakukan dengan langkah-langkah berikut:

1. Klik Kutools > Delete > Hapus Ilustrasi & Objek, lihat tangkapan layar:

2. Di tempat terbuka Hapus Ilustrasi & Objek kotak dialog, periksa Film dari Delete bagian, dan lalu tentukan cakupan yang ingin Anda hapus gambarnya dari bawah file Lihat kedalam bagian, lihat tangkapan layar:

3. Lalu klik Ok tombol, dan semua gambar akan dihapus dari lembar kerja, lembar kerja yang dipilih atau seluruh buku kerja seperti yang Anda tentukan.