Excel resimleri: Excel'de birden fazla resmi veya görseli ekleme, yeniden boyutlandırma, kaydetme ve silme

Bilgisayarda saklanan resimleri çalışma sayfasına eklemek çoğu kullanıcı için oldukça kolaydır. İşte nasıl yapacağınız:

1. Çalışma sayfasında, resim eklemek istediğiniz yere tıklayın.

2. Ardından, Ekle > Resimler > Bu Cihaz seçeneğine tıklayın; ekran görüntüsüne bakın:

3. Açılan Resim Ekle penceresinde, resimleri içeren klasörü açın ve eklemek istediğiniz resimleri seçmek için Ctrl tuşunu basılı tutun. Ekran görüntüsüne bakın:

4. Ardından, Ekle düğmesine tıklayın; seçilen resimler sayfaya eklenmiş olur. Artık resimleri ihtiyaç duyduğunuz hücrelere göre konumlandırabilir veya yeniden boyutlandırabilirsiniz—ekran görüntüsüne bakın:

Excel 2013 veya daha yeni bir sürüme sahipseniz, resimleri doğrudan web'den veya OneDrive'dan ekleyebilirsiniz. İşte nasıl yapacağınız:

1. Çalışma sayfasında, Resim Ekle istediğiniz yere tıklayın.

2. Ardından, Ekle > Resimler > Çevrimiçi Resimler seçeneğine tıklayın; ekran görüntüsüne bakın:

3. Bir sonraki pencere görüntülenecektir. Çevrimiçi Resimler bölümünde aradığınızı metin kutusuna yazın ve ardından Enter tuşuna basın. Tüm ilgili resimler anında aranacaktır—ekran görüntüsüne bakın:

4. Ardından istediğiniz resimleri seçin ve Ekle düğmesine tıklayın. Resimleri ekledikten sonra, lütfen resimleri ihtiyaç duyduğunuz konuma göre yeniden boyutlandırın veya konumlandırın.

Aşağıdaki VBA kodu, resimleri hücre boyutuna oturtarak hücrelere eklemenizi sağlar. İşte nasıl yapacağınız:

1. Resmi yerleştirmek istediğiniz hücrenin boyutunu ayarlayıp ardından hücreleri seçin.

2. Ardından, ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

3. Ekle > Modül seçeneğine tıklayın ve aşağıdaki makroyu Modül penceresine yapıştırın.

VBA kodu: Hücre boyutuna göre birden çok resim ekleme

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. Ardından kodu çalıştırmak için F5 tuşuna basın. Aç penceresinde resimleri içeren klasörü seçin, eklemek istediğiniz resimleri belirleyin ve ardından Aç düğmesine tıklayın; tüm seçilen resimler, seçim alanınıza hücre boyutuna göre eklenecektir. Ekran görüntüsüne bakın:

VBA koduyla aşina değilseniz, Resimleri İçe Aktar özelliğini kullanabilirsiniz: Kutools for Excel. Bu kullanışlı özellik sayesinde birden fazla resmi hücrelere hızlı ve kolay bir şekilde içe aktarabilirsiniz.

1.KUTOOLS PLUS>İçe/Dışa Aktar>Resimleri İçe Aktarseçeneğine tıklayın, ekran görüntüsüne bakın:

2. Açılan Resimleri İçe Aktar iletişim kutusunda aşağıdaki işlemleri yapın:

• İçe Aktar Sırası açılır listesinden resim sırasını belirtin;Sütun bazlı, ardından satır bazlı doldurveya Satır bazlı, ardından sütun bazlı doldurseçebilirsiniz;
• Ardından, resimleri Resim Dosyaları veya klasöre eklemek için Ekledüğmesine tıklayın;Resim Listesi;
• İçe Aktar Boyutu düğmesine tıklayın, Resim İçeri Aktarma Boyutu iletişim kutusunda Hücre Boyutunu Eşleştir seçeneğini belirleyin.
• 

3. Ayarları tamamladıktan sonra lütfen İçe Aktar düğmesine tıklayın; ardından başka bir Resimleri İçe Aktar penceresi açılacaktır. Resmi içeri aktarmak istediğiniz hedef hücreleri belirtin (ekran görüntüsüne bakın):

4. Ardından, Tamam düğmesine tıklayın; tüm seçilen resimler, aşağıdaki ekran görüntüsünde gösterildiği gibi belirli hücrelerin boyutuna uygun şekilde eklenmiş olacaktır:

Aşağıdaki VBA kodu, adlarıyla eşleşen birden fazla resmi hızlıca eklemenize yardımcı olur. Lütfen aşağıdaki adımları izleyin:

1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basılı tutun.

2. Ekle > Modül’e tıklayın ve aşağıdaki makroyu Modül penceresine yapıştırın.

VBA kodu: Adlarıyla eşleşen birden fazla resim ekleme

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

Not: Yukarıdaki kodda, resmin yüksekliğini ve genişliğini “.ShapeRange.Height = 60” ve “.ShapeRange.Width = 60” satırlarında ihtiyacınıza göre ayarlayabilirsiniz.

3. Ardından, bu kodu çalıştırmak için F5 tuşuna basın ve açılan pencerede eklemek istediğiniz resimleri içeren klasörü seçin. Ekran görüntüsüne bakın:

4. Ardından, Tamam düğmesine tıklayın; bir uyarı kutusu çıkar ve "Lütfen seçin: Görsel Adı içeren hücreleri seçin" iletisini gösterir. Ekran görüntüsüne bakın:

5. Tamam düğmesine tıklamaya devam edin; ardından resimleri yerleştirmek istediğiniz hücreleri seçmenizi isteyen başka bir uyarı kutusu çıkar—lütfen ekran görüntüsüne bakın:

6. Son olarak, Tamam düğmesine tıklayın; resimler, adlarına göre aynı anda hücrelere yerleştirilir. Ekran görüntüsüne bakın:

Eğer Kutools for Excel yazılımınız varsa, Resimleri Eşleştir İçe Aktar özelliğini kullanarak resimleri Görsel Adı'na göre hızlı ve kolayca ekleyebilirsiniz.

1. Tıklayın KUTOOLS PLUS > İçe/Dışa Aktar > Resimleri Eşleştir İçe Aktar, ekran görüntüsüne bakın:

2. Açılan Resim Eşleştirerek İçe Aktar iletişim kutusunda lütfen aşağıdaki işlemleri yapın:

• İçe Aktar Sırası açılır listesinden resim sırasını belirtin; şunlardan birini seçebilirsiniz:Sütun bazlı, ardından satır bazlı doldurveya Satır bazlı, ardından sütun bazlı doldur;
• Ardından,Eşleştirme Aralığımetin kutusundan, Resim Ekle temel almak istediğiniz resim adlarını seçin;
• Daha sonra, resimleri Resim Dosyaları veya klasöre eklemek için Ekledüğmesine tıklayın;Resim Listesi;
• Ardından resim boyutunu belirtmeniz gerekir. Lütfen İçe Aktar Boyutu düğmesine tıklayın ve Resim İçeri Aktarma Boyutu iletişim kutusundan ihtiyacınız olan resim boyutlarından birini seçin.
• 

3. Ayarları tamamladıktan sonra lütfen İçe Aktar düğmesine tıklayın. Açılan Resimleri Eşleştir İçe Aktar iletişim kutusundan, resimleri yerleştirmek istediğiniz hücreyi veya hücre aralığını seçin. Ekran görüntüsüne bakın:

4. Ardından, Tamam düğmesine tıklayın; hücre değerleriyle adları eşleşen tüm resimler eklenir. Ekran görüntüsüne bakın:

URL’lerden oluşan bir liste temelinde resim eklemek için lütfen aşağıdaki VBA kodunu kullanın.

1. İlk olarak, resimleri yerleştirmek istediğiniz bitişik hücrelerin boyutunu ayarlayın.

2. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basılı tutun.

