Parcourt d'un fichier excel et suppression

Résolu
van_van Messages postés 63 Statut Membre -  
van_van Messages postés 63 Statut Membre -
Bonjour,
Quelqu'un aurait une idée d'un code qui fait cela :

Il parcourt donc mon fichier excel, qui ne contient qu'une seule colonne, A, et a partir du moment ou il recontre dans une cellule de la colonne A "TOTAL" alors il supprimer toutes les lignes d'apres .

Merci d'avance

1 réponse

  1.
    michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    bonjour 
    Option Explicit
    '-----------------------
    Sub vanvan()
    Dim Lig_Apres_Total As Long

    Lig_Apres_Total = Columns("A").Find("TOTAL", Range("A1"), xlValues).Row + 1
    Range("A" & Lig_Apres_Total & ":A" & Cells.Rows.Count).Clear
    End Sub

    0
    1. van_van Messages postés 63 Statut Membre
       
      Un grand merci a toi michel_m
      0

Discussions similaires

question pix mot caché
aorum10 -
pixlagalere -

7 réponses