Macro de recherche dans un tableau

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 !

rodgeru80

XLDnaute Nouveau
Bonjour,

Je cherche à créer une macro qui irai chercher une valeur dans un talbeau

en clair :

Dans la feuille 1
j'ai des valeur dans la colonne B allant de 1 à 60 et des valeur dans la colonne D allant de 1 à 4
Mon résultat doit s'affiché dans la colonne F

Dans la feuille 2
Il y à un tableau avec sur la ligne 1 les valeur de 1 à 60
et sur la colonne A le valeur de 1 à 4.

Je veux donc que la macro recherche dans la feuille 2 la valeur situé à l'intersection de la ligne et de la colonne et me la copie en sur la feuille 1 dans la colonne F
Pour sa elle cherchera la valeur indiqué dans la colonne B de la feuille 1 dans la ligne 1 de la feuille 2
et elle cherchera la valeur indiqué dans la colonne D de la feuille 1 dans la colonne A de la feuille 2
Ensuite on copie lla valeur situé à l'intersection dans la colonne F de la feuille 1

Je sais pas si j'ai été très clair mais merci de votre aide
 
Re : Macro de recherche dans un tableau

Bonjour rodgeru80 et le forum.
Une application est toujours claire pour celui qui est dedans!
Pour ma part, je ne saisi pas tout.
A quel moment, quel évenement doit démarrer la macro?
Met nous un petit fichier explicatif en PJ.
Merci, bon courage et à +
Denis
 
Re : Macro de recherche dans un tableau

Il n'y a pas de moment précis pour démarrer la macro. Le mieux serait quel s'active après avoir saisie ma valeur dans la colonne D

Voici un extrait du fichier en pièce jointe (il est très simplifié car c'est un document du travail avec des infos confidentiels)
J'espére que je t'ai donné toute les infos dont tu as besoin
 

Pièces jointes

Re : Macro de recherche dans un tableau

Bonjour Rogeru80 et bienvenue, salut Denis 🙂,
Est-il bien nécessaire de développer de la macro quand une formule et une MFC vont donner le même résultat 🙄 ?
A toi de voir 😛...
Une proposition sans macro en PJ 😉
Bonne suite 😎
 

Pièces jointes

Re : Macro de recherche dans un tableau

reBonjour rodgeru80, JNP et le forum
ci-joint ton fichier avec une petite macro (dans le module)
L'activation se fait dans le "Worksheet_SelectionChange" de la feuil1
Bon courage et à+
Denis
 

Pièces jointes

Re : Macro de recherche dans un tableau

Merci pour ton aide JNP
Par contre j'ai pas précisez mais je me rend compte que j'aurais du en essayant la macro sur le vrai tableau.
J'ai des valeurs et du texte dans les autres colonnes qui sont vide dans mon exemple et cela empéche le fonctionnement de la macro y a t'il une solution?
 
Re : Macro de recherche dans un tableau

Re 🙂,
Merci pour ton aide JNP
Par contre j'ai pas précisez mais je me rend compte que j'aurais du en essayant la macro sur le vrai tableau.
J'ai des valeurs et du texte dans les autres colonnes qui sont vide dans mon exemple et cela empéche le fonctionnement de la macro y a t'il une solution?
Pas vraiment compris 😕...
Moi, je t'ai proposé des formules, pas de la macro, et en quoi des cellules vides font planter la macro ?
Euh, je viens d'y jeter un oeil, il n'y avait pas de test 🙄...
Supprime le Module1, enlèves
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    MiseàJour
End Sub
et à la place mets
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Column <> 2 And .Column <> 4 Then Exit Sub
If Cells(.Row, 2) = "" And Cells(.Row, 4) = "" Then Exit Sub
Range("F" & .Row) = Sheets("feuil2").Cells(Range("D" & .Row) + 1, Range("B" & .Row) + 1)
End With
End Sub
Ça devrait le faire 😛...
Bonne suite 😎
 
- 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

Réponses
4
Affichages
151
Réponses
9
Affichages
387
Réponses
8
Affichages
467
Retour