Félicitations !
+
0
points
En savoir plus
Actualités
Tests & Guides
Bons Plans
Forum
Premium
Rechercher sur le site
Connexion
Si votre email correspond à un compte, vous recevrez un lien de réinitialisation.
Réinitialiser le mot de passe
Retour connexion
Actualités
Tests & Guides
Bons Plans
Twitter
iPhone pliant
OnePlus 11
PS5
Disney+
Orange Livebox
Windows 11
Génération NT
Entraide
Applications
Microsoft Office
Excel
Recherche mot dans une celulle
Recherche mot dans une celulle
2 réponses
crole
29/05/2006 à 07:46
Bonjour le groupe
Bonjour JB
Le code du fichier joint ne fonctionne que sur quelques lignes
Le but est de rechercher Dans A le mot "mai" et suprimer les lignes qui
ne le contienne pas
http://cjoint.com/?fDhRVSu0b2
Merci =E0 vous tous
Cordialement
Bruno
Partager
Facebook
Twitter
Reddit
Whatsapp
Email
Signaler
Signaler un problème avec ce contenu
Envoyer
2 réponses
Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Supprimer
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Envoyer
AV
Signaler
29/05/2006 à 08:07
En utilisant un filtre :
http://cjoint.com/?fDigt84SiM
AVMerci à vous tous
Cordialement
Bruno
En utilisant un filtre :
http://cjoint.com/?fDigt84SiM
AVMerci à vous tous
Cordialement
Bruno
Vous avez filtré cet utilisateur ! Consultez son message
En utilisant un filtre :
http://cjoint.com/?fDigt84SiM
AVMerci à vous tous
Cordialement
Bruno
JB
Signaler
29/05/2006 à 09:55
http://cjoint.com/?fDj2ZF3vDy
For i = Cells(65000, 3).End(xlUp).Row To 1 Step -1
If Not Cells(i, 3) Like "*" & Me.ChoixMois & "*" Then Cells(i,
3).EntireRow.Delete
Next
JB
http://cjoint.com/?fDj2ZF3vDy
For i = Cells(65000, 3).End(xlUp).Row To 1 Step -1
If Not Cells(i, 3) Like "*" & Me.ChoixMois & "*" Then Cells(i,
3).EntireRow.Delete
Next
JB
Vous avez filtré cet utilisateur ! Consultez son message
http://cjoint.com/?fDj2ZF3vDy
For i = Cells(65000, 3).End(xlUp).Row To 1 Step -1
If Not Cells(i, 3) Like "*" & Me.ChoixMois & "*" Then Cells(i,
3).EntireRow.Delete
Next
JB