Excel - mit Artikelnummer Bild anzeigen

[Jockel]

besten Dank.  das ist bereits mehr als ich hatte.

wenn ich eine 2 eingebe, bleibt das Bild der Kuh stehen. Nur die Info ändert sich auf "Geschäft"
Und die "Artikelnummer" wäre nun die zeilenzahl auf dem ersten Blatt ja?  Was wenn die Artikel Nummer nun 137B x 27  wäre?

Hallo, bei mir weicht die Kuh dem Geschäft... Und ja das wäre die ArtNr...

[slowinvest]

Ok,

es ist aber auch so nicht ganz das richtige.  Da realistische Artikelnummern nicht einfach 1, 2, 3   sind.  sondern wie gesagt auch 137B X 127    lauten könnte.

MfG

[Jockel]

Hallo, wie die heißen ist doch "Latte", wenn die Vorgehensweise so vorstellbar ist, ist das kein Problem, da sind wir wieder so ziemlich am Anfang, wenn du mithilfst beim Helfen, kriegen wir das bestimmt hin..!!!

[schauan]

Hallöchen,

mal noch eine andere Variante. Wenn die Bilder auf einem Server liegen und nicht unbedingt in die Datei rein müssen, könnte man auch mit Hyperlinks arbeiten. Dadurch wird die Exceldatei schlanker und die Bilder lassen sich einfach im Ordner austauschen. Ich habe das bei mir ab und an im Einsatz und so gelöst:

Arbeitsblatt mit dem Namen 'Aufgaben'
	A	B	C
28	26	Schau	Bei Eintrag eines falschen Datenformats bei bedingter Formatierung einer Textbox muss der Dialog abgebrochen und neu gestartet werden.

Zelle	Formel
A28	=HYPERLINK(TEXT(ZEILE()-2;"000")&"-"&L28&".png";ZEILE()-2)

Diese Tabelle wurde mit Tab2Html (v2.5.0) erstellt. ©Gerd alias Bamberg

- Speichern der Bilder in einem Verzeichnis
--> Bildernamen sind bei mir Chronologisch 001, 002, 003 usw., wegen einer Vereinfachung in Excel
- Anlegen einer Exceldatei im gleichen Verzeichnis
--> Verwendung einer Hyperlinkformel =HYPERLINK(TEXT(ZEILE()-2;"000")&"-"&L108&".png";ZEILE()-2)
--> Zeilenversatz -2 wegen Beginn des Datenbereichs in Zeile 3 in dieser Beispieltabelle
- Falls es zu einer Zeilennummer kein Bild gibt, einfach die Formel rauslöschen.

Die Sache mit der Zeilennummer ist quasi die Vereinfachung. Alternativ könnte man in der Zelle neben dem Hyperlink den Bildernamen eingeben und dann statt der Zeilenfunktion den Bezug auf die Nachbarzelle legen.

Da Bilder und Exceldatei in einem Verzeichnis liegen kann ich das Ganze bei Bedarf dann auch einfach weitergeben. Einfach das komplette Verzeichnis gezippt und ab geht's ...

[slowinvest]

Guten Morgen.


diese zweite variante könnte ich auch mal vesuchen.Aber glaube ich werde da noch nicht ganz schlau draus. Ich probiere das gleich.  Danke. 

ich hab auch von jemand noch einen code bekommen der funktionieren soll.
Aber leider auch  noch kein bild anzeigt.

Code:

Public Function ZeigeBild(ByVal strBildname As String, Bildhöhe As Long) As String

Dim strDatei As String
Dim Bildbreite As Double
Dim Bildhoehe As Double
Dim meinBild
Dim strZielzelle As String

strZielzelle = Application.Caller.Address


strDatei = "U:\Pfad zum Bild Ordner\" & strBildname & ".jpg"

If Dir(strDatei) <> "" Then
Set meinBild = LoadPicture(strDatei)
Bildbreite = meinBild.Width
Bildhoehe = meinBild.Height

