Supprimer une ligne sur deux feuilles

Stefan7 -  
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour,

Je rencontre un souci sur VBA Excel, j'ai un macro qui agir sur deux feuilles différentes du même classeur.
J'arrive a ajouter et modifier les lignes d'une feuille en fonction de l'autre feuille. Le souci que je rencontre est que quand je supprime une ligne sur une feuille, cela n'agit pas sur l'autre feuille.
Que faire?
Merci de bien vouloir m'aider
Stéphane AHO

2 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    je supprime une ligne sur une feuille, cela n'agit pas sur l'autre feuille.
    Vous les supprimer comment: avec du code, manuellement ?????????????
    0
    1. aks2018 Messages postés 1 Statut Membre
       
      Merci de me répondre, c'est avec un code que j'arrive a ajouter et modifier. Mais je n'arrive pas a supprimer. si vous connaissez un code pour la suppression, je pense que cela pourra faire l'affaire.
      Merci
      0
  2. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    Bonjour,

    avec l'évenement feuille Worksheet_BeforeDoubleClick

    https://silkyroad.developpez.com/VBA/EvenementsFeuille/#LII-B

    L'action se déclenche au double clic sur la ligne à supprimer

    allez sur la feuille concernée et faire Alt F11 pour accèder au module de cette feuille et mettre ce code:

    Option Explicit
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim ligne As Integer
    ligne = Target.Row
     Rows(ligne & ":" & ligne).Delete Shift:=xlUp
      Sheets("Feuil2").Rows(ligne & ":" & ligne).Delete Shift:=xlUp
    End Sub
    
    

    0