Extraction de valeurs

Bonjour à tous,

une fois encore j'ai grand besoin de votre aide !

J'ai un fichier avec plein de valeurs, je souhaiterais pouvoir extraire certaines valeurs de différentes colonne dans un autre onglet du classeur (ici, ce serait résultats) en fonction du résultat de certaines cellules.

Là, comme çà, ce n'est pas très parlant. C'est pour çà que je fournis un fichier Excel anonymiser afin d'éclairer vos lanternes :) :)

L'idée serait de provoquer cette extraction à l'aide d'un bouton....si l'onglet "Résultats" possède des valeurs celles-ci seraient écrasées.

Merci par avance pour votre aide.

11exemple.xlsx (15.21 Ko)

Bonjour

Ci joint ma solution

6exemple-1.xlsm (24.50 Ko)

A+ François

Merci beaucoup pour la solution. Il manque juste les valeurs correspondantes à la colonne P qui ne sont pas remontées.

Sinon c'est pile ce qu'il me fallait ;)

Bonjour à tous !

Une approche via Power Query (nativement intégré dans Excel 2019 - Complément à installer pour Excel 2010 & 2013) retourne ceci :

image

Merci quand même mais je n'utilise pas pour le moment Power Query...

Bonjour à tous de nouveau !

....mais je n'utilise pas pour le moment Power Query...

Comportement fautif !

Vous devriez..... vous devriez !

J'avais pas vu cette colonne(je l'avais masquée)...lol

9exemple-1.xlsm (24.12 Ko)

A+ François

@JFL : oui, je sais...il faut absolument que je me penche là-dessus et que je trouve des petites explications !

@fanfan38 : Merci beaucoup pour le fichier ! C'est au top

Dernière petite question...

Si je veux placer le bouton sur un autre onglet, il faut changer beaucoup d'éléments ? J'ai essayé de le mettre sur un autre onglet et du coup, normal, ca m'efface les données de la feuille sur laquelle est le bouton..

Re

  Feuil2.Range("A2:C1000").ClearContents
  For Each c In d.keys
    i = Feuil2.Range("A" & Rows.Count).End(xlUp).Row + 1
    Feuil2.Range("A" & i) = c 'Feuil2 ou sheets("RESULTATS")
    Feuil2.Range("B" & i) = .Range("P" & d.Item(c))
    Feuil2.Range("C" & i) = .Range("S" & d.Item(c))
......
Tu peux remplacer Feuil2 par sheets("RESULTATS")....
5exemple-1.xlsm (24.14 Ko)

A+ François

OK merci beaucoup

Rechercher des sujets similaires à "extraction valeurs"