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


A voir également:

1 réponse

Réponse 1 / 1
michel_m Messages postés 18903 Statut Contributeur 3 317
 
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
van_van Messages postés 63 Statut Membre
 
Un grand merci a toi michel_m
0