9.9k Aufrufe
Gefragt in Tabellenkalkulation von flops Einsteiger_in (55 Punkte)
Hallo Freaks.

Ich brauche bitte Eure Hilfe. Ich bin mit Excel zwar vertraut, aber kenn mich bei VBA überhaupt nicht aus.

Ich habe folgendes Problem zu lösen:

> Tabellenblatt A: Eingabe der Artikelnummer
> Tabellenblatt B: Tabelle mit Details zu den Artikeln; u.a. auch der Link zum dazugehörigen Artikel-Bild.

Ich möchte jetzt, sobald ich die Artikelnummer im Tabellenblatt A eingebe, dass daneben das dazugehörige Artikel-Bild ersichtlich ist.

Wie kann ich das machen ?

Danke für Eure Hilfe
Flops

28 Antworten

0 Punkte
Beantwortet von coros Experte (4k Punkte)
Hallo Flops,

schau mal auf meiner HP in der Rubrik Beispieldateien und dort dann in dem Beispiel 36 (Nach Auswahl einer Bildnummer Bild einblenden) nach. Dort stelle ich dazu eine Beispieldatei zur Verfügung, die Dir sicherlich helfen wird.

Bei Fragen melde Dich.

MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]
0 Punkte
Beantwortet von flops Einsteiger_in (55 Punkte)
Hallo Oliver.

Du scheinst ja Excel in- und auswendig zu kennen.
Kompliment, was ich da alles auf Deiner HP gesehen habe.

Leider bin ich VBA eine totale Niete, d.h. ich kenne mich überhaupt nicht aus. Vielleicht kannst Du mir hier konkret weiterhelfen ?

Meine Excel-Datei sieht folgendermaßen aus:

> Tabellenblatt "Eingabe"; in der Zelle K6 wähle ich mit einem Drop-Down Menü die "Artikelbeschreibung";

> Tabellenblatt "Details"; in der Zelle B3 bis D38 habe ich die einzelnen Details;
davon in der Spalte B die "Artikelbeschreibung"
und in der Spalte D die Namen der Bilder z.B. L_ALG.BMP


Wie muss ich jetzt das VBA programmieren, dass ich
> sobald ich in der Zelle K6 die Artikelnummer eingeben
> das dazugehörige Bild zum Artikel in der Zelle W17 bekomme ?

Danke für Deine professionelle Hilfe
Flops
0 Punkte
Beantwortet von hajo_zi Experte (9.1k Punkte)
Hallo,

schaue mal hier auf diese Seite Bilder einfügen

Gruß Hajo
0 Punkte
Beantwortet von flops Einsteiger_in (55 Punkte)
Hallo.

Ja danke für den Tip.
Habe diese Seiten bereits unter die Lupe genommen.
Aber wie gesagt, ich kenne mich mit VBA überhaupt nicht aus und schaffe es ehrlich gesagt nicht, meine Notwendigkeit zu integrieren.

Kann mir ev. jemand von Euch bitte helfen ?

Danke für Eure Freundlichkeit
Flops
0 Punkte
Beantwortet von hajo_zi Experte (9.1k Punkte)
Hallo,

den Code hast Du Dir schon angesehen, der ist unter der Tabelle, rechte Maustaste auf das Register und Code anzeigen. Da sind auch Kommentare drin.
Falls Fragen Bitte das Beispiel angeben. Version wäre vielleicht auch nicht schlecht.

Gruß Hajo
0 Punkte
Beantwortet von flops Einsteiger_in (55 Punkte)
Ich benutzte Windows Vista mit Excel 2002.

Meine Excel-Datei sieht folgendermaßen aus:

> Tabellenblatt "Eingabe"; in der Zelle K6 wähle ich mit einem Drop-Down Menü die "Artikelbeschreibung";

> Tabellenblatt "Details"; in der Zelle B3 bis D38 habe ich die einzelnen Details;
davon in der Spalte B die "Artikelbeschreibung"
und in der Spalte D die Namen der Bilder z.B. L_ALG.BMP

Wie muss ich jetzt das VBA programmieren, dass ich
> sobald ich in der Zelle K6 die Artikelnummer eingeben
> das dazugehörige Bild zum Artikel in der Zelle W17 bekomme ?

Danke für Deine Hilfe
Flops
0 Punkte
Beantwortet von hajo_zi Experte (9.1k Punkte)
Hallo,

was das mit der Tabele 2 zu Tun hatr verstehe ich nicht. Du mußt nur die Zelladresse anpassen und das Offset, 0,12

Gruß Hajo
0 Punkte
Beantwortet von flops Einsteiger_in (55 Punkte)
Sorry Hajo.

Das ist für mich schon zu hoch. Wie gesagt, VBA sagt mir überhaupt nichts.

Grüsse Flops
0 Punkte
Beantwortet von flops Einsteiger_in (55 Punkte)
Hallo Hajo.

Vielleicht habe ich die falsche Beispieldatei.
Welche Datei sollte ich nehmen ? Die Beispiel-01 Datei ?

Danke für Deine Hilfe
Flops
0 Punkte
Beantwortet von hajo_zi Experte (9.1k Punkte)
Hallo,

Du willst ja nur ein Bild einfügen, da wäre die Datei 01 korrekt.
Zu Beginn ist die Zelle festgelegt und weiter unten steht das mit dem Offset (Target.Offset(0, 0)) Es wird davon ausgegangen das der Bildname in der Zelle ausgewählt wird. Der Ordner ist oben im Code festgelegt.
Der Bildname muss bei Dir beszimmt nicht übersetz werden also ändere die Zeile
StBild = StPfad & "D" & Format(Target.Value, "00000") & ".jpg"
in
StBild = StPfad & Target.Value & ".jpg"

Gruß Hajo
...