Herbers Excel-Forum - das Archiv

Image variabel auswählen

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

Betrifft: Image variabel auswählen
von: Lutz
Geschrieben am: 02.10.2003 13:06:52
Hallo zusammen,

ich möchte dem CommandButton1 in einer UserForm ein Bild zuweisen.
Mit folgendem Code funktioniert das auch für Bild 12:

fzahl = Sheets("Data").Cells(rng5Row, 33).Value
For Each img In ActiveSheet.Shapes()
If img.Name = "Image" & fzahl Then
Frame1.CommandButton1.Picture = Sheets("Data").Image12.Picture
End If
Next

Ich möchte jedoch über fzahl ein beliebiges Bild einfügen, weiß aber nicht, wie ich das anstellen soll.
Versuche wie
Frame1.CommandButton1.Picture = Sheets("Data").Image(fzahl).Picture oder
Frame1.CommandButton1.Picture = Sheets("Data").Shapes("Image" & fzahl).Picture
schlugen fehl.
Kann mir jemand helfen ?

Gruß
Lutz

Bild

Betrifft: Thread geschlossen ohne Lösung
von: Lutz
Geschrieben am: 06.10.2003 08:48:40
 Bild
Excel-Beispiele zum Thema " Image variabel auswählen"
Druckbereich variabel gestalten