3. Ekle > Modül’e tıklayın ve aşağıdaki makroyu Modül penceresine yapıştırın.

VBA kodu: URL’lerden oluşan bir listeden resim ekleme

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

Notlar: Yukarıdaki kodda, A2:A5 aralığı, resimleri çekmek istediğiniz URL’leri içeren hücrelerdir; hücre referanslarını ihtiyacınıza göre güncellemelisiniz.

4. Ardından, bu kodu çalıştırmak için F5 tuşuna basın; eşleşen resimler URL’lerden bitişik sütuna çekilir ve hücrelerin ortasına yerleştirilir. Ekran görüntüsüne bakın:

Kutools for Excel’in harika bir özelliği var: Yoldan (URL) Resim Ekle. Bu araç sayesinde ilgili resimler, URL’lerden hızlı ve kolayca çekilir.

1. Kutools > Ekle > Yoldan Resim Ekle seçeneğine tıklayın; ekran görüntüsüne bakın:

2. Açılan Yoldan Resim Ekle iletişim kutusunda lütfen aşağıdaki işlemleri yapın:

• URL hücrelerinin listesini ve resimleri yerleştirmek istediğiniz hücre aralığını seçin;
• Resimlerin boyutunu, ihtiyacınıza göre Resim Boyutu bölümünden belirleyin.
• 

3. Ardından, Tamam düğmesine tıklayın; tüm resimler URL’lerden çekilir. Ekran görüntüsüne bakın:

Resim Dosya Yolu temelinde resim eklemek için aşağıdaki VBA kodunu kullanabilirsiniz.

1. Açmak için ALT + F11tuşlarına basılı tutun Microsoft Visual Basic for Applicationspenceresi.

2. Ekle > Modül’e tıklayın ve ardından aşağıdaki kodu Modül penceresine yapıştırın.

VBA kodu: Resim Ekle bir Dosya Yolu aralığından

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. Yukarıdaki kodu ekledikten sonra, bu kodu çalıştırmak için F5 tuşuna basın; ardından bir uyarı kutusu çıkar ve "Lütfen seçin: Dosya Yolu" hücrelerini seçin. Ekran görüntüsüne bakın:

4. Ardından, Tamam düğmesine tıklayın; dosya yolu temelinde tüm resimler, aşağıdaki ekran görüntüsünde gösterildiği gibi bir sonraki sütunda görüntülenir:

Kutools for Excel’in Yoldan Resim Ekle özelliği, dosya yoluna göre ilgili resimleri görüntülemenize de yardımcı olabilir.

1. Kutools > Ekle > Yoldan Resim Ekle seçeneğine tıklayın; açılan iletişim kutusunda, resimlerin alınacağı Dosya Yolu aralığını, çıktı aralığını ve Görüntü Boyutu’nu belirtin (ekran görüntülerine bakın):

2. Seçenekleri ayarladıktan sonra Tamam düğmesine tıklayın; resimler seçili hücrelere aynı anda yerleştirilir. Ekran görüntüsüne bakın:

İpuçları: Bazen aşağıdaki ekran görüntüsünde gösterildiği gibi, resmin çalışma sayfasının veri alanıyla çakıştığını görebilirsiniz. Bu durum, resmin çok büyük olmasından ve üstbilgi/altbilgi bölümüne otomatik olarak sığacak şekilde yeniden boyutlandırılmamasından kaynaklanır.

Bu sorunu çözmek için üstbilgi veya altbilgideki resmi yeniden boyutlandırmanız yeterlidir. Lütfen aşağıdaki adımları izleyin:

1. Resmin bulunduğu üstbilgi veya altbilgi bölümüne tıklayın ve ardından Tasarım sekmesi altında yer alan Resmi Biçimlendir seçeneğine tıklayın (ekran görüntüsüne bakın):

2.Resmi Biçimlendiriletişim kutusunda,Boyutsekmesi altında resmin boyutunu üstbilgi veya altbilgi bölümü kutusuna sığacak şekilde ayarlayın, ekran görüntüsüne bakın:

