Excel-Bilder: Einfügen, Größenänderung, Speichern, Löschen mehrerer Bilder oder Fotos in Excel

Es ist für die meisten von uns einfach, Bilder, die auf dem Computer gespeichert sind, in das Arbeitsblatt einzufügen. Bitte gehen Sie wie folgt vor:

1. Klicken Sie im Arbeitsblatt auf die Stelle, an der Sie Bilder einfügen möchten.

2. Klicken Sie dann auf Einfügen > Bilder > Dieses Gerät, siehe Screenshot:

3. Im geöffneten Fenster "Bild einfügen" öffnen Sie den Ordner, der die Bilder enthält, und halten Sie dann die Strg-Taste gedrückt, um die Bilder auszuwählen, die Sie einfügen möchten, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche Einfügen, die ausgewählten Bilder wurden in das Blatt eingefügt. Jetzt können Sie die Bilder an die Zellen anpassen oder ihre Größe ändern, siehe Screenshot:

Wenn Sie Excel2013 oder spätere Versionen haben, können Sie die Bilder aus dem Web oder OneDrive einfügen, bitte gehen Sie wie folgt vor:

1. Klicken Sie im Arbeitsblatt auf die Stelle, an der Sie Bilder einfügen möchten.

2. Klicken Sie dann auf Einfügen > Bilder > Online-Bilder, siehe Screenshot:

3. Ein folgendes Fenster wird angezeigt. Im Abschnitt "Online-Bilder" geben Sie bitte in das Textfeld ein, wonach Sie suchen, und drücken Sie dann die Eingabetaste. Alle entsprechenden Bilder werden sofort gesucht, siehe Screenshot:

4. Wählen Sie dann die gewünschten Bilder aus und klicken Sie auf die Schaltfläche Einfügen. Nachdem Sie die Bilder eingefügt haben, passen Sie die Bilder bitte an die Position an, die Sie benötigen.

Der folgende VBA-Code kann Ihnen helfen, mehrere Bilder basierend auf der Zellengröße in Zellen einzufügen. Bitte gehen Sie wie folgt vor:

1. Passen Sie die Zellgröße an, in die Sie das Bild einfügen möchten, und wählen Sie dann die Zellen aus.

2. Halten Sie dann die Tasten ALT + F11 gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

3. Klicken Sie auf Einfügen > Modul und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Mehrere Bilder basierend auf der Zellgröße einfügen

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. Drücken Sie dann die F5-Taste, um diesen Code auszuführen. Wählen Sie im geöffneten Fenster den Ordner aus, der die Bilder enthält, wählen Sie dann die Bilder aus, die Sie einfügen möchten, und klicken Sie auf die Schaltfläche Öffnen, und alle ausgewählten Bilder wurden basierend auf der Zellgröße in Ihre Auswahl eingefügt. Siehe Screenshot:

Wenn Sie mit dem VBA-Code nicht vertraut sind, können Sie hier eine leistungsstarke Funktion – Bilder importieren von Kutools für Excel verwenden. Mit dieser nützlichen Funktion können Sie mehrere Bilder schnell und einfach in die Zellen importieren.

1. Klicken Sie auf Kutools Plus > Import & Export > Bilder importieren, siehe Screenshot:

2. Im geöffneten Dialogfeld "Bilder importieren" führen Sie bitte die folgenden Operationen aus:

• Geben Sie die Bildreihenfolge aus der Dropdown-Liste "Importreihenfolge" an, Sie können "Spalte füllen, dann Zeile füllen" oder "Zeile füllen, dann Spalte füllen" wählen;
• Klicken Sie dann auf die Schaltfläche Hinzufügen, um die Bilddateien oder den Ordner auszuwählen, um die Bilder in die Bildliste hinzuzufügen;
• Klicken Sie auf die Schaltfläche "Importgröße", im Dialogfeld "Bildimportgröße" wählen Sie die Option "Zellengröße anpassen".
• 

