msopicture

bonjour tous connaissez vous un moyen plus rapide( je veux dire direct sans passer par un oléobject pour créer une picture avec un icon du ruban Sub test1() Dim v$, I&, Img As OLEObject v = "_3DEffectColorPickerClassic" 'Set Img =...