Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Bild aus Tabelle in ActiveX Bildsteuerel. einfügen

Forumthread: Bild aus Tabelle in ActiveX Bildsteuerel. einfügen

Bild aus Tabelle in ActiveX Bildsteuerel. einfügen
01.03.2019 09:03:31
Sebastian
Hallo zusammen,
vermutlich ist es ein Kinderspiel für Euch, ich habe es aber nicht hinbekommen.
Folgendes Szenario: Ich habe mehrere ActiveX Bildsteuerelemente, in die über ein Auswahlmenü vom Benutzer Bilder eingefügt werden können.
Zusätzlich gibt es einen Löschen-Button. Dieser fügt einen Platzhalterbild in das Bildsteuerelement. Bislang war das Platzhalterbild in einem separaten Ornder gespeichert. Da es den "Benutzern" aber schwer fällt, diesen Ornder immer mitzukopieren, soll das Platzhalterbild in einem separaten versteckten Tabellenblatt vorhanden sein und bei Bedarf über den Button eingefügt werden.
Wie kann man also auf eine Grafik, benannt z.B. als grafik1 verweisen?
Hier mein bisheriger Aufbau:
Option Explicit

Public Sub Löschen()
Dim varBild As Variant
Dim objImg As Object
varBild = ThisWorkbook.Path & "\Bilder\Quickviewbilder\Kein Bild vorhanden.jpg"
If varBild = False Then Exit Sub
With Worksheets(ActiveSheet.Index).Portrait
.PictureSizeMode = fmPictureSizeModeZoom
.Object.Picture = LoadPicture(varBild)
End With
End Sub

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bild aus Tabelle in ActiveX Bildsteuerel. einfügen
01.03.2019 18:56:29
Sebastian
Hallo Nepumuk,
leider kann ich das ganze erst wieder am Montag testen. Aber schon einmal vielen lieben Dank für deine Mühe!!
Schönes WE!
Anzeige
AW: Bild aus Tabelle in ActiveX Bildsteuerel. einfügen
04.03.2019 07:25:23
Sebastian
Hallo Nepumuk,
habe deine Mustermappe gerade ausprobiert. Leider sind die beiden Buttons ohne Funktion.
Vielleicht finde ich ja noch den Fehler.
Trotzdem danke für Arbeit!
AW: Bild aus Tabelle in ActiveX Bildsteuerel. einfügen
04.03.2019 08:16:58
Nepumuk
Hallo Sebastian,
lösch die beiden Buttons und füge neue ein. Das ist ein Problem welches manchmal mit ActiveX-Controls auftritt. Kann auch sein dass das Image-Control nicht funktioniert, dann ersetze auch dieses.
Gruß
Nepumuk
Anzeige
AW: Bild aus Tabelle in ActiveX Bildsteuerel. einfügen
04.03.2019 09:32:19
Sebastian
Habe deinen Quellcode gerade in meine Mappe eingearbeitet. Was soll ich sagen, es funktioniert einwandfrei!
Wünsche einen wunderschönen Wochenstart!
;
Anzeige
Anzeige

Infobox / Tutorial

Bilder in ActiveX Bildsteuerelemente in Excel einfügen


Schritt-für-Schritt-Anleitung

Um ein Bild aus einer Tabelle in ein ActiveX Bildsteuerelement in Excel einzufügen, folge diesen Schritten:

  1. ActiveX Bildsteuerelement hinzufügen:

    • Öffne Excel und gehe zu „Entwicklertools“.
    • Klicke auf „Einfügen“ und wähle das „Image (ActiveX Control)“ aus.
    • Platziere das Bildsteuerelement auf deinem Arbeitsblatt.
  2. VBA-Editor öffnen:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  3. Code für das Einfügen des Bildes:

    • Füge den folgenden VBA-Code in das Codefenster des entsprechenden Arbeitsblattes ein:
    Option Explicit
    
    Public Sub BildEinfügen()
       Dim varBild As Variant
       varBild = "C:\Pfad\zu\deinem\Bild.jpg" ' Pfad zum Bild anpassen
       With ActiveSheet.Image1 ' Hier den Namen des Bildsteuerelements anpassen
           .PictureSizeMode = fmPictureSizeModeZoom
           .Picture = LoadPicture(varBild)
       End With
    End Sub
  4. Button hinzufügen:

    • Füge einen Button hinzu, um das Bild einzufügen, und verlinke ihn mit der BildEinfügen-Subroutine.
  5. Platzhalterbild verwenden:

    • Um ein Platzhalterbild einzufügen, kannst du eine ähnliche Subroutine verwenden, wie im Beispiel von Sebastian.

Häufige Fehler und Lösungen

  • Button funktioniert nicht:

    • Lösche die Buttons und füge neue hinzu. Manchmal gibt es Probleme mit ActiveX-Controls, die die Funktionalität beeinträchtigen.
  • Bild wird nicht angezeigt:

    • Überprüfe den Pfad zum Bild. Stelle sicher, dass das Bild im angegebenen Verzeichnis vorhanden ist.
  • Image ActiveX Control funktioniert nicht:

    • Ersetze das Image-Control durch ein neues, wenn es nicht reagiert. Das kann oft Abhilfe schaffen.

Alternative Methoden

Wenn du Schwierigkeiten mit dem ActiveX Bildsteuerelement hast, kannst du auch die folgenden Methoden ausprobieren:

  • Formularsteuerelement:

    • Statt eines ActiveX-Controls kannst du ein einfaches Bildsteuerelement verwenden, das leichter zu handhaben ist.
  • Hyperlinks:

    • Setze Hyperlinks auf die Bilder, die in einem separaten Ordner gespeichert sind. Das ist eine einfachere Lösung, wenn du keine Programmierung verwenden möchtest.

Praktische Beispiele

Hier ist ein einfaches Beispiel, um ein Bild in ein ActiveX Bildsteuerelement einzufügen:

  1. Erstelle ein neues Arbeitsblatt und füge ein ActiveX Bildsteuerelement hinzu.
  2. Füge den oben genannten VBA-Code ein, um ein Bild von deinem Computer einzufügen.
  3. Erstelle einen Button, der die BildEinfügen-Routine aufruft.

Das Bild sollte jetzt im Bildsteuerelement angezeigt werden.


Tipps für Profis

  • Versteckte Tabellenblätter nutzen:

    • Du kannst Bilder in versteckten Tabellenblättern speichern und bei Bedarf über VBA abrufen. Dies reduziert die Komplexität beim Teilen der Datei.
  • Dynamic Image Loading:

    • Verwende Variablen, um den Bildpfad dynamisch zu ändern, basierend auf Benutzereingaben oder Auswahlmenü-Optionen.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Bilder in ein ActiveX Bildsteuerelement einfügen?
Du kannst eine Dropdown-Liste erstellen, die es dem Benutzer ermöglicht, zwischen verschiedenen Bildern zu wählen, und dann den entsprechenden Pfad im VBA-Code setzen.

2. Was tun, wenn das Bild nicht angezeigt wird?
Überprüfe den Pfad zum Bild sowie die Bildformatierung. Achte darauf, dass das Bild im richtigen Format (z.B. .jpg, .png) vorliegt.

3. Kann ich das ActiveX Bildsteuerelement in Excel für Mac verwenden?
Leider sind ActiveX-Steuerelemente nicht mit Excel für Mac kompatibel. Du kannst stattdessen andere Steuerelemente verwenden oder die oben genannten alternativen Methoden ausprobieren.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige