Excel 2003 suppression de ligne automatique Résolu

Question

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

aac · Answer

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.

ARTHUR32 · Answer

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

michel_m · Answer

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

ARTHUR32 · Answer

Merci de ta réponse, mais je fais comment pour créer la macro

Cordialement

michel_m · Answer

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

ARTHUR32 · Answer

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

michel_m · Answer

Bonjour,

OUI

mais si tu fais cette opération qu'une fois, tu peux la supprimer

merci de tagger "résolu"

ARTHUR32 · Answer

Merci Michel et bonne soirée

Excel 2003 suppression de ligne automatique

8 réponses

Votre réponse

Newsletters