Trouver le numéro de la ligne active

je souhaiterai utiliser le numéro de la ligne qui vient d'être modifier j'ai utiliser activecell.row mais cette formule a une faille puisque quand je modifie une cellule et que j'appuye sur enter cela me donne le numéro de la cellule du dessous j'ai donc modifier avec -1 mais si j'appuye sur gauche droite bas ou haut je me retrouve avec le meme probleme pour retrouver le numéro de la ligne modifié.

code=vb]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Dim ligne As Integer, nom As String

ligne = ActiveCell.Row - 1

nom = "ATTENTION STOCK !!!!" & ThisWorkbook.Sheets(5).Cells(ligne, 1) & "!!!! reste : ------> " & ThisWorkbook.Sheets(5).Cells(ligne, 255)

If ThisWorkbook.Sheets(5).Cells(ligne, 255) <= ThisWorkbook.Sheets(5).Cells(ligne, 256) Then

MsgBox nom, vbExclamation + vbOKOnly

End If

End Sub

[/code]

Ha oui pardon

Rechercher des sujets similaires à "trouver numero ligne active"