Macro Un mot d'une cellule fait supprimer la ligne du dessous Résolu/Fermé

Question

Bonjour,    
 Je commence par remercier pijaku pour sa macro du 15 fevrier 2013   
J'ai un autre problème dans la feuille atten_etique du classeur PREPARE_ETIQUETTES il faut d'apres le mot couple dans une cellule de la colonne H supprimer la ligne du dessous et effacer de A:H dans la ligne du mot couple je vais essayer de mettre mon dossier  
J'ai  excel 2003 et voudrais une macro VBA    
JE SUIS TOUJOURS AUSSI NUL             http://cjoint.com/?CCda6t1IYZA
Merci a l'avance   

micheleliane   
Configuration: Windows XP / Chrome 23.0.1271.97

eriiic · Answer

Bonjour,

commence par nettoyer ta feuille en supprimant les lignes vides (elles ne le sont pas vraiment) jusqu'à 10000 et les colonnes vides jusqu'à X.
Et à faire copier collage spécial valeur sur la colonne I car tu fais référence à la ligne suivante et tu auras des #REF.
Sub effLigCouple()
    Dim lig As Long
    For lig = Cells(Rows.Count, "H").End(xlUp).Row To 2 Step -1
        If Cells(lig, "H") = "couple" Then
            Rows(lig + 1).Delete
            Cells(lig, "A").Resize(, 8).ClearContents
        End If
    Next lig
End Sub
eric

micheleliane · Answer

Merci BEAUCOUP eriiic

Cela fonctionne très bien
Si j"ai bien compris 
 Rows(lig + 1).Delete=la ligne en dessous de couple
  Cells(lig, "A").Resize(, 8).ClearContents=la ligne"A" efface jusque"H"
Pour les colonnes je m'en sert jusqu'a "Q" pour préparer les étiquettes.
Mais si tu peut me donner la façon pour enlever les colonnes en trop .
Pour supprimer les lignes vide je l'exécute  avec la Macro : Sébastien Mathier
et c'est vrai je ne l'avais pas fait dans l'exemple
Je te remercie encore pour ta gentillesse et ton travail
MERCI micheleliane

micheleliane · Answer

Merci pour tout eriiic

maintenant j'ai de quoi je pense finir avant la manifestation

GRAND MERCI a vous tous qui vous occupés des autres aussi rapidement.

J'espère apprendre petit a petit.

MERCI EST BONNE APRES MIDI

Macro Un mot d'une cellule fait supprimer la ligne du dessous

3 réponses

Discussions similaires