3. Nachdem Sie die Einstellungen abgeschlossen haben, klicken Sie bitte auf die Schaltfläche Importieren, und jetzt wird ein weiteres Fenster "Bilder importieren" geöffnet, geben Sie die Zielzellen an, in die Sie das Bild importieren möchten, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, alle ausgewählten Bilder wurden eingefügt, um die Größe der spezifischen Zellen anzupassen, wie im unten gezeigten Screenshot gezeigt:

Der folgende VBA-Code kann Ihnen helfen, mehrere Bilder schnell entsprechend ihrer Namen einzufügen, bitte gehen Sie wie folgt vor:

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

2. Klicken Sie auf Einfügen > Modul und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Mehrere Bilder entsprechend ihrer Namen einfügen

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

Hinweis: Im obigen Code können Sie die Bildhöhe und -breite innerhalb der Skripte ".ShapeRange.Height =60", ".ShapeRange.Width =60" nach Ihren Bedürfnissen ändern.

3. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und im geöffneten Fenster wählen Sie bitte den Ordner aus, der die Bilder enthält, die Sie einfügen möchten, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, ein Eingabefeld wird geöffnet, wählen Sie bitte die Zellen aus, die die Bildnamen enthalten, siehe Screenshot:

5. Klicken Sie weiter auf die Schaltfläche OK, und ein weiteres Eingabefeld folgt, wählen Sie bitte die Zellen aus, in die Sie die Bilder ausgeben möchten, siehe Screenshot:

6. Klicken Sie schließlich auf OK, und die Bilder wurden basierend auf ihren Namen sofort in die Zellen eingefügt, siehe Screenshot:

Wenn Sie Kutools für Excel haben, können Sie mit der Funktion "Übereinstimmende importierte Bilder" die Bilder basierend auf den Bildnamen schnell und einfach einfügen.

1. Klicken Sie auf Kutools Plus > Import & Export > Übereinstimmende importierte Bilder, siehe Screenshot:

2. Im geöffneten Dialogfeld "Übereinstimmende importierte Bilder" führen Sie bitte die folgenden Operationen aus:

• Geben Sie die Bildreihenfolge aus der Dropdown-Liste "Importreihenfolge" an, Sie können " Spalte füllen, dann Zeile füllen" oder "Zeile füllen, dann Spalte füllen" wählen;
• Wählen Sie dann aus dem Textfeld "Übereinstimmungsbereich" die Bildnamen aus, auf deren Grundlage Sie Bilder einfügen möchten;
• Klicken Sie dann auf die Schaltfläche Hinzufügen, um die Bilddateien oder den Ordner auszuwählen, um die Bilder in die Bildliste hinzuzufügen;
• Als nächstes sollten Sie die Bildgröße angeben. Bitte klicken Sie auf die Schaltfläche "Importgröße", im Dialogfeld "Bildimportgröße" wählen Sie eine Bildgröße nach Ihren Bedürfnissen.
• 

3. Nachdem Sie die Einstellungen abgeschlossen haben, klicken Sie bitte auf die Schaltfläche Importieren, wählen Sie eine Zelle oder eine Liste von Zellen aus, um die Bilder aus dem geöffneten Dialogfeld "Übereinstimmende importierte Bilder" zu platzieren, siehe Screenshot:

4. Klicken Sie dann auf OK, und alle Bilder, deren Namen mit den Zellwerten übereinstimmen, wurden eingefügt, siehe Screenshot:

Bitte wenden Sie den folgenden VBA-Code an, um die Bilder basierend auf einer Liste von URLs einzufügen.

1. Passen Sie zuerst die angrenzende Zellgröße an, in die Sie die Bilder platzieren möchten.

2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

3. Klicken Sie auf Einfügen > Modul und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Bilder aus einer Liste von URLs einfügen

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

Hinweise: Im obigen Code ist A2:A5 der Zellbereich, der die URL-Adressen enthält, aus denen Sie die Bilder extrahieren möchten. Sie sollten die Zellreferenzen nach Ihren Bedürfnissen ändern.

4. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, die passenden Bilder werden aus den URLs in die angrenzende Spalte extrahiert und in der Mitte der Zellen platziert, siehe Screenshot:

Kutools für Excel hat eine erstaunliche Funktion – Bilder aus Pfad (URL) einfügen. Mit diesem Dienstprogramm werden die entsprechenden Bilder schnell und einfach aus den URLs extrahiert.

1. Klicken Sie auf Kutools > Einfügen > Bilder aus Pfad (URL) einfügen, siehe Screenshot:

2. Im geöffneten Dialogfeld "Bilder aus Pfad (URL) einfügen" führen Sie bitte die folgenden Operationen aus:

• Wählen Sie die Liste der URL-Zellen und einen Zellbereich aus, in dem Sie die Bilder platzieren möchten;
• Geben Sie die Größe der Bilder nach Ihren Bedürfnissen im Abschnitt "Bildgröße" an.
• 

3. Klicken Sie dann auf die Schaltfläche OK, und alle Bilder wurden aus den URLs extrahiert, siehe Screenshot:

Sie können den folgenden VBA-Code anwenden, um die Bilder basierend auf den Bilddateipfaden einzufügen.

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

2. Klicken Sie auf Einfügen > Modul und fügen Sie dann den folgenden Code in das Modulfenster ein.

VBA-Code: Bilder aus einem Bereich von Dateipfaden einfügen

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. Nachdem Sie den obigen Code eingefügt haben, drücken Sie die F5-Taste, um diesen Code auszuführen, dann wird ein Eingabefeld geöffnet, wählen Sie bitte die Zellen des Dateipfads aus, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, alle Bilder basierend auf den Dateipfaden wurden in die nächste Spalte angezeigt, wie im folgenden Screenshot gezeigt:

Die Funktion "Bilder aus Pfad (URL) einfügen" von Kutools für Excel kann Ihnen auch helfen, die relativen Bilder aus dem Dateipfad anzuzeigen.

1. Klicken Sie auf Kutools > Einfügen > Bilder aus Pfad (URL) einfügen, im geöffneten Dialogfeld geben Sie bitte den Dateipfadbereich, den Bereich für die Ausgabe der Bilder, die Bildgröße nach Ihren Bedürfnissen an, siehe Screenshots:

2. Nachdem Sie die Optionen eingestellt haben, klicken Sie auf die Schaltfläche OK, die Bilder werden sofort in die ausgewählten Zellen eingefügt, siehe Screenshot:

Tipps: Manchmal stellen Sie möglicherweise fest, dass das Bild mit dem Datenbereich des Arbeitsblatts überlappt, wie im unten gezeigten Screenshot gezeigt. Dies tritt auf, weil das Bild zu groß ist und nicht automatisch an das Kopf- oder Fußzeilenfeld angepasst wird.

Um dieses Problem zu lösen, müssen Sie nur die Größe des Bildes in der Kopf- oder Fußzeile ändern, bitte gehen Sie wie folgt vor:

1. Klicken Sie in den Kopf- oder Fußzeilenbereich, in dem sich das Bild befindet, und klicken Sie dann auf "Bild formatieren" unter der Registerkarte "Entwurf", siehe Screenshot:

2. Im Dialogfeld "Bild formatieren" unter der Registerkarte "Größe" passen Sie bitte die Größe des Bildes an, um es an das Kopf- oder Fußzeilenfeld anzupassen, siehe Screenshot:

3. Klicken Sie dann auf OK, Sie erhalten das Ergebnis, das Sie benötigen.

1. Öffnen Sie das Arbeitsblatt, in das Sie ein Hintergrundbild einfügen möchten.

2. Klicken Sie dann auf Seitenlayout > Hintergrund, siehe Screenshot:

3. Im geöffneten Fenster " Bilder einfügen" wählen Sie bitte ein Bild von Ihrem Computer, Ihrer Website oder OneDrive aus, wie Sie es benötigen, siehe Screenshot:

4. Jetzt wurde das Bild als Hintergrund in das Arbeitsblatt eingefügt, wie im unten gezeigten Screenshot gezeigt:

Mit der obigen Methode können Sie die Transparenz des eingefügten Hintergrundbildes nicht ändern. Wenn die Farbe des Hintergrundbildes stark ist, wird es nicht bequem sein, die Daten des Arbeitsblatts zu lesen. In diesem Abschnitt werde ich darüber sprechen, wie man ein transparentes Bild hinter die Zellen einfügt.

1. Klicken Sie auf Einfügen > Formen und wählen Sie eine rechteckige Form, siehe Screenshot:

2. Zeichnen Sie dann eine Form so groß, wie Sie sie im aktiven Arbeitsblatt benötigen.

3. Nachdem Sie die Form gezeichnet haben, wird eine Registerkarte "Zeichentools" im Menüband angezeigt, und klicken Sie dann auf Format > Formkontur > Keine Kontur, siehe Screenshot:

4. Klicken Sie dann mit der rechten Maustaste auf die Form und wählen Sie "Form formatieren" aus dem Kontextmenü, siehe Screenshot:

5. Im erweiterten Format-Form-Bereich unter der Registerkarte "Füllen & Linie" führen Sie die folgenden Operationen aus:

• Wählen Sie im Abschnitt "Füllen" die Option " Bild- oder Texturfüllung" aus;
• Klicken Sie auf die Schaltfläche "Einfügen" aus der Bildquelle und wählen Sie ein Bild aus, das Sie einfügen möchten;
• Passen Sie dann die Transparenz des Bildes nach Ihren Bedürfnissen im Abschnitt "Transparenz" an.
• 

6. Dann sehen Sie, dass die mit Bildern gefüllte Form wie ein Hintergrundbild aussieht, wie im oben gezeigten Screenshot gezeigt.

Hinweis: Nachdem Sie diese Art von Hintergrundbild eingefügt haben, dürfen Sie keinen Text innerhalb des Bildbereichs eingeben.

Beide oben genannten Methoden haben ihre eigenen Einschränkungen, die erste Methode kann die Bildtransparenz nicht ändern, die zweite Methode erlaubt nicht das Eingeben von Text in die Zellen innerhalb des Bildbereichs. Um diese Probleme zu lösen, kann Ihnen die Funktion "Wasserzeichen einfügen" von Kutools für Excel helfen.

1. Klicken Sie auf Kutools > Einfügen > Wasserzeichen einfügen, siehe Screenshot:

2. Im geöffneten Dialogfeld "Wasserzeichen einfügen" wählen Sie "Bildwasserzeichen" aus und klicken Sie dann auf die Schaltfläche "Bild auswählen", um ein Bild auszuwählen, das Sie einfügen möchten, und geben Sie dann die Bildskala an und aktivieren Sie die Option "Erosion", siehe Screenshot:

3. Klicken Sie dann auf die Schaltfläche OK, das Bild wurde als Hintergrundbild in das Arbeitsblatt eingefügt.

In Excel können Sie die Funktion "Als Bild kopieren" verwenden, um einen Zellbereich als Bild zu kopieren und einzufügen.

1. Wählen Sie den Zellbereich aus, den Sie als Bild kopieren und einfügen möchten.

2. Klicken Sie dann auf Start > Kopieren > Als Bild kopieren, siehe Screenshot:

3. Im geöffneten Bild kopieren Dialogfeld wählen Sie Bild aus dem Format Abschnitt aus, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, jetzt müssen Sie nur noch Strg + V drücken, um das Bild überall in der Arbeitsmappe einzufügen.

In Excel gibt es ein Kameratool, mit dem Sie ein Foto Ihrer ausgewählten Daten aufnehmen und dann als Bild einfügen können. Wenn sich die Originaldaten ändern, wird das kopierte Bild dynamisch geändert.