3. Ardından, ihtiyacınız olan sonucu elde etmek için Tamam düğmesine tıklayın.

1. Arka plan resmi eklemek istediğiniz çalışma sayfasını açın.

2. Ardından, Sayfa Düzeni > Arka Plan öğesine tıklayın; ekran görüntüsüne bakın:

3. Açılan Resim Ekle penceresinde, bilgisayarınızdan, bir web sitesinden veya OneDrive’dan ihtiyacınıza uygun resmi seçin; ekran görüntüsüne bakın:

4. Resim, aşağıdaki ekran görüntüsünde gösterildiği gibi artık çalışma sayfasına arka plan olarak eklenmiştir:

Yukarıdaki yöntemle eklenen arka plan resminin şeffaflığını ayarlayamazsınız. Bu yüzden arka plan resmi koyu renkliyse, çalışma sayfasındaki verileri okumak zorlaşabilir. Bu bölümde, hücrelerin arkasına şeffaf bir resim ekleme yöntemini anlatacağım.

1.Ekle>Şekilleröğesine tıklayın ve bir dikdörtgen şekil seçin; ekran görüntüsüne bakın:

2. Ardından, etkin çalışma sayfasında ihtiyacınız kadar büyük bir şekil oluşturun.

3. Şekli çizdikten sonra Şerit’te bir Çizim Araçları sekmesi görüntülenir; ardından Biçim > Şekil Anahattı > Anahat Yok öğesine tıklayın; ekran görüntüsüne bakın:

4. Ardından, şekle sağ tıklayıp bağlam menüsünden Şekli Biçimlendir seçeneğini seçin; ekran görüntüsüne bakın:

5. Genişletilen Şekli Biçimlendir bölmesinde, Dolgu ve Çizgi sekmesi altında aşağıdaki işlemleri yapın:

• Dolgubölümünde,Resim veya doku dolgususeçeneğini işaretleyin;
• Ekledüğmesine tıklayın,Resim kaynağıbölümünden eklemek istediğiniz resmi seçin;
• Ardından, resmin saydamlığını Saydamlık bölümünden ihtiyacınıza göre ayarlayın.
• 

6. Ardından, şeklin resimle doldurulmuş halinin yukarıdaki ekran görüntüsünde gösterildiği gibi bir arka plan resmine benzeyeceğini göreceksiniz.

Not: Bu tür bir arka plan resmi ekledikten sonra, resmin kapladığı alana metin giremezsiniz.

Her iki yöntemin de kendine özgü sınırlamaları vardır: İlk yöntemde resmin şeffaflığı değiştirilemez; ikinci yöntemdeyse resmin kapladığı hücrelere metin girilemez. Bu sorunları aşmak için Kutools for Excel’in Filigran Ekle özelliği size yardımcı olabilir.

1.Kutools>Ekle>Filigran Ekleöğesine tıklayın; ekran görüntüsüne bakın:

2. Açılan Filigran Ekle iletişim kutusunda, Resim Filigranı seçeneğini belirleyin. Ardından, eklemek istediğiniz resmi seçmek için Resim Seç düğmesine tıklayın, resmin ölçeğini ayarlayın ve Soluklaştırma (Washout) seçeneğini işaretleyin; ekran görüntüsüne bakın:

3. Ardından, Tamam düğmesine tıklayın; resim, çalışma sayfasına arka plan resmi olarak eklenmiş olacaktır.

Excel’de bir hücre aralığını resim olarak kopyalayıp yapıştırmak için Resim Olarak Kopyala işlevini kullanabilirsiniz.

1. Resim olarak kopyalayıp eklemek istediğiniz hücre aralığını seçin.

2. Ardından, Giriş > Kopyala > Resim Olarak Kopyala öğesine tıklayın; ekran görüntüsüne bakın:

3. Açılan Resmi Kopyala iletişim kutusunda, Resim seçeneğini Biçim bölümünden seçin; ekran görüntüsüne bakın:

4. Ardından, resmi çalışma kitabının herhangi bir yerine yapıştırmak için TAMAM düğmesine tıklayın; artık yalnızca Ctrl + V tuşlarına basmanız yeterli!

Excel’de, veri seçiminiz için bir fotoğraf çekmenize ve ardından bunu resim olarak yapıştırmanıza olanak tanıyan bir Kamera aracı bulunur. Orijinal veriler değiştiğinde, kopyalanan resim dinamik olarak güncellenir.

Öncelikle Şerit’te Kamera aracını görüntüleyip ardından kullanmaya başlamanız gerekir.

1.Hızlı Erişim Araç Çubuğunu Özelleştirsimgesine tıklayın ve ardından Diğer Komutlarseçeneğine tıklayın; ekran görüntüsüne bakın:

2. Açılan Excel Seçenekleri iletişim kutusunda aşağıdaki işlemleri yapın:

• Tüm Komutlarseçeneğini Komutları şuradan seçinaçılır listesinden seçin;
• Ardından, liste kutusunda aşağı kaydırarak Kameraseçeneğini belirleyin;
• Daha sonra bu aracı Ekledüğmesine tıklayarak Hızlı Erişim Araç Çubuğunu Özelleştirbölümüne ekleyin;
• Son olarak, bu iletişim kutusunu kapatmak için Tamam düğmesine tıklayın.
• 

3. Böylece Kamera aracı Şerit’te görüntülenir; ekran görüntüsüne bakın:

4. Ardından, resmini almak istediğiniz hücre aralığını seçin.

5. Ardından, çalışma sayfasına gidip herhangi bir yere tıklayarak Kamera aracını kullanın; böylece Veri Aralığı aşağıdaki örnekte gösterildiği gibi bir resim olarak eklenecektir:

Eğer Kutools for Excel yazılımınız varsa, Kaynaklar özelliğini kullanarak Veri Seç’i Kaynaklar’a kaydedebilir ve ileride istediğiniz gibi resim veya metin olarak kullanabilirsiniz.

1. Resim olarak eklemek istediğiniz veri aralığını seçin.

2. Ardından, Kutools > Gezinme öğesine tıklayın; ekran görüntüsüne bakın:

3. Genişletilmiş Gezinme bölmesinde, Kaynaklar simgesine ve ardından Seçilen İçeriği Otomatik Metin'e Ekle simgesine tıklayın; ekran görüntüsüne bakın:

4. Otomatik Metin'e Ekle iletişim kutusunda bu öğe için bir ad belirtin ve ardından eklemek istediğiniz grubu seçin. Ekran görüntüsüne bakın:

5. Ardından, Ekle düğmesine tıklayarak bunu Kaynaklar bölmesine ekleyin. Bu aralığı resim olarak eklemek istiyorsanız, resmin konumlandırılacağı hücreye tıklayın ve ardından kaydedilen öğeyi Kaynaklar bölmesinden bulun. Öğenin açılır listesinden Şu Şekilde Ekle > Resim (EMF) seçeneğine tıklayın. Böylece veri aralığı, sayfaya bir resim olarak eklenecektir; ekran görüntülerine bakın:

Normalde Excel’de bu görevi çözmek için dinamik olarak adlandırılmış bir aralık oluşturup bağlantılı resmi kullanabilirsiniz.

1. Öncelikle ürün adlarını ve ilgili resimleri içeren iki sütun oluşturun; ekran görüntüsüne göz atın:

2. Ardından, hücre değerleri için bir açılır liste oluşturun. Bir hücreye tıklayarak açılır listeyi görüntüleyin, ardından Veri > Veri Doğrulama > Veri Doğrulama seçeneğine tıklayın; ekran görüntüsüne bakın:

3. Açılan Veri Doğrulama iletişim kutusunda, Ayarlar sekmesinden Liste seçeneğini İzin Ver açılır menüsünden seçin ve ardından Kaynak metin kutusuna, açılır listeyi oluşturmak istediğiniz hücreleri girin; ekran görüntüsüne bakın:

