Icon in Userform

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

Betrifft: Icon in Userform von: Rolf Beißner
Geschrieben am: 07.03.2005 09:31:51

Hallo Forum,

ist es möglich, einem Userform-Control
die FaceID eines Commandbar-Controls zuzuweisen,
ohne den Umweg über LoadPicture?

Herzliche Grüße
Rolf

Bild


Betrifft: hat sich erledigt - dank K.Rola von: Rolf Beißner
Geschrieben am: 07.03.2005 10:46:57

Hallo Forum,

habe in der Recherche einen alten Beitrag
von K.Rola gefunden und leicht abgewandelt.

Die Lösung:

Option Explicit


Private Sub UserForm_Initialize()
    Dim icon As CommandBarControl
    Set icon = CommandBars.FindControl(ID:=4)
    Me.CommandButton1.Picture = icon.Picture
End Sub

Herzl.Grüße
Rolf


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Icon in Userform"