HERBERS Excel-Forum - die Beispiele

Thema: Bilder in Videoliste eintragen und löschen

Home

Gruppe

Grafik

Problem

Wie kann ich in eine Tabelle mit einer Aufstellung von Video-Filmen Bilder einfügen und löschen?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.
ClassModule: Tabelle2

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   Dim pct As Picture
   If Target.Column < 2 Then Exit Sub
   If IsEmpty(Target) Then Exit Sub
   Cancel = True
   Target.Offset(0, 1).Select
   If Dir(Target.Value) = "" Then
      Beep
      MsgBox "Grafik wurde nicht gefunden!"
   Else
      For Each pct In ActiveSheet.Pictures
        If pct.Top = Target.Offset(0, 1).Top Then
            pct.Delete
            End
        End If
    Next pct
    Set pct = ActiveSheet.Pictures.Insert(Target.Value)
   End If
End Sub

Beiträge aus dem Excel-Forum zu den Themen Grafik und Grafikimport

Jahresgrafik Grafik - Linie nach unten, Kriterien links
Grafik auf Position bringen Viele Grafiken mit gleicher Größe einfügen
Excel Grafiken nur schwarz/weiss Grafik drucken
Grafik nach Change in Exceltabelle laden Bereich als Grafik speichern
Grafiken kopieren Text und Grafik in Fusszeile
Grafik in der Kopfzeile - OHNE PFADANGABE Grafik, Datenbeschriftung
Linie in einer Grafik ansprechen Grafik positionieren
Linien-Säulen auf zwei Achsen - Grafik Grafik in Zelle einfügen, wie?
mehrere Grafiken aus derselben Pivot Grafik anzeigen - evtl. Reihenfolge ändern?
Grafikobjekt nach Zelleingabe anpassen Grafik in Zellen - Sparklines
Grafik Option Explicit zusweisen Grafik bei Nullen nicht weiterführen
Makro bei Rechtsklick auf Grafik Kontextmenü Grafik
Grafikgröße nach Hyperlink festlegen Grafik Drehmoment Leistung
Grafiken mit Säuledarstellung Dynamische Grafik/Diagramm
Beschriftung bei Bubble-Grafik gestapelte Säulengrafik
Dynamischer Datenbereich bei Grafiken Grafik
Schwellenwert in Excel-Grafik einfügen? wechselnde grafiken abhängig von wert einblenden
Grafik-Spezial Vorschaugrafik
Grafikformat Grafik in Tabelle, abhängig von Zellinhalt
Grafikprogramm über Excel legen Grafik in XLS-Kopfzeile im PPT darstellen
Grafiken aus derselben Pivot Grafik mit selektierten Daten
veränderbare Grafik je nach Datenmenge Formatier. einer Pivot Grafik wird immer Rückges.
Grafik immer aktualisieren mehrere Grafiken aus einer Pivot
verzogene Grafik mit VBA zurücksetzen bestimmte Grafik in Zelle nach löschen
3D-Grafik X-Achsenbeschriftung Grafik beim Öffnen einer Datei