Zuerst sollten Sie die Kamera im Menüband anzeigen und dann anwenden.

1. Klicken Sie auf das Symbol "Symbolleiste für den Schnellzugriff anpassen" und dann auf die Option "Weitere Befehle", siehe Screenshot:

2. Im geöffneten Dialogfeld "Excel-Optionen" führen Sie bitte die folgenden Operationen aus:

• Wählen Sie "Alle Befehle" aus der Dropdown-Liste "Befehle auswählen aus" aus;
• Scrollen Sie dann, um "Kamera" aus der Listenbox auszuwählen;
• Klicken Sie dann auf die Schaltfläche Hinzufügen, um dieses Tool zur Symbolleiste für den Schnellzugriff hinzuzufügen;
• Klicken Sie schließlich auf OK, um dieses Dialogfeld zu schließen.
• 

3. Und das Kameratool wurde im Menüband angezeigt, siehe Screenshot:

4. Wählen Sie dann den Zellbereich aus, den Sie als Bild möchten.

5. Klicken Sie dann auf das Kameratool, gehen Sie dann zum Arbeitsblatt und klicken Sie irgendwo, der Datenbereich wird als Bild eingefügt, wie im unten gezeigten Demo gezeigt:

Wenn Sie Kutools für Excel haben, können Sie mit der Funktion "AutoText-Bibliothek" die ausgewählten Daten in die AutoText-Bibliothek speichern und sie dann als Bild oder Text für die Zukunft verwenden, wie Sie möchten.

1. Wählen Sie den Datenbereich aus, den Sie als Bild einfügen möchten.

2. Klicken Sie dann auf Kutools > Navigation, siehe Screenshot:

3. Klicken Sie im erweiterten Navigationsbereich auf das Symbol "AutoText-Bibliothek" und klicken Sie dann auf das Symbol "Ausgewählten Inhalt zu AutoText hinzufügen", siehe Screenshot:

4. Im Dialogfeld "Zu AutoText hinzufügen" geben Sie einen Namen für diesen Eintrag an und wählen Sie dann eine Gruppe aus, zu der Sie hinzufügen möchten. Siehe Screenshot:

5. Klicken Sie dann auf die Schaltfläche Hinzufügen, um es zum AutoText-Bereich hinzuzufügen. Wenn Sie diesen Bereich als Bild einfügen möchten, müssen Sie nur auf eine Zelle klicken, um das Bild zu platzieren, und dann den gespeicherten Eintrag aus dem AutoText-Bereich finden und "Einfügen als > Bild (EMF)" aus der Dropdown-Liste des Eintrags auswählen. Und der Datenbereich wird als Bild in das Blatt eingefügt, siehe Screenshots:

Normalerweise können Sie in Excel einen dynamischen benannten Bereich erstellen und dann das verknüpfte Bild verwenden, um diese Aufgabe in Excel zu lösen.

1. Zuerst sollten Sie zwei Spalten erstellen, die die Produktnamen und relativen Bilder enthalten, siehe Screenshot:

2. Erstellen Sie dann bitte eine Dropdown-Liste für die Zellwerte. Klicken Sie auf eine Zelle, um die Dropdown-Liste auszugeben, klicken Sie dann auf Daten > Datenüberprüfung > Datenüberprüfung, siehe Screenshot:

3. Im geöffneten Datenüberprüfung Dialogfeld wählen Sie unter der Einstellungen Registerkarte Liste aus der Zulassen Dropdown-Liste und wählen Sie dann die Zellen aus, aus denen Sie die Dropdown-Liste erstellen möchten, aus dem Quelle Textfeld, siehe Screenshot:

4. Klicken Sie auf OK, und die Dropdown-Liste mit den Zellwerten wurde erstellt, wählen Sie ein Element aus der Dropdown-Liste aus, siehe Screenshot:

