Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1736to1740
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1736to1740
1736to1740
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bilder per Dropdown einfügen.

Bilder per Dropdown einfügen.
23.01.2020 13:52:22
Brand
Guten Tag
Ich bin ein Fan von diesem Forum und konnte bereits viele Sachen durch Einträge auf dieser Seite lösen oder herausfinden.
Nun habe ich ein Problem welches ich noch nicht ganz lösen konnte.
Ich möchte gerne Bilder automatisch in meine Excel Datei einfügen.
Ich habe in der Zelle G1 eine Dropdown Auswahlliste mit Namen.
Die Bilder habe ich alle mit denselben Namen welche in der Liste sind in einem Ordnerpfad im .jpg Format abgespeichert.
Wenn ich nun in der Dropdownliste einen Namen auswähle und sich daher der Wert in der Zelle
G1 ändert, soll automatisch das Makro ausgeführt werden, welches das Bild des entsprechenden Eintrages in G1 einfügt.
Das Bild soll mit der Linken oberen Ecke in der Zella A3 eigefügt werden oder wenn es einen Bereich
braucht, in den Bereich A3:C8.
Die Höhe des Bildes sollte 12 cm sein. Die Seitenverhältnisse können gesperrt sein.
Das Bild möchte ich gerne mit weichem Rand.
Vieleicht könnte mir da jemand behilflich sein einen geeigneten Code zu erstellen.
Ich bedanke mich bereits jetzt ganz herzlich für eure Hilfe.

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

Betreff
Datum
Anwender
Anzeige
AW: Bilder per Dropdown einfügen.
23.01.2020 14:37:55
Rudi
Hallo,
z.B. 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim objPIC As Object
If Target.Address = "$G$1" Then
Set objPIC = Me.Pictures.Insert(Target.Value)
With objPIC
.Top = Cells(3, 1).Top
.Left = Cells(3, 1).Left
.Height = Application.CentimetersToPoints(12)
.ShapeRange.SoftEdge.Type = msoSoftEdgeType3
End With
End If
End Sub

Gruß
Rudi
AW: Bilder per Dropdown einfügen.
24.01.2020 11:41:29
Beat
Danke Rudi für deine Antwort.
Im Moment kommt so die Meldung:
"Die Insert-Eigenschaft des Pictures-Objektes kann nicht zugeordnet werden"
Wo muss ich den Pfad der Fotos eingeben?
Der Pfad lautet: H:\Fussball\Homepage\Fotos\Einzelportrais
Anzeige
AW: Bilder per Dropdown einfügen.
24.01.2020 12:39:34
Rudi
Hallo, 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim objPIC As Object
Const cstrPFAD As String = "H:\Fussball\Homepage\Fotos\Einzelportraits\"
If Target.Address = "$G$1" Then
Set objPIC = Me.Pictures.Insert(cstrPFAD & Target.Value & ".jpg")
With objPIC
.Top = Cells(3, 1).Top
.Left = Cells(3, 1).Left
.Height = Application.CentimetersToPoints(12)
.ShapeRange.SoftEdge.Type = msoSoftEdgeType3
End With
End If
End Sub

Gruß
Rudi
AW: Bilder per Dropdown einfügen.
24.01.2020 12:56:44
Beat
Leider immer noch dieselbe Fehlermeldung.
Beim Debuggen markiert es folgende Zeile gelb.
Set objPIC = Me.Pictures.Insert(cstrPFAD & Target.Value & ".jpg")
Anzeige
AW: Bilder per Dropdown einfügen.
24.01.2020 19:06:01
Beat
Könnte es einen Zusammenhang mit meinem Speichermedium haben? Wäre es besser wenn die Bilder auf dem PC selber gespeichert werden anstelle des USB- Sticks?

302 Forumthreads zu ähnlichen Themen

Bilder automatisch einfügen in Zelle
SimonB

