Formule vba pour une selection multiple avec souris
Résolu
lolo24150
Messages postés
39
Statut
Membre
-
lolo24150 Messages postés 39 Statut Membre -
lolo24150 Messages postés 39 Statut Membre -
Bonjour,
D'abord je début avec le VBA.Du moins je vous promet j'essaye.
Je voudrais , après avoir sélectionner une cellule ou plusieurs cellules avec la souris pouvoir en appuyant sur un bouton mettre un "x" à l'intérieur de chaque cellule et remplir la cellule en rouge .Et également si je ré appui sur le même bouton pouvoir effacer cette sélection.
Merci par avance pour vos compétences.
D'abord je début avec le VBA.Du moins je vous promet j'essaye.
Je voudrais , après avoir sélectionner une cellule ou plusieurs cellules avec la souris pouvoir en appuyant sur un bouton mettre un "x" à l'intérieur de chaque cellule et remplir la cellule en rouge .Et également si je ré appui sur le même bouton pouvoir effacer cette sélection.
Merci par avance pour vos compétences.
2 réponses
-
Bonjour,
Tu peux essayer comme celaSub Test()
If Selection.Interior.ColorIndex = 3 Then
Selection.Value = ""
Selection.Interior.ColorIndex = xlNone
Else
Selection.Value = "x"
Selection.Interior.ColorIndex = 3
End If
End Sub
A+ -
Merci,
Cela fonctionne parfaitement, j'avais le truc pour la couleur mais pas pour le "texte" .
Mrci encore pour toutes vos compétences.