5. Klicken Sie dann auf Formeln > Namen definieren, siehe Screenshot:

6. Im Dialogfeld "Neuer Name" führen Sie bitte die folgenden Operationen aus:

• Geben Sie einen Namen namens "myimage" in das Textfeld "Name" ein;
• Kopieren und fügen Sie dann diese Formel ein: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) in das Textfeld "Bezieht sich auf".

  

  Hinweis: In der obigen Formel:

  • Sheet11!$A$2:$B$6: ist das Arbeitsblatt und der Bereich, der die Werte und Bilder enthält, die Sie verwenden möchten;
  • Sheet11!$E$2: ist die Zelle im Arbeitsblatt, in der Sie die Dropdown-Liste erstellt haben;
  • Sheet11!$A$2:$A$6: ist die Liste der Zellen, auf der Sie die Dropdown-Liste basierend erstellt haben;
  • Die Variable Nummer2 ist die Spaltennummer, die die Bilder enthält. Wenn Ihre Bilder in Spalte C sind, sollten Sie3 eingeben.

7. Klicken Sie dann auf die Schaltfläche OK, kopieren und fügen Sie dann das entsprechende Bild basierend auf dem Zellwert in E2 aus dem ursprünglichen Bereich in die Zelle F2 ein, siehe Screenshot:

8. Wählen Sie als nächstes das Bild in Zelle F2 aus und geben Sie dann diese Formel =myimage (myimage ist der Bereichsname, den Sie in Schritt6 erstellt haben) in die Formelleiste ein, siehe Screenshot:

9. Nachdem Sie die Formel eingegeben haben, drücken Sie die Eingabetaste, und jetzt, wenn Sie ein Element aus der Dropdown-Liste auswählen, wird das zugehörige Bild sofort angezeigt. Siehe Screenshot:

Die obige Methode kann für die meisten von uns schwierig sein, hier werde ich eine praktische Funktion vorstellen – Bild-Dropdown-Liste von Kutools für Excel, mit diesem nützlichen Tool können Sie mehrere Dropdown-Listen mit ihren zugehörigen Bildern mit nur wenigen Klicks erstellen.

1. Zuerst sollten Sie zwei Spalten erstellen, die die Produktnamen und relativen Bilder in Ihrem Arbeitsblatt enthalten.

2. Klicken Sie dann auf Kutools > Dropdown-Liste > Bild-Dropdown-Liste, siehe Screenshot:

3. Im Dialogfeld "Bild-Dropdown-Liste", wenn Sie die Spalten der Zellwerte und Bilder erstellt haben, ignorieren Sie bitte Schritt1, wählen Sie dann den ursprünglichen Daten- und Bildbereich und den Ausgabebereich aus, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, die Dropdown-Listen mit Bildern wurden in die ausgewählten Zellen erstellt, und wenn Sie ein Element aus der Dropdown-Zelle auswählen, wird das entsprechende Bild sofort angezeigt, siehe unten Demo:

Normalerweise können Sie die Funktion "Speichern unter" verwenden, um alle Bilder aus der Arbeitsmappe zu speichern, bitte gehen Sie wie folgt vor:

1. Klicken Sie auf Datei > Speichern unter, im Fenster "Speichern unter" geben Sie einen Ordner an, in dem Sie die exportierten Dateien ablegen möchten, und wählen Sie dann "Webseite (*.htm;*.html)" aus der Dropdown-Liste " Speichern als Typ", siehe Screenshot:

2. Klicken Sie dann auf die Schaltfläche Speichern, gehen Sie zu dem spezifischen Ordner, Sie sehen zwei Dateien, eine ist die HTML-Formatdatei und die andere ist ein Ordner, der die Bilder, Diagramme oder andere Objekte aus der Arbeitsmappe enthält. Siehe Screenshot:

3. Dann können Sie nur die Bilder in einen anderen Ordner ziehen, wie Sie es benötigen.

Hinweis: Durch die Verwendung dieser Funktion "Speichern unter" erhalten Sie jedes Bild zweimal, eines ist kleiner, das andere ist größer, sodass Sie die Bilder mit höherer Auflösung speichern können, wie Sie es benötigen.

Um alle Bilder aus der Excel-Datei zu speichern, können Sie auch die Dateierweiterung in RAR ändern. Bitte gehen Sie wie folgt vor:

1. Ändern Sie die Dateierweiterung xlsx in rar, wie im unten gezeigten Screenshot gezeigt:

2. Entpacken Sie dann die Datei, und Sie sehen3 Ordner und1 Datei im Ordner, siehe Screenshot:

3. Klicken Sie dann, um den xl-Ordner zu öffnen, und öffnen Sie dann den Medienordner, Sie sehen, dass alle Bilder hier ohne Duplikate gespeichert sind, siehe Screenshot:

Wenn Sie Kutools für Excel haben, können Sie mit der Funktion "Diagramm exportieren" schnell einige spezifische Objekte wie Bilder, Diagramme, Formen in Bildformat exportieren, wie Sie es benötigen.

1. Klicken Sie auf Kutools Plus > Import & Export > Diagramm exportieren, siehe Screenshot:

2. Im Dialogfeld "Diagramm exportieren" führen Sie die folgenden Operationen aus:

• Wählen Sie die Option "Bilder" aus der Dropdown-Liste "Typen" aus;
• Geben Sie einen Ordner an, um Ihre exportierten Bilder zu speichern;
• Klicken Sie dann auf die Dropdown-Liste aus dem Exportformat, um ein Format für Ihre Bilder auszuwählen.
• 

3. Klicken Sie schließlich auf die Schaltfläche OK, alle Bilder in der aktuellen Arbeitsmappe wurden in den von Ihnen angegebenen Ordner gespeichert, siehe Screenshot:

Um die Bilder aus dem aktuellen Arbeitsblatt zu löschen, kann Ihnen der folgende VBA-Code helfen, bitte gehen Sie wie folgt vor:

1. Aktivieren Sie das Arbeitsblatt, das die Bilder enthält, die Sie löschen möchten.

2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

3. Klicken Sie auf Einfügen > Modul und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Alle Bilder aus dem aktuellen Arbeitsblatt löschen

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

4. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und alle Bilder im aktiven Arbeitsblatt werden sofort gelöscht.

Wenn Sie die Bilder nur aus einem Zellbereich löschen müssen, kann Ihnen hier ein weiterer einfacher Code helfen.

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster "Microsoft Visual Basic for Applications" zu öffnen.

2. Klicken Sie auf Einfügen > Modul und fügen Sie das folgende Makro in das Modulfenster ein.

VBA-Code: Die Bilder aus einem Zellbereich löschen

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

Hinweis: Im obigen Code ist B4:C6 der Bereich, aus dem Sie die Bilder löschen möchten.

3. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und die Bilder im ausgewählten Bereich werden sofort gelöscht, siehe Screenshots:

Wenn Sie Kutools für Excel haben, können Sie mit der Funktion "Illustrationen & Objekte löschen" schnell die Bilder aus einem Arbeitsblatt, einigen ausgewählten Blättern oder der gesamten Arbeitsmappe löschen.

1. Klicken Sie auf Kutools > Löschen > Illustrationen & Objekte löschen, siehe Screenshot:

2. Im geöffneten Dialogfeld "Illustrationen & Objekte löschen" aktivieren Sie "Bilder" aus dem Abschnitt "Löschen" und geben Sie dann den Bereich an, aus dem Sie die Bilder löschen möchten, unter dem Abschnitt "Suchen in", siehe Screenshot:

3. Klicken Sie dann auf die Schaltfläche OK, und alle Bilder werden aus dem Arbeitsblatt, den ausgewählten Arbeitsblättern oder der gesamten Arbeitsmappe gelöscht, wie Sie angegeben haben.