Bonjour,

j'ai trouvé un code, que j'ai modifié et appliqué pour mon projet permettant de mettre en évidance la ligne sélectionnée.

Ainsi lorsque j'ai beaucoup de donnée, la ligne est en jaune, et je pourrai modifier la cellule dont j'ai besoin.

Seul souci, c'est qu'avec ce code, je n'arrive pas à modifier les cellules ! Lorsque je mets un nombre, il s'inscrit uniquement dans la 1er colonne ...

Si quelqu'un pouvait me donner un petit coup de pouce !

Merci d'avance.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public ADDcell1, ADDcell2 As Integer
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ADDcell1 = "" Then ADDcell1 = ActiveCell.Row
Rows(ADDcell1).Interior.Color = xlAutomatic
Rows(ADDcell1).Interior.Pattern = xlNone
Rows(ADDcell1).Interior.TintAndShade = 0
Rows(ADDcell1).Interior.PatternTintAndShade = 0
ADDcell2 = ActiveCell.Row
Rows(ADDcell2).Select
With Selection.Interior
.Color = 65535
End With
ADDcell1 = ADDcell2
End Sub