4.Tamam düğmesine tıklayın; böylece hücre değerlerini içeren açılır liste oluşturulur. Açılır listeden bir öğe seçin—ekran görüntüsüne bakın:

5. Ardından, Formüller > Ad Tanımla seçeneğine tıklayın; ekran görüntüsüne bakın:

6.Yeni Adiletişim kutusunda aşağıdaki işlemleri yapın:

• Admetin kutusuna «myimage» adını girin;
• Ardından şu formülü kopyalayıp yapıştırın:=INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2)«Şuna başvurur» metin kutusuna.

  

  Not: Yukarıdaki formülde:

  • Sheet11!$A$2:$B$6: Değerleri ve resimleri içeren çalışma sayfası ve aralıktır;
  • Sheet11!$E$2: Açılan liste oluşturduğunuz çalışma sayfası içindeki hücredir;
  • Sheet11!$A$2:$A$6: Açılan listeyi oluşturduğunuz hücrelerin listesidir;
  • Değişken sayı 2, resimleri içeren sütunun numarasıdır. Resimleriniz C sütunundaysa, 3 girmelisiniz.

7. Ardından, Tamam düğmesine tıklayın ve E2 hücresindeki değerle eşleşen resmi orijinal aralıktan F2 hücresine kopyalayıp yapıştırın; ekran görüntüsüne bakın:

8. Ardından, F2 hücresindeki resmi seçin ve bu formülü Formül Çubuğu’na girin:=myimage(myimage, 6. adımda oluşturduğunuz Hücre adıdır); ekran görüntüsüne bakın:

9. Formülü girdikten sonra Enter tuşuna basın. Artık açılır listeden bir öğe seçtiğinizde ilgili resim hemen görüntülenecektir. Ekran görüntüsüne bakın:

Yukarıdaki yöntem çoğu kullanıcı için zorlu olabilir. Bu nedenle sizlere Resimli Aşağı Açılır Liste özelliğini tanıtıyoruz! Kutools for Excel eklentisinin bu kullanışlı aracı sayesinde, yalnızca birkaç tıklamayla ilişkili resimleriyle birlikte birden fazla açılır liste oluşturabilirsiniz.

1. Öncelikle, çalışma sayfanızda ürün adlarını ve bunlara ait resimleri içeren iki sütun oluşturun.

2. Ardından, Kutools > Açılır Liste > Resimli Aşağı Açılır Liste seçeneğine tıklayın; ekran görüntüsüne bakın:

3. Resimli Aşağı Açılır Liste iletişim kutusunda, hücre değerleri ve resimler için sütunları zaten oluşturduysanız 1. adımı atlayabilirsiniz. Ardından, orijinal veri ve resim aralığını belirleyin ve Liste Yerleştirme Alanı’nı seçin; ekran görüntüsüne bakın:

4. Ardından, Tamam düğmesine tıklayın. Resimli açılır listeler seçili hücrelere eklenmiş olur ve açılır listeden bir öğe seçildiğinde ilgili resim anında görüntülenir; aşağıdaki demo’ya bakın:

Genellikle, çalışma kitabındaki tüm resimleri kaydetmek için Farklı Kaydetözelliğini kullanabilirsiniz; şu şekilde yapın:

1.Dosya>Farklı Kaydetseçeneğine tıklayın.Farklı Kaydetpenceresinde dışa aktarılan dosyaları koymak için bir klasör belirtin ve ardından Web Sayfası(*.htm;*.html)seçeneğini Farklı kaydetmetürü açılır listesinden seçin; ekran görüntüsüne bakın:

2. Ardından Kaydet düğmesine tıklayın. Belirtilen klasöre gidin; burada bir HTML formatı dosyası ve çalışma kitabındaki resimleri, grafikleri veya diğer nesneleri içeren başka bir klasör göreceksiniz. Ekran görüntüsüne bakın:

3. Ardından resimleri gerektiği gibi başka bir klasöre kolayca sürükleyebilirsiniz.

