probleme vba

Question

Bonjour,
j ai un petit soucie je cherche a controle une couleur en fonction d un texte 
ex ci j ecris rouge dans une case presise il faut que cela me color un rond en rouge dans une autre
feuille 
je vous remercit

Ankhsuamon · Answer

Hello,

Ce petit exemple est sur une feuille Excel. Tu definis ton shape et dans l'evenement change de ta feuille tu fais :

Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Target = "rouge" Then
        ActiveSheet.Shapes("Oval 1").Select
        Selection.ShapeRange.Fill.ForeColor.SchemeColor = 10
        Selection.ShapeRange.Fill.Visible = msoTrue
        Selection.ShapeRange.Fill.Solid
    End If

End Sub

Lorsque tu ecris rouge dans la cellule A1 et que tu selectionnes une autre cellule le shape change de couleur.

Probleme vba

1 réponse

Votre réponse

Discussions similaires

Newsletters