Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
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 !
Je recherche la formule me permettant de retrouver une valeur dans un tableau.
J'ai essayé index, recherchev, rechercheh sans y arriver.
Merci d'avance pour votre aide.
Je joints un fichier pour essai.
Bonsoir laurent950, soan, et Dranreb Excel...ante Année 2021 à vous tous.
Merci à vous pour votre aide.
Super bonne soirée
Très instructif le lien de laurent950
Bonjour Le Forum,
Bonjour R@chid, RechercheX sur Microsoft 365 très inintéressant. J'ai cherché sur le net pour avoir plus de détail. Beaucoup mieux que RechercheH et V
Cordialement.
Bonsoir le Forum,
Bonsoir Dranreb, Soan, Laurent950, R@chid
Je reviens vers vous pour continuer mon travail.
J' ai créé un formulaire qui dans le classeur d'origine se trouve sur une autre feuille que celle des données.
(Feuille présente dans le classeur joint) afin de simplifié
Dans ce formulaire se trouve 2 listes déroulantes. La 1ere est remplie, la seconde n'affiche que la 1ere année. 2015
Je souhaiterai retrouvé la valeur du croisement des 2 listes déroulante pour l'inscrire dans T1
Si la valeur me convient je valide pour la recopier dans la cellule G24 de la feuille de travail.
Merci d'avance.
Bonne soirée
Option Explicit
Private T()
Private Sub UserForm_Initialize()
' Remplissage des listes déroulantes
Cb_Mois.List = Range("Mois").Value
Cb_Ans.List = WorksheetFunction.Transpose(Range("Ans"))
T = Feuil1.[D6:R17].Value
' Nombre de modules enregistés.
T3 = [B2]
End Sub
Private Sub Cb_Ans_Change()
AfficheR
End Sub
Private Sub Cb_Mois_Change()
AfficheR
End Sub
Private Sub AfficheR()
If Cb_Ans.MatchFound And Cb_Mois.MatchFound Then
T1.Text = T(Cb_Mois.ListIndex + 1, Cb_Ans.ListIndex + 1)
End If
End Sub
Private Sub Btn_Close_Click()
Unload Me
End Sub
Je viens de terminer de recopier la macro de Dranreb dans mon fichier d'origine.
Çà fonctionne super bien. Mais lorsque je rajoute une donnée dans mon tableau, elle n'apparait pas dans mes listes box
Cela est du à :
VB:
T = Feuil1.[D6:R17].Value
Bien sur, si je rectifie les coordonnées du tableau ça fonctionne.
Y aurait il pas possibilité de l'adapter automatiquement.
Je pensais à décaler mais ça ne fonctionne pas.
- 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