Not: Bu Farklı Kaydet özelliğini kullandığınızda her resimden iki kopya elde edersiniz: biri küçük, diğeri büyük boyutlu. Böylece ihtiyacınıza göre yüksek çözünürlüklü resimleri kaydedebilirsiniz.

Excel dosyasından tüm resimleri kaydetmek için dosya uzantısını RAR olarak değiştirebilirsiniz. İşte nasıl yapacağınız:

1. Dosya uzantısını xlsx yerine aşağıdaki ekran görüntüsünde gösterildiği gibi rar yapın:

2. Ardından dosyayı çıkarın (unzip); klasörde 3 klasör ve 1 dosya göreceksiniz—ekran görüntüsüne bakın:

3. Ardından xl klasörüne tıklayarak açın ve ardından media klasörünü açın; burada tüm resimlerin yinelenmeden saklandığını göreceksiniz. Ekran görüntüsüne bakın:

Eğer Kutools for Excel eklentiniz varsa, Grafik Dışa Aktar özelliğiyle resimler, grafikler veya şekiller gibi belirli nesneleri ihtiyaç duyduğunuz görüntü formatına hızlıca dışa aktarabilirsiniz.

1.KUTOOLS PLUS>İçe/Dışa Aktar>Grafik Dışa Aktarseçeneğine tıklayın; ekran görüntüsüne bakın:

2.Grafik Dışa Aktariletişim kutusunda aşağıdaki işlemleri yapın:

• Resimlerseçeneğini Türleraçılır listesinden seçin;
• Dışa aktarılacak resimleriniz için bir klasör belirleyin;
• Ardından, resimleriniz için bir biçim seçmek üzere Dışa aktarma formatı açılır listesine tıklayın.
• 

3. Son olarak, Tamam düğmesine tıklayın; belirttiğiniz klasöre, Geçerli Çalışma Kitabı içindeki tüm resimler kaydedilmiş olacaktır. Ekran görüntüsüne bakın:

Geçerli Çalışma Sayfası’den resimleri silmek için aşağıdaki VBA kodu yardımcı olabilir; şu şekilde yapın:

1. Resimlerin silinmesini istediğiniz çalışma sayfasını etkinleştirin.

2. ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

3.Ekle>Modülseçeneğine tıklayın ve aşağıdaki makroyu ModülPenceresine yapıştırın.

VBA kodu: Geçerli Çalışma Sayfası’den tüm resimleri sil

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

4. Ardından, F5 tuşuna basarak bu kodu çalıştırın; aktif çalışma sayfasındaki tüm resimler anında silinecektir.

Yalnızca belirli bir hücre aralığındaki resimleri silmeniz gerekiyorsa, işte size yardımcı olabilecek başka bir basit kod.

1. ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Ekle > Modül seçeneğine tıklayın ve aşağıdaki makroyu Modül penceresine yapıştırın.

VBA kodu: Bir hücre aralığındaki resimleri sil

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

Not: Yukarıdaki kodda, B4:C6 aralığı, resimleri silmek istediğiniz alandır.

3. Ardından, bu kodu çalıştırmak için F5 tuşuna basın; Aralık seçimi içindeki resimler bir seferde silinecektir. Ekran görüntülerine bakın:

Eğer Kutools for Excel yazılımınız varsa, Resimleri ve Nesneleri Sil özelliğiyle bir çalışma sayfasından, seçili bazı çalışma sayfalarından veya tüm çalışma kitabından resimleri hızla silebilirsiniz.

1.Kutools>Sil>Resimleri ve Nesneleri Silseçeneğine tıklayın; ekran görüntüsüne bakın:

2. Açılan Resimleri ve Nesneleri Sil iletişim kutusunda, Resimler seçeneğini Sil bölümünden işaretleyin ve ardından İçinde ara bölümünden resimleri silmek istediğiniz kapsamı belirtin; ekran görüntüsüne bakın:

3. Ardından, Tamam düğmesine tıklayın; belirttiğiniz şekilde çalışma sayfasından, Seçilen Çalışma Sayfaları’ndan veya tüm çalışma kitabından tüm resimler silinecektir.