So fügen Sie animiertes GIF Bilder In Excel 2007/2010/2013/2016

Wenn Sie auch zu denen gehören, die Excel-Anwendungen als langweilig betrachten, liegen Sie falsch. Es ist überhaupt keine langweilige Anwendung ..!

Richtig, denn Sie können Ihre langweilige Excel-Tabelle in ein attraktives Arbeitsblatt verwandeln. Dazu können Sie so viele Dinge in Ihre Excel-Arbeitsmappe tun, z. B. GIF-Bilder einfügen, Animationen zu Ihren Arbeitsmappen hinzufügen, animierte Diagramme in Excel einfügen, animierte Diagramme in Tabellenkalkulationen einfügen, dynamische Datenbeschriftungen verwenden, um interaktive Excel-Diagramme zu erstellen usw.

In unserem heutigen Thema erfahren Sie, wie Sie animiertes GIF in Excel einfügen.

Also lasst uns anfangen…!

Können wir Excel Gifs hinzufügen?

Viele Excel-Benutzer stellen häufig die Frage, ob sie Excel GIF-Bilder hinzufügen können oder nicht. Jeder weiß das. Es ist ziemlich einfach, Bilder in Excel einzufügen. Da die Option zum Einfügen von Bildern in Excel sehr einfach ist, d. H. Einfügen —> Bild.

Wenn Sie jedoch animierte GIF-Bilder in Excel einfügen möchten, funktioniert diese Methode nicht. Zweifellos wird mit diesem Schritt auch ein GIF-Bild in Ihr Arbeitsblatt eingefügt, jedoch ohne Animationseffekt.

Die GIF-Bildanimation funktioniert nur, wenn das Bild in ein Steuerelement eingefügt wird. Dies kann mithilfe der Control Toolbox, des Entwurfsmodus und des Microsoft-Webbrowsers erfolgen.

VBA-Code ist ein sehr wichtiger Bestandteil beim Hinzufügen von animiertem GIF in Excel. Nach Abschluss des Vorgangs muss die aktive Seite der Excel-Tabelle geändert werden. Überprüfen Sie auch, ob die Animation ordnungsgemäß funktioniert oder nicht. Zum Einfügen von animiertem GIF in andere Excel-Tabellen können Sie dasselbe VBA-Verfahren verwenden.

So fügen Sie animiertes GIF in Excel ein

In diesem Abschnitt werden zwei verschiedene Möglichkeiten zum Einfügen von animiertem GIF in Excel erläutert. Auf die erste Weise lernen Sie, ein GIF-Bild in eine Excel-Tabelle einzufügen. Während Sie in der zweiten Methode lernen, wie Sie GIF-Bilder in eine bestimmte Zelle oder einen bestimmten Bereich einer Excel-Tabelle einfügen. Lassen Sie uns also nacheinander über jede Methode diskutieren.

Methode 1: Einfügen von GIF-Dateien in eine Excel-Tabelle

Zum Einbetten einer animierten GIF-Datei in die Excel-Tabelle. Es ist wichtig, den vollständigen Pfad und Namen des GIF-Bildes zu kennen. Sie müssen auch einen Ausschnitt aus VB-Code in Ihr Excel-Arbeitsblatt einfügen. Lassen Sie uns wissen, wie alle Dinge zu tun sind.

Schritt 1

Durchsuchen Sie den Ordner mit dem animierten GIF-Bildordner, den Sie einfügen möchten. Schreiben Sie anschließend den vollständigen Pfad des GIF-Ordners und den Namen seiner Datei.

Angenommen, die Datei befindet sich im Unterordner des Laufwerks C: mit dem Namen Pictures. Es enthält eine Bilddatei bear.gif, die Sie in Ihre Excel-Arbeitsmappe einfügen möchten. Dann lautet der vollständige Pfadname c: \ images \ bear.gif.

Schritt 2

Öffnen Sie anschließend Ihre MS Excel-Tabelle, in der Sie Ihr animiertes GIF hinzufügen möchten.

Schritt 3

Tippen Sie im Excel-Menüband auf das Menü “Ansicht”. Wählen Sie dann die Option “Symbolleisten” => und tippen Sie anschließend auf die “Control Toolbox”. Möglichkeit.

Schritt 4

Klicken Sie auf die obere Schaltfläche in der “Control Toolbox”, um den “Entwurfsmodus” zu aktivieren. Im “Entwurfsmodus” können Sie eine Elementstruktur in Ihre Excel-Arbeitsmappe zeichnen, die Ihr Objekt wie animiertes GIF akzeptiert.

Schritt 5

Tippen Sie auf die untere Schaltfläche in “Control Toolbox”. Wählen Sie nun im Dropdown-Menü den “Microsoft-Webbrowser”. Dadurch wird “Microsoft-Webbrowser” aktiviert, damit Sie Ihre animierten GIFs anzeigen können.

Schritt 6

Klicken Sie mit der linken Maustaste in Ihre Tabelle, um Ihr animiertes GIF-Bild einzubetten. Zeichnen Sie ein großes Feld, das problemlos Ihr animiertes GIF-Bild enthalten kann.

Schritt 7

Tippen Sie erneut auf die Option “Entwurfsmodus”, um den Entwurfsmodus zu deaktivieren. Schließen Sie anschließend die geöffnete Symbolleiste “Control Toolbox”.

Schritt 8

Drücken Sie auf Ihrer Tastatur die Taste “F11”, indem Sie die Alt-Taste gedrückt halten. Dadurch wird das Microsoft Visual Basic-Fenster in Ihrer Excel-Anwendung geöffnet.

Schritt 9

Doppelklicken Sie auf das Arbeitsblatt, in dem Sie das animierte GIF-Bild hinzufügen möchten. Nun aus der Projektliste oben links im VB-Fenster. Es öffnet sich das Codefenster von Visual Basic.

Schritt 10

Kopieren Sie im geöffneten Codefenster einfach diesen Code und fügen Sie ihn ein:

Private Sub Worksheet_Activate ()

End Sub

Weisen Sie den entsprechenden Dateinamen und Pfadnamen zu, die in den Anführungszeichen für die GIF-Datei enthalten sind.

Schritt 11

Tippen Sie auf das andere Excel-Arbeitsblatt und klicken Sie erneut auf das Arbeitsblatt, in dem Sie Ihr GIF-Bild hinzugefügt haben. Ihr hinzugefügtes animiertes GIF muss im gezeichneten Objektfeld angezeigt werden.

 Wenn es so aussieht, dann ist alles fertig…! Sie können Ihre GIF-Bildanimation genießen.

Sie können dieses Video ansehen, um zu verstehen, wie Sie ein animiertes GIF-Bild in Excel einfügen.

Zum Hinzufügen eines animierten GIF-Bildes von einer beliebigen Webadresse

Nun, Sie können auch von jeder Webadresse aus ein animiertes GIF-Bild in Excel hinzufügen. Um diese Aufgabe auszuführen, versuchen Sie einfach den folgenden Code:

Private Sub Worksheet_Activate()

WebBrowser1.Navigate “about:<html><body scroll=’no’><img src=’http://www.animatedgif.net/animals/birds/birdtoon_e0.gif’> </img></body></html>”

End Sub

Methode 2: Einfügen von GIF-Bildern in eine bestimmte Zelle oder einen bestimmten Bereich einer Excel-Tabelle

Wenn Sie ein GIF-Bild in eine bestimmte Excel-Zelle einfügen möchten, ist es sehr wichtig, dass Sie dies wissen. Sie können kein Bild in eine Excel-Zelle einfügen, haben jedoch die Möglichkeit, die Größe zu ändern. Damit es perfekt in diese bestimmte Zelle passt.

Wenn Sie dies manuell durchführen, wird viel mehr Zeit benötigt. Also werden wir es über das VBA-Makro tun. Lassen Sie uns wissen, wie Sie GIF-Bilder mit VBA in Excel einfügen.

Im Folgenden wird der Excel VBA-Code zum Einfügen von Bildern aus einem beliebigen Ordner in eine bestimmte Zelle oder einen bestimmten Bereich erläutert. Drücken Sie auf Ihrer Tastatur Alt + F11, fügen Sie anschließend ein Modul ein und kopieren Sie diesen Code.

Sie müssen sich keine Gedanken über die Codierung machen, da wir alles erklären werden. Damit jeder nach Bedarf Änderungen daran vornehmen kann.

Einfügen von GIF-Bildern in Excel mit VBA-Code

Sub TestInsertPictureInRange()InsertPictureInRange “C:\FolderName\PictureFileName.gif”, _Range(“B5:D10”)

End Sub

Sub InsertPictureInRange(PictureFileName As String, TargetCells As Range)

‘ inserts a picture and resizes it to fit the TargetCells range

Dim p As Object, t As Double, l As Double, w As Double, h As Double

If TypeName(ActiveSheet) <> “Worksheet” Then Exit Sub

If Dir(PictureFileName) = “” Then Exit Sub

‘ import picture

Set p = ActiveSheet.Pictures.Insert(PictureFileName)

‘ determine positions

With TargetCells

t = .Top

l = .Left

w = .Offset(0, .Columns.Count).Left – .Left

h = .Offset(.Rows.Count, 0).Top – .Top

End With

‘ position picture

With p

.Top = t

.Left = l

.Width = w

.Height = h

End With

Set p = Nothing

End Sub

Erläuterung der obigen VBA-Codierung, die geschrieben wurde, um GIF-Bilder in eine bestimmte Zelle oder einen bestimmten Bereich einzufügen:

Teil 1:

Sub TestInsertPictureInRange () InsertPictureInRange “C: \ FolderName \ PictureFileName.gif”, _Range (“B5: D10”)

End Sub

Die oben erwähnte Unterroutine ruft die Hauptunterroutine auf, d. H. InsertPictureInRange, die nur 2 Argumente enthält. Im ersten Argument ist die Adresse der Bilddatei mit dem Namen vorhanden. Während im zweiten Argument der Bereich festgelegt wird, in dem Sie ein Bild in Excel einfügen möchten, wird dieser angegeben.

Teil 2:

Sub InsertPictureInRange (PictureFileName As String, TargetCells As Range) ‘fügt ein Bild ein und passt die Größe an den TargetCells-Bereich anDim p As Object, t As Double, l As Double, w As Double, h As Double

If TypeName(ActiveSheet) <> “Worksheet” Then Exit Sub

If Dir(PictureFileName) = “” Then Exit Sub

‘ import picture

Set p = ActiveSheet.Pictures.Insert(PictureFileName)

‘ determine positions

With TargetCells

t = .Top

l = .Left

w = .Offset(0, .Columns.Count).Left – .Left

h = .Offset(.Rows.Count, 0).Top – .Top

End With

‘ position picture

With p

.Top = t

.Left = l

.Width = w

.Height = h

End With

Set p = Nothing

End Sub

Es ist die Hauptunterroutine, die Bilder hinzufügt und ihre Größe ändert, um eine einfache Anpassung in den zugewiesenen Bereich zu erhalten.

Lass uns eintauchen.

Dim p As Object, t As Double, l As Double, w As Double, h As Double

In dieser Zeile erfolgt die Variablendeklaration. Hier ist p eine Objektvariable und Ihr Bild wird nur von dieser Variablen gehalten.

If TypeName(ActiveSheet) <> “Worksheet” Then Exit Sub

Der obige Code prüft, ob Ihr Aktivitätsblatt ein Arbeitsblatt oder etwas anderes ist. Wenn dies nicht der Fall ist, wird der Code sofort verlassen. Danach wird nichts mehr passieren

If Dir(PictureFileName) = “” Then Exit Sub

Überprüfen Sie, ob Sie die Adresse für das Einfügen von Bildern in die Zelle der Excel-Tabelle angegeben haben. Wenn Sie das nicht gegeben haben, wird es sofort beendet und nichts wird passieren.

Set p = ActiveSheet.Pictures.Insert(PictureFileName)

Dies ist eine sehr wichtige Zeile Ihrer Excel VBA-Codierung. Grundsätzlich verwenden wir dabei die Einfügefunktion, d. H. ActiveSheet.Pictures. Behalten Sie auch den Wert in Objekt p bei, das wir beim Starten deklariert haben.

Mithilfe der Objektvariablen p können Sie die Bildlänge und -breite problemlos anpassen.

With TargetCellst = .Topl = .Leftw = .Offset(0, .Columns.Count).Left – .Lefth = .Offset(.Rows.Count, 0).Top – .TopEnd With

In diesem Segment aus dem angegebenen Bereich können Sie leicht die Länge, Oben, Links, Breite usw. abrufen.

With p.Top = t.Left = l.Width = wHeight = hEnd With

Dieser Teil dient im Wesentlichen dazu, das Bild des angegebenen Bereichs anzupassen.

Alle Dinge sind jetzt erledigt…! Zuletzt setzen wir die Variable p frei, indem wir den Wert von p auf nichts setzen.

Setze p = Nichts

Diese Zeile gibt den Speicherplatz frei.

Der obige Code funktioniert erfolgreich in Excel 2007/2010/2013/2016.

Beispiel: Angenommen, Sie möchten ein Bild im Bereich A1: C10 hinzufügen. Ändern Sie dazu den Code wie folgt

Sub TestInsertPictureInRange()InsertPictureInRange “C:\Users\Manish Singh\Downloads\biker.jpg”, _Range(“A1:C10”)

End Sub

Hier ist das Ergebnis:

Einpacken:

Sie müssen genug Wissen haben So fügen Sie ein animiertes GIF-Bild in Excel ein. Versuchen Sie also furchtlos die oben genannten Methoden von  Einfügen eines GIF-Bildes in Excel. Spielen Sie also mit dem Excel VBA-Code und versuchen Sie, verschiedene Bereiche und Formate einzufügen, um das Ergebnis zu sehen.

Wenn Sie Fragen haben oder auf Herausforderungen stoßen, stellen Sie diese in unserem Kommentarbereich.