Supprimer cellules commençant par
Fermé
myriouma
-
29 mai 2012 à 13:17
eriiic Messages postés 24512 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 24 mars 2023 - 29 mai 2012 à 14:39
eriiic Messages postés 24512 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 24 mars 2023 - 29 mai 2012 à 14:39
A voir également:
- Supprimer cellules commençant par
- Supprimer compte instagram - Guide
- Supprimer une page word - Guide
- Supprimer compte facebook - Guide
- Numero commencant par 09 ✓ - Forum Mobile
- Supprimer compte gmail - Guide
1 réponse
eriiic
Messages postés
24512
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 mars 2023
7 168
29 mai 2012 à 14:39
29 mai 2012 à 14:39
Bonjour,
un exemple pour A1:A20 :
eric
un exemple pour A1:A20 :
Sub supprime()
Dim c As Range, lig As Long
For lig = 20 To 1 Step -1
If Left(Cells(lig, 1), 9) = "classe no" Then Cells(lig, 1).Delete Shift:=xlUp ' en colonne A (1) supprime et décale vers le haut
Next lig
End Sub
eric