Dessiner via VBA
Résolu
Bonjour,
Je souhaites insérer des rectangles sur ma feuille de calcul Excel via VBA. J'ai réussi à créer un rectangle mais maintenant je voudrais changer sa couleur de remplissage et supprimer le contour.
J'ai déjà essayé d'enregistrer la manipulation, mais je comprends pas pourquoi, ça n'enregistre rien. Je me retrouve avec une macro vide.
Merci d'avance.
Je souhaites insérer des rectangles sur ma feuille de calcul Excel via VBA. J'ai réussi à créer un rectangle mais maintenant je voudrais changer sa couleur de remplissage et supprimer le contour.
J'ai déjà essayé d'enregistrer la manipulation, mais je comprends pas pourquoi, ça n'enregistre rien. Je me retrouve avec une macro vide.
Merci d'avance.
Configuration: Windows Vista Microsoft office 2007
2 réponses
-
ModérateurSalut,
Mauvaise manipulation? Ca fonctionne bien pourtant chez moi avec l'enregistreur de macro. Bref, voici un code qui pourra t'aider :Sub test() ActiveSheet.Shapes.AddShape(msoShapeRectangle, 151.5, 95.25, 126.75, 153.75).Select 'ajoute et sélectionne un rectangle With Selection .ShapeRange.Fill.ForeColor.SchemeColor = 10 'le colorie en rouge .ShapeRange.Line.Visible = msoFalse ' supprime le contour End With End Sub
-
Merci bien, c'est exactement ça.
Je comprends pas non plus pourquoi l'enregistrement marche pas pourtant je fais comme d'habitude et normalement ça marche. Mais pas là.
Encore merci!
