Discussion :

[Nad777]

Bonjour,
J'ai trouvé plusieurs discussions concernant la suppression de ligne, mais pas exactement ce que je cherches... Voici ma problématique, je fais un tri et je me retrouve avec plusieurs lignes bidon à la fin de ma base de données. Je voudrais supprimer toutes les lignes qui se trouvent à partir du mot "period", de ma colonne A, jusqu'à la fin (je ne veux pas seulement supprimer toutes les lignes qui commencent par le mot "period").

Voici le code trouvé, qui ressemble le plus à ce que désire réaliser. Est-ce qu'il est possible de modifier la Première Ligne Vide de ce code pour obtenir le mot "period" ou devrais-je opter pour une autre approche?

Code :

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

1
2
3
 PremiereLigneVide = Range("C65535").End(xlUp).Row + 1
    DerniereLigne = Range("A1").SpecialCells(xlCellTypeLastCell).Row
    Range("A" & PremiereLigneVide & ":" & "A" &   DerniereLigne).EntireRow.Delete

Merci beaucoup.

EDIT cafeine : il faut d'abord sélectionner le code puis cliquer sur #

[Nad777]

En passant, comment fait-on pour obtenir notre codage dans des balises.
Starec m'a déjà écrit pour me dire d'utiliser le signe # qu'on retrouve dans le petit menu, mais je dois mal l'utiliser...???

Je l'ai fait avant d'entrer mon code et après.

Merci et désolé pour mes balises manquantes

[cafeine]

Hello,

un truc du genre ?

Code :

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

1
2
range(range("A" & range("A1:A65536").Find("period").Row), _
                     range("A65536").End(xlUp)).entirerow.Delete

[Nad777]

Youppi, ça fonctionne super bien.

Merci beaucoup et c'est gentil de m'avoir expliqué à nouveau la balise de code.