Excel 2003 suppression de ligne automatique

Résolu
ARTHUR32 Messages postés 152 Date d'inscription   Statut Membre Dernière intervention   -  
ARTHUR32 Messages postés 152 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'ai un tableaux excel contenant plus de 5000 lignes
je voudrais supprimer toutes les lignes contenant dans la premiere cellule de la ligne le texte "DATE"

Merci de votre aide
A voir également:

8 réponses

Réponse 1 / 8
aac
 
si je comprends bien tu as une colonne, par exemple A, et tu veux la supprimer.

Il te suffit de cliquer gauche sur le A, elle passe en bleue, et ensuite de cliquer droit pour supprimer.
1
Réponse 2 / 8
ARTHUR32 Messages postés 152 Date d'inscription   Statut Membre Dernière intervention   3
 
merci de ta réponse

mais je ne veux pas supprimer des collonnes , je veux seulement supprimer les lignes contenant le texte date dans la premier cellule de la ligne

Merci d avance
0
Réponse 3 / 8
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour
essaies cette macro 

Sub effacer_ligne_si()
Dim condition
Dim col As Byte
Dim der_lig As Long, lig As Long

condition = "DATE" ' texte partiel dans cellule déclenchant effacement ligne
col = 1 'colonne de recherche
der_lig = Cells(65536, col).End(xlUp).Row
lig = 65536

Application.ScreenUpdating = False
Do Until lig = der_lig + 1
    On Error Resume Next
        lig = Columns(col).Find(condition, Cells(lig, col), , xlPart).Row
    If Err.Number > 0 Then
        Application.ScreenUpdating = True
        MsgBox "lignes effacées"
        Exit Sub
    End If
    Rows(lig).Delete
Loop

End Sub
0
Réponse 4 / 8
ARTHUR32 Messages postés 152 Date d'inscription   Statut Membre Dernière intervention   3
 
Merci de ta réponse, mais je fais comment pour créer la macro

Cordialement
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 8
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
1/ tu fais un copier de la macro sur le message
2/ dans XL (XL<2007) Alt+F11: tu es dans l'éditeur VBA
3/ insertion-module
4/ coller

Pou lancer: outils-macros-macro -executer

si tu t'en sert souvent, tu dessines un bouton avec la barre d'outils formulaire et tu l'affectes à la macro
0
Réponse 6 / 8
ARTHUR32 Messages postés 152 Date d'inscription   Statut Membre Dernière intervention   3
 
Bonjour,

J'ai mis un peu de tempspour tester la macro, elle fonctionne impecable

je voulais juste savoir si la macro va être sauvegarde dans le fichier ou pas

Meric en core
0
Réponse 7 / 8
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour,

OUI

mais si tu fais cette opération qu'une fois, tu peux la supprimer

merci de tagger "résolu"
0
Réponse 8 / 8
ARTHUR32 Messages postés 152 Date d'inscription   Statut Membre Dernière intervention   3
 
Merci Michel et bonne soirée
0