Hallo zusammen,
ich habe ein Problem in Excel, welches ich auch durch diverse VBA-Makros aus dem Netz nicht lösen kann:
Ich möchte in der Spalte A eines Tabellenblattes über ein Makro ein JPG einfügen lassen, welches durch eine immer 6-stellige Artikelnummer in der Spalte H des selben B...
30.09.2009 12:57:23
Thread-ID: 1106400
8 Beiträge
Anzeige
Bilder per Makro in Excel einfügen
stefanseevetal

Hallo zusammen!
Ich habe ein Problem, das ich mir nicht erklären kann. Ich füge nach einer Auswahl über den untenstehenden Code ein Bild im Tabellenblatt "Deckblatt" ein. Es soll gemäß dem Code oben links eingefügt werden. Leider funktioniert dies bei einigen Computern nicht und das Bild wi...
27.10.2009 19:27:47
Thread-ID: 1112579
4 Beiträge
Bilder in Zelle einfügen wenn
Andre´

Hallo alle zusammen,
ich möchte für den Bereich C5:F10 Bilder einfügen (jeweils mittig in Zelle), in Abhängigkeit des Zellwertes.
Ist der Zellwert = 1 dann Bild1 von Tabelle "Bilder" einfügen
Ist der Zellwert = 2 dann Bild2 von Tabelle "Bilder" einfügen
Ist der Zellwert = 3 dann...
15.12.2009 09:51:03
Thread-ID: 1123961
5 Beiträge
Anzeige
Bild per Makro einfügen
Nico

Hallo zusammen!
Ich habe ein Problem, das mich zur Verzweiflung treibt und ihr könnt mir da bestimmt helfen:
Ich habe ich Excel 2003 ein Makro geschrieben, mit dem ich in Excel per Knopfdruck ein Bild in die Zelle B7 einfügen kann. Das hat super funktioniert. Jetzt möchte ich genau das...
27.07.2010 12:08:24
Thread-ID: 1169089
11 Beiträge
Formel via VBA in best. (viele) Zellen einfügen
Klaus

Hallihallo zusammen,
und zwar mache ich u.a. einen Vergleich von 2 Tabellen mit mehreren Spalten und vielen Zeilen (meist um die 2500). [Vergleichscode ursprünglich von Hajo-Excel.de... vielen Dank an der Stelle!!]
Ich habs so hinprogrammiert und es hat im Kleinen auch gut funktioniert....
15.09.2010 16:53:30
Thread-ID: 1177873
5 Beiträge
Bild in Zelle einfügen.
Ernst

Hallo Exel Profis !
Ich würde mal wieder eure Hilfe benötigen.
Ich bräuchte ein makro das mir folgendes erfüllt, per Doppelklick in Zelle. g3 sollte sich der ordner C:\Dokumente und Einstellungen\Eigene Dateien\Eigene Bilder öffnen .Danach möchte ich mir ein bild auswählen können das si...
24.11.2010 12:48:35
Thread-ID: 1188515
4 Beiträge
Bilder in Zelle einfügen
Armin

Hallo,
ich füge mit folgendem Code Bilder aus einem Verzeichnis in Excel-Zellen untereinander ein:
Set pct = ActiveSheet.Pictures.Insert(strVerzeichnis & "\" & strDatei)
Wenn ich die Bilder z. B. 100 Stück aus einem Verzeichnis mit je 2 MB einfüge, wird die Excel-Datei zieml...
27.04.2011 00:19:02
Thread-ID: 1211877
3 Beiträge
VBA über explorer Bild einfügen
Erik

Hallo zusammen,
ich sitze gerade an einem problem, an dem ich einfach nicht weiter komme.
Ich versuche über den Explorer ein Bild in die Excel-Tabelle zu laden.
Dieses möchte ich mit einem Button machen, welcher später von diesem Bild verdeckt wird.
Das öffnen des Explorers funk...
08.12.2011 11:36:17
Thread-ID: 1241172
11 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
2
3
4
4
10
4
3
2
10
3
2
18
4
6
5
2
2
2
5
11
2
6
5
4