Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Image
BildScreenshot zu Image Image-Seite mit Beispielarbeitsmappe aufrufen

Image auswählen

    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
      


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