Herbers Excel-Forum - das Archiv

Image auswählen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Image auswählen
von: Lutz
Geschrieben am: 01.10.2003 22:53:10
Hallo und Guten Abend an alle,

habe folgendes Problem:

Im Sheet "Data" befinden sich Image1 - Image18, in Spalte A die Zahlen 1 bis 18 und in Spalte B 18 Ländernamen.
In einer Userform kann nun ein Land ausgewählt werden. Dann soll CommandButton1 die zugehörige Grafik anzeigen.

Bsp: gewähltes Land : China; zugehörige Zahl in Spalte A: 7
jetzt soll Image7 im Commandbutton angezeigt werden

Was muß ich im unten stehenden Code ändern, um das Image variabel aufzurufen ?



Set rng = Sheets("Data").Columns(34).Find(Land, lookat:=xlWhole, LookIn:=xlValues)
pic = Sheets("Data").Cells(rng.Row, 33).Value
CommandButton1.Picture = Sheets("Data").Image7.Picture  ???

     Code eingefügt mit Syntaxhighlighter 2.1


Gruß Lutz
Bild

Betrifft: Thread geschlossen ohne Lösung
von: Lutz
Geschrieben am: 02.10.2003 12:47:55
 Bild