IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Détection de la suppression d'un ligne


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Inscrit en
    juillet 2007
    Messages
    18
    Détails du profil
    Informations forums :
    Inscription : juillet 2007
    Messages : 18
    Points : 10
    Points
    10
    Par défaut Détection de la suppression d'un ligne
    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

  2. #2
    Expert éminent Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    juin 2006
    Messages
    4 754
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : juin 2006
    Messages : 4 754
    Points : 9 396
    Points
    9 396
    Par défaut
    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
    Jérôme

  3. #3
    Membre à l'essai
    Inscrit en
    juillet 2007
    Messages
    18
    Détails du profil
    Informations forums :
    Inscription : juillet 2007
    Messages : 18
    Points : 10
    Points
    10
    Par défaut
    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

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 13
    Dernier message: 10/03/2009, 22h37
  2. [VB.net] Détection suppression d'une ligne dans Datagrid
    Par Cereal123 dans le forum Windows Forms
    Réponses: 2
    Dernier message: 03/03/2006, 14h08
  3. [DOM] Problème de suppression sauts de lignes après modification XML
    Par chabada dans le forum Format d'échange (XML, JSON...)
    Réponses: 4
    Dernier message: 15/06/2005, 13h46
  4. [JTable] problème après suppression d'une ligne
    Par fredo3500 dans le forum Composants
    Réponses: 7
    Dernier message: 17/03/2005, 10h01
  5. Réponses: 6
    Dernier message: 04/03/2004, 09h35

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo