Code vba pattern

[eastwick]

Bonjour à toutes et tous, le forum,
Un expert en VBA peut-il corriger mon code dans le module SVP ?
Il s'agit d'appliquer un objet dans une image.

Merci.

 

[Roland_M]

Re : Code vba pattern

bonsoir,

essayer ceci

Function ornerimage(s, R)
Application.Volatile
ActiveSheet.Shapes(s).Fill.ForeColor.RGB = R.Value
End Function

 

[eastwick]

Re : Code vba pattern

Bonjour le forum, Roland_M.,
Votre code n'a d'action que sur le remplissage intégral en couleur du freeform. Aucun pattern n'apparait. Néanmoins merci pour votre aide ! je finirai bien par trouver ! Bonne journée.