Discussion :

[patricktoulon]

bonjour a tous

je cherche le moyen de remplir une shapes insérée dynamiquement avec une texture disponible dans excel

j'ai bien essayer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
with sheets(1).add shapes(10,10,50,50)
.name ="mashape"
.fill.usertextured= "granit"
end with

mais ca ne fonctionne pas
une idée

merci pour le retour

au plaisir

[tedo01]

Bonjour Patrick,
Essaye avec .Fill.PresetTextured.
Tu n'as ensuite plus qu'à faire ton choix dans la collection de valeurs msoTexturexxx (dans msoPresetTexture).

[patricktoulon]

bonjour tedo1

super merci c'est nickel
pour information c'est de 1 a 22 par leur indexs

au plaisir