XL 2013 macro supprimer colonne contenant le mots teste1

arrazki

XLDnaute Junior
Bonjour,

je n'arrive pas a créer une macro qui supprime la colonne contenant le mot teste1

Sub Supp teste1
Dim I As Integer
For I = [A65000].End(xlUp).Row To 1 Step -1
If Cells(I, 1).Find("test1") Is Nothing Then Rows(I).Delete
Next I
End Sub

comment je peux faire pour supprimer uniquement la colonne contenant le mot "teste1"

Pouvez vous m'aider svp?
 

phlaurent55

Nous a quittés en 2020
Repose en paix
Bonjour arrazki,

Code:
For I = [A65000].End(xlUp).Row To 1 Step -1
If Not Cells(I, 1).Find("*test1*") Is Nothing Then Rows(I).Delete
Next I

à+
Philippe

EDIT:

à vérifier, s'agit-il de supprimer teste1 comme indiqué dans la demande

ou supprimer test1 comme indiqué dans l'exemple donné
 
Dernière édition:

phlaurent55

Nous a quittés en 2020
Repose en paix
Si je reste logique Arrazki cite :
donc pourquoi ne pas chercher *teste1* plutôt que *test1* ?

Edit : Philippe on vient de se croiser dans nos réponses !!

Malheureusement l'avenir ne nous dira pas s'il faut chercher test1 ou teste1 car ce n'est pas dans les habitudes de ce questionneur de revenir dire si la réponse convient

Pour répondre sur ce forum, il faudrait parfois utiliser une boule de cristal ....... d'Arques :):):(

.
 

Discussions similaires

Statistiques des forums

Discussions
312 911
Messages
2 093 509
Membres
105 744
dernier inscrit
laure.mg