Comment obtenir la dernière valeur d'un groupe de colonnes ? [Résolu/Fermé]

Signaler
Messages postés
99
Date d'inscription
vendredi 9 août 2013
Statut
Membre
Dernière intervention
18 février 2019
-
Messages postés
9820
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
27 novembre 2020
-
Bonjour tout le monde !

Sur un groupe de colonnes, je souhaiterais extraire le dernier chiffre de chaque ligne sur une autre colonne à part. Ci joint un fichier pour plus de visibilité sur ma demande.

https://www.cjoint.com/?DHCoGgUGVgN

Avez vous une idée ou une formule pouvant m'aider sur ça ?

Merci !

Peace !

4 réponses


=rechercheh(9999;B6:M6;1;1)
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 76687 internautes nous ont dit merci ce mois-ci

Messages postés
99
Date d'inscription
vendredi 9 août 2013
Statut
Membre
Dernière intervention
18 février 2019
4
Merci ddjidji59430 !!

Par contre comme je ne suis pas un expert en rechercheh, peux-tu m'expliquer le sens du 9999 ?

Merci encore !

9999
excel recherche un nombre qu'il ne trouve pas, alors, il donne le dernier de la liste
Messages postés
9820
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
27 novembre 2020
1 097
Bonjour,
Une solution sur le fichier joint : https://www.cjoint.com/?3HCxGMY17iS
Note : vous devez supprimer les [-] et les remplacer par des [0] dans le but d'éviter des erreurs lors de calcul... !

1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 76687 internautes nous ont dit merci ce mois-ci

Messages postés
99
Date d'inscription
vendredi 9 août 2013
Statut
Membre
Dernière intervention
18 février 2019
4
Merci Le Pingou !

Elle m'a l'air balaise ta formule matricielle. Peux-tu m'expliquer en deux petites lignes ses composantes ?

Merci encore !
Bonjour

si ton tableau contient beaucoup de ligne
tu peux aussi faire une macro

Sub TestFin()
Deb = 6
Nlig = Cells(Rows.Count, 1).End(xlUp).Row
For L = Deb To Nlig
DernChifre = 0
For C = 2 To 13
If Val(Cells(L, C).Value) > 0 Then
DernChifre = Cells(L, C)
End If
Next
Cells(L, 15).Value = DernChifre
Next
End Sub

A+
Maurice
Messages postés
99
Date d'inscription
vendredi 9 août 2013
Statut
Membre
Dernière intervention
18 février 2019
4
Merci Maurice !

Comme je ne suis qu'un novice en VBA, je préfère me fondre sur les formules :)

Merci encore !
Messages postés
9820
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
27 novembre 2020
1 097
Bonjour,
Selon votre demande l'explication sommaire se trouve sur la feuille.
Le fichier : https://www.cjoint.com/?3HDrOzpSxDV