Excel supprimer une ligne

manoelinho Messages postés 46 Statut Membre -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

Est ce que c'est possible de mettre dans la macro une condition supplémentaire?
par exemple j'aimerai que la ligne 23 soit effacée si le contenue de la cellule A1 est "FAUX" mais seulement si le contenue de la cellule A23 est "FAUX"

merci d'avance
Configuration: Windows Vista
Firefox 3.0.10

2 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Salut,
    Bien sur.
    If condition 1 then
    If condition2 then
    supprimer la ligne
    end if
    end if
    0
  2. chossette9 Messages postés 6855 Date d'inscription   Statut Contributeur Dernière intervention   1 313
     
    JE croyais avoir mis du code tout à l'heure, mais j'ai du me planter copieusement ^^

    Voici le code qui doit correspondre à ce que tu attends :

    Sub suppression()
       If Range("A1").Value = "FAUX" Then
          If Range("A23").Value = "FAUX" Then
             Rows("23:23").Select
             Selection.Delete shift=xlUp
          End If
       End If
    End Sub


    Voilà normalement ça devrait te dépanner.
    0
    1. manoelinho Messages postés 46 Statut Membre
       
      ouai mais dans le cas ou la ligne a supprimer ne se trouve pas sur la meme feuille et par exemple sur la feuille 3? est ce que je doit noter avant

      sheet(""feuil3").activate
      range("A23").select
      0
      1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773 > manoelinho Messages postés 46 Statut Membre
         
        Bonjour,
        Effectivement. Ou alors :
        Sheets("Feuil3").Range("A23").Select
        0