Chercher la derniere cellule dune colonne comprenant mot précis et la copier

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

bobylaroche

XLDnaute Occasionnel
Bonjour à tous,

Ce post concerne l'extraction de la dernière cellule d'une colonne contenant un mot précis.

J'ai essayé avec les fonctions rechercher, lookup mais je n'y parviens pas.
Pour exemple le mot à rechercher dans le fichier joint est "inventaire".

Si vous avez une solution.

Merci
 

Pièces jointes

Re : Chercher la derniere cellule dune colonne comprenant mot précis et la copier

Bonjour bobylaroche,

Essayer le code suivant:
VB:
Sub essai()
Dim xrg As Range

Set xrg = Nothing
Set xrg = Sheets("Feuil1").Range("b:b").Find("inventaire", _
        after:=Sheets("Feuil1").Range("B1"), searchdirection:=xlPrevious, _
        LookIn:=xlValues, lookat:=xlPart, MatchCase:=False)
If Not xrg Is Nothing Then Sheets("Feuil2").[b5] = xrg.Value Else Sheets("Feuil2").[b5] = CVErr(xlErrNA)
End Sub

Edit: modif avant dernière ligne du code
 
Dernière édition:
Re : Chercher la derniere cellule dune colonne comprenant mot précis et la copier

Re,

Ou bien sans VBA, avec une formule matricielle en B5:
Code:
=INDEX(Feuil1!$B:$B;GRANDE.VALEUR((SIERREUR(CHERCHE("inventaire";DECALER(Feuil1!$B$1;0;0;EQUIV("zzzz";Feuil1!B:B;1);1));0)*LIGNE(DECALER(Feuil1!$B$1;0;0;EQUIV("zzzz";Feuil1!B:B;1);1)));1))
 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour