Recherchev avec macro

  • Initiateur de la discussion Initiateur de la discussion helene51
  • 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 !

helene51

XLDnaute Junior
Bonjour le forum,

Vous m'avez déjà bien aidé dans mes projets mais j'ai encore un petit problème.

Cette fois-ci je suis embêtée avec une recherche. J'aimerai qu'en fonction des données saisies dans mon USF1, s'affichent des valeurs correspondantes dans mon USF2.

Ci-joint un petit fichier plus clair que des grandes phrases.

J'ai besoin d'un exemple pour l'un des cas et je me débrouille avec les autres.

Merci pour votre aide.
 

Pièces jointes

Re : Recherchev avec macro

J'ai essayé avec un vlookup mais ça ne marche pas.

Que dois-je déclarer ?

Private Sub CmdBut_Valid_Click()

Dim x As Integer
Dim c As String

c = ComboBoxTrancheur.Value

UserForm1.Hide

If c = "1" Then

x = Application.VLookup(c, Sheets("bdd").Range("prog_cs"), 3, 0)
UserForm2.TextBox1.Value = x

End If

UserForm2.Show

End Sub
 

Pièces jointes

Re : Recherchev avec macro

Re Bonjour Helene,

Voici un nouveau fichier avec quelques modifications.

J'ai nommées les plages Trancheur1 à Trancheur3 pour chaque zone

Je me suis permis de déplacer la colonne MP de la zone Trancheur3 pour respecter les numéros de colonnes et faciliter les recherches.

J'ai défini des constantes dans le userform1 qui correspondent aux numéros des colonnes afin de faciliter la lecture de la macro. Cela évite de s'y perdre dans les x, i et autres indices non descriptifs. Et produit un code plus facile à corriger éventuellement et à adapter.

Bien à toi, Hasco
 
- 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
8
Affichages
376
Réponses
3
Affichages
445
Réponses
10
Affichages
674
Réponses
3
Affichages
280
Réponses
24
Affichages
1 K
Réponses
7
Affichages
669
Réponses
7
Affichages
663
Retour