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
Partager