ActiveSheet.Shapes.AddPicture strDatei, msoFalse, msoTrue, Range(strZielzelle).Left, Range(strZielzelle).Top, Bildhöhe * 28.35 * Bildbreite / Bildhoehe, Bildhöhe * 28.35
ZeigeBild = "Bild"
Else
ZeigeBild = "Bild nicht vorhanden"
End If

End Function

und zum anzeigen  wo das Bild hin soll:  =ZeigeBild(C4;3)


Da war die erste version mit der Kuh und dem Geschäft wohl einfacher. Ich denke das es aber auf sicht doch besser ist wenn, die Bilder in einem Ordner liegen könnten. Mit der Zeit könnten das viele werden.

[schauan]

Hallöchen,

bei Dir könnte die Formel einfacher aussehen. Wenn die Bilder z.B alle PNG sind, dann so, ansonsten müsste bei unterschiedlichen Typen selbiger noch zum Namen in die Zelle...

Tabellenblattname: Tabelle2

	A	B	C
28	MeinBild	MeinBild	Das sagt mir was

Benutzte Formeln:
A28: =HYPERLINK(B28&".png";B28)
von schauan

In meiner Formel vorhin war noch L28 dabei, aber die Zelle nicht dazu. Dort steht bei mir die Kategorisierung bzw. Zuordnung z.B. zu einem Programm. Die Bilddatei heißt dann bei mir z.B. 028-Programm1.png.

[slowinvest]

Hallöchen,

bei Dir könnte die Formel einfacher aussehen. Wenn die Bilder z.B alle PNG sind, dann so, ansonsten müsste bei unterschiedlichen Typen selbiger noch zum Namen in die Zelle...

Tabellenblattname: Tabelle2

	A	B	C
28	MeinBild	MeinBild	Das sagt mir was

Benutzte Formeln:
A28:  =HYPERLINK(B28&".png";B28)
von schauan

In meiner Formel vorhin war noch L28 dabei, aber die Zelle nicht dazu. Dort steht bei mir die Kategorisierung bzw. Zuordnung z.B. zu einem Programm. Die Bilddatei heißt dann bei mir z.B. 028-Programm1.png.

Hallo,

sorry aber ich versteh das so nicht.  Wie gesagt leider komplett Anfänger.
=HYPERLINK(B28&".png";B28)

wo müsste so eine formel hin. Dort wo das Bild erscheinen soll...? 
Woher der Hyperlink, wenn das bild in einem Ordner auf dem server liegt. die bilder sind .jpg 
Wie aufrufen anhand einer Artikelnummer, die ich in einem anderen feld eingebe... alle bilder sollen am selben ort gezeigt werden. 

möchte nur in zelle C4  eine nummer eingeben  und das zugehörige bild aus einem ordner vom server soll in zelle C7  erscheinen.

danke für die mühe.

[Jockel]

Guten Morgen.


diese zweite variante könnte ich auch mal vesuchen.Aber glaube ich werde da noch nicht ganz schlau draus.   Ich probiere das gleich.  Danke. 

ich hab auch von jemand noch einen code bekommen der funktionieren soll.
Aber leider auch  noch kein bild anzeigt.
...
Da war die erste version mit der Kuh und dem Geschäft wohl einfacher. Ich denke das es aber auf sicht doch besser ist wenn, die Bilder in einem Ordner liegen könnten. Mit der Zeit könnten das viele werden.

Hallo, es gibt sicher einige Varianten, wenn's mehr als 16.000 Bilder werden sollte könnte man die in Kategorien einteilen und auf verschiedene Spalten aufteilen... Bei meinem Vorschlag ist es nur sinnvoll, wenn die Bilder annähernd gleich groß sind... ansonsten sind dem kaum Grenzen gesetzt...

[schauan]

Hallöchen,

ja, in etwa dort kommt die Formel hin. Ich habe mal A28 genommen, du kannst die aber irgendwohin setzen.. Mit meinem Beispiel würde ich in B28 eingeben, wie das Bild heißt. Dann würde ich in A28 klicken und das Bild erscheint.