Discussion :

[stimp4ck]

Bonjour,

Je voudrais savoir quelle est le test que je doit faire pour savoir quand une ligne a été supprimée ?

Je détecte le changement de la worsheet avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
If (Target.Row >= 10 And Target.Column = 1) Then
 
End If
 
End Sub

Puis je cherche les lignes sur les lignes située après la 10eme, et j'ai remarqué que lorsqu'on selectionne la ligne au niveau de son numéro dans la feuille excel, et qu'on fait Clic_droit => supprimer, la colonne sélectionnée et la 1ere...

Bref, je n'ai pas trouvé de fonction qui detecte ce genre d'evenement...

Merci pour votre aide

[jfontaine]

Je ne pense pas qu'il y ait un évenement qui fait ca
Par contre su tu as une colonne qui contient des informations unique a la ligne (un ID par exemple), tu peux utiliser ce bout de code.

dans ce code la colonne ID est A
Code a mettre dans la feuille

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim strAvant As String
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
If strAvant <> Range("A" & Target.Row).Value Then MsgBox "ligne supprimée " & Target.Row
 
End Sub
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
strAvant = Range("A" & Target.Row).Value
End Sub

[stimp4ck]

Merci pour cette réponse

Je vais utiliser cette astuce, elle a l'air de fonctionner, me reste plus qu'a gérer cette ID