Surbrillance de ligne un peu particulière

Bonjour à toutes et tous,

Petite question qui me vient à l'esprit, est-il possible de mettre en surbrillance toute une ligne lorsque l'on clique sur une cellule de cette ligne ? Puis la surbrillance s’arrête lorsque je clique ailleurs etc...

Ce serait pour avoir un meilleur confort visuel lorsque je rentre des données dans le tableur.

Si ce n'est pas possible, je vous en voudrai pas

Crdlt

Bonjour,

Un test mais c'est vraiment du "gadget", après le deuxième clic la macro démarre. Un code est dans ThisWorbook, l'autre dans Feuil1 :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Oldcell Is Nothing Then
        Set Oldcell = Target
        Target.EntireRow.Cells.Interior.Color = vbGreen
        Exit Sub
    End If
    Oldcell.EntireRow.Cells.Interior.Color = xlNone
    Set Oldcell = Target
    Target.EntireRow.Cells.Interior.Color = vbGreen
End Sub

Private Sub Workbook_Open() 
ActiveCell.EntireRow.Cells.Interior.Color = xlNone 
End Sub

Cdlt,

C'est gadget mais dans des tableaux remplis de chiffres ça permet de s'y retrouver vraiment mieux...

Ça fonctionne bien, merci.

Est-il possible d'avoir un bouton afin de l'activer ? et l'arrêter ?

Bonjour, oui c'est possible il suffit d'ajouter une condition au code de d'Ergotamine pour vérifier si bouton = Fase ou True

Super !

Par contre je sais pas pourquoi je dois avoir un soucis avec mon classeur non ?

Bonjour,

Pas de souci de fichier. C'est un souci de système d'exploitation 😉

Ok, je testerai ça au boulot

Merci à tous !!