Parcourt d'un fichier excel et suppression

Résolu/Fermé

van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017 - 19 avril 2016 à 09:29
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017 - 19 avril 2016 à 15:30

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:

Parcourt d'un fichier excel et suppression
Forcer la suppression d'un fichier - Guide
Fichier rar - Guide
Comment ouvrir un fichier epub ? - Guide
Comment réduire la taille d'un fichier - Guide
Si et excel - Guide

1 réponse

Réponse 1 / 1

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
19 avril 2016 à 10:15

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

van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
19 avril 2016 à 15:30

Un grand merci a toi michel_m

Discussions similaires

Chemin Logo du site de la Cité de l'espace