Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Renvoyer intitulé colonne en fonction d'une valeur

  • Initiateur de la discussion Initiateur de la discussion leblond
  • Date de début Date de début

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 !

L

leblond

Guest
Bonjour le forum,

Votre mission, si vous l'acceptez est de m'éviter la calvitie qui me guette si je continue à m'arracher les cheveux sur un problème qui n'a pas l'air compliqué du tout...

J'ai une table avec des valeurs 0 et une valeur par ligne qui est supérieure à 0. J'aimerais tout simplement renvoyer l'intitulé de la colonne lorsqu'il y a une valeur >0.

Je vous mets le petit fichier qui va bien avec.

En vous remerciant par avance pour votre grandeur d'âme.
 

Pièces jointes

Re : Renvoyer intitulé colonne en fonction d'une valeur

Bonjour,

un début de piste à placer en N4 :
=SI(ESTERREUR(INDEX($B$3:M4;1;EQUIV(SOMME(B4:M4)/NB.SI(B4:M4;">0");B4:M4;0)));"";INDEX($B$3:M4;1;EQUIV(SOMME(B4:M4)/NB.SI(B4:M4;">0");B4:M4;0)))

Edit : Bonjour hoerwind, plus court, plus rapide, plus simple...je m'incline.
 
Dernière édition:
Re : Renvoyer intitulé colonne en fonction d'une valeur

Bonjour leblond, JBOBO, Bonjour hoerwind,
Une proposition par macro evennementielle:
VB:
Private Z As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long, j As Long
If Z = True Then Exit Sub
Z = True: i = Target.Row
If Not Intersect(Target, Range("B4:M12")) Is Nothing And Target.Count = 1 Then
    Cells(i, 14).ClearContents
    For j = 2 To 13
        If Cells(i, j) > 0 Then Cells(i, 14) = Cells(3, j): Exit For
    Next j
End If
Z = False
End Sub
Cordialement
 

Pièces jointes

Re : Renvoyer intitulé colonne en fonction d'une valeur

J'ai envie de dire bravo. merci à vous 3 pour vos solutions toutes aussi efficaces et rapides les unes que les autres.
et merci aussi pour votre rapidité!

des bisous, des calins.
 
Re : Renvoyer intitulé colonne en fonction d'une valeur

Re,

Merci à toi aussi pour ces remerciements, cela fait toujours plaisir de savoir qu'on a pu aider quelqu'un, bien que, en ce qui concerne les bisous et les câlins, j'aurai préféré que ton pseudo soit "lablonde" (affaire de goût personnel !)
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…