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

Forumthread: Bild per Command Button aus Arbeitsmappe öffnen

Bild per Command Button aus Arbeitsmappe öffnen
27.01.2017 17:10:00
Lucas
Hallo zusammen!
1.)Ich würde gerne per Command Button ein Bild anzeigen lassen.
Ich habe es bereits geschafft ein Bild aus einem Dateiverzeichnis anzeigen zu lassen.
Da jedoch die Exceldatei auf andere Rechner übertragen wird stimmt dann der Pfad des Bildes nicht mehr.
Deshalb habe ich das Bild in die Exceldatei kopiert und in ausgeblendeten Zeilen geparkt.
Wie kann ich die Bilddatei in der Arbeitsmappe via Commandbutton ansteuern und öffnen.
2.)Ist es möglich anstatt des Bildes auch eine verknüpfte Grafik per Commandbutton anzeigen zulassen?
Mit Besten Grüßen und Danke vorab
Lucas
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bild per Command Button aus Arbeitsmappe öffnen
28.01.2017 09:01:09
fcs
Hallo Lucas,
1.)Ich würde gerne per Command Button ein Bild anzeigen lassen.
Ich habe es bereits geschafft ein Bild aus einem Dateiverzeichnis anzeigen zu lassen.
Da jedoch die Exceldatei auf andere Rechner übertragen wird stimmt dann der Pfad des Bildes nicht mehr.

Wenn die Exceldatei und die Grafik-Datei auf den anderen Rechnern in das gleiche Verzeichnis kopiert werden oder die Grafik-Datei in ein vorgegebenes Unterverzeichnis, dann kann man über das Verzeichnis der Exceldatei auf die Grafikdatei zugreifen.
PfadBild = Thisworkbook.Path& "\GrafikDateiName.jpg"
Deshalb habe ich das Bild in die Exceldatei kopiert und in ausgeblendeten Zeilen geparkt.
Wie kann ich die Bilddatei in der Arbeitsmappe via Commandbutton ansteuern und öffnen.

Innerhalb einer Datei man über das Tabellenblatt und den Namen des Bild-Objekts auf das Bild zugreifen.
Es aber nicht nötig mit Ein-/Ausblenden der Zeilen zu arbeiten.
Man kann das Bild auch direkt ein-/ausblenden.
Das folgende Makro wechselt den Sichtbar-Status eines Bildes im Tabellenblatt.
Der Name des Bild-Objekts sollte hierzu individuell festgelegt werden.
Sub Bild_Ein_Ausblenden()
Dim objShape As Shape
Dim wks As Worksheet
Set wks = ActiveWorkbook.Worksheets("Tabelle1")
Set objShape = wks.Shapes("Mein Bild01")
With objShape
.Visible = Not .Visible
End With
End Sub
2.)Ist es möglich anstatt des Bildes auch eine verknüpfte Grafik per Commandbutton anzeigen zulassen?
Dürfte möglich sein.
Es ist aber einfacher, wenn man ein beliebiges Form-Objekt (z.B. ein Rechteck) einfügt und diesem dann einen entsprechenden Hyperlink zuordnet.
Gruß
Franz
Anzeige
AW: Bild per Command Button aus Arbeitsmappe
30.01.2017 17:24:02
Lucas
Hallo Franz
Besten Dank für die schnelle Hilfe.
Schönen Gruß
Lucas =)
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Bild per Command Button in Excel öffnen


Schritt-für-Schritt-Anleitung

Um ein Bild per Command Button in Excel anzuzeigen, folge diesen Schritten:

  1. Füge einen Command Button hinzu:

    • Öffne Excel und wechsle in die Entwicklertools. Falls diese nicht sichtbar sind, aktiviere sie über die Excel-Optionen.
    • Wähle "Einfügen" und füge einen "Button (Formularsteuerelement)" in dein Arbeitsblatt ein.
  2. Verknüpfe den Button mit einem Makro:

    • Klicke mit der rechten Maustaste auf den Button und wähle "Makro zuweisen".
    • Erstelle ein neues Makro, um das Bild zu öffnen.
  3. Füge den VBA-Code hinzu:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
    • Füge den folgenden Code ein, um das Bild bei einem Klick auf den Button anzuzeigen:
      Sub Bild_Ein_Ausblenden()
      Dim objShape As Shape
      Dim wks As Worksheet
      Set wks = ActiveWorkbook.Worksheets("Tabelle1") ' Name des Arbeitsblatts anpassen
      Set objShape = wks.Shapes("Mein Bild01") ' Name des Bildobjekts anpassen
      With objShape
         .Visible = Not .Visible
      End With
      End Sub
  4. Bildelement in Excel einfügen:

    • Füge das Bild in die Arbeitsmappe ein (z.B. über "Einfügen" > "Bilder").
    • Benenne das Bild im Eigenschaftenfenster (z.B. „Mein Bild01“).
  5. Testen:

    • Schließe den VBA-Editor und klicke auf den Button. Das Bild sollte jetzt angezeigt werden.

Häufige Fehler und Lösungen

  • Fehler: Das Bild wird nicht angezeigt.

    • Lösung: Überprüfe, ob der Name des Shapes im Code mit dem eingegebenen Namen des Bildes übereinstimmt.
  • Fehler: Der Button funktioniert nicht.

    • Lösung: Stelle sicher, dass das Makro korrekt zugewiesen ist und die Entwicklertools aktiviert sind.
  • Fehler: Das Bild wird nicht gefunden.

    • Lösung: Achte darauf, dass das Bild im gleichen Arbeitsblatt wie der Button eingefügt ist.

Alternative Methoden

Anstelle eines Command Buttons kannst du auch ein Rechteck oder eine andere Form verwenden, um ein Bild anzuzeigen. Füge einfach ein Rechteck ein und verlinke es mit einem Makro oder Hyperlink. Hier ein Beispiel für einen Hyperlink:

  1. Füge ein Rechteck hinzu.
  2. Klicke mit der rechten Maustaste darauf und wähle „Hyperlink“.
  3. Wähle „Platz im Dokument“ aus und verlinke mit einem bestimmten Ziel.

Praktische Beispiele

Hier ist ein Beispiel, wie du ein Bild per Button in Excel anzeigen kannst:

  1. Bild einfügen: Nennen wir das Bild „Mein Bild01“.
  2. Button erstellen: Erstelle einen Button und weise das Makro „Bild_Ein_Ausblenden“ zu.
  3. Abwechselnd ein-/ausblenden: Jedes Mal, wenn du auf den Button klickst, wechselt das Bild den Sichtbar-Status.

Tipps für Profis

  • Verwendung von Verknüpfungen: Anstatt Bilder direkt in Excel einzufügen, kannst du auch verknüpfte Grafiken verwenden, um die Dateigröße zu reduzieren.
  • VBA optimieren: Um die Performance zu verbessern, füge Fehlerbehandlungsroutinen in deinen VBA-Code ein.
  • Design: Gestalte den Button ansprechend, um die Benutzeroberfläche intuitiver zu gestalten.

FAQ: Häufige Fragen

1. Kann ich mehrere Bilder mit einem Button steuern?
Ja, du kannst den VBA-Code anpassen, um mehrere Bilder ein-/auszublenden.

2. Ist es möglich, das Bild aus einem externen Verzeichnis zu laden?
Ja, das ist möglich, aber achte darauf, dass der Pfad auf allen Rechnern gleich ist oder passe den Pfad im Code dynamisch an.

3. Welche Excel-Version wird benötigt?
Die beschriebenen Schritte funktionieren in den meisten modernen Excel-Versionen, einschließlich Excel 2016 und neuer.

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