Formule vba pour une selection multiple avec souris

Résolu
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.



A voir également:

2 réponses

Réponse 1 / 2
Gyrus Messages postés 3360 Statut Membre 526
 
Bonjour,

Tu peux essayer comme cela 
Sub 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+
0
Réponse 2 / 2
lolo24150 Messages postés 39 Statut Membre
 
Merci,
Cela fonctionne parfaitement, j'avais le truc pour la couleur mais pas pour le "texte" .
Mrci encore pour toutes vos compétences.
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Paris multiple : explications de 2/3, 3/4, 2/4, 2/5, etc.
florent.c -
Aide -

85 réponses
Pari multiple 2/5 explications
alicia 29 -
cha -

14 réponses
Décalage de formule
nathan01983 -
via55 -

12 réponses