Probleme recherche VBA

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 !

matteo0701

XLDnaute Junior
Bonjour,

J'ai crée un répertoire avec un formulaire Ajout Contact qui remplie la feuille Liste

J'ai crée un bouton "Rechercher" qui ouvre une fenetre de recherche qui laissera le choix de fair eune recherche par nom, commune ou activité.

C'est là que mes compétences VBA s'arrete.

- Je vousdrais qu'en ouvrant la fenetre recherche le curseur soit dans la case "Par nom"

- Je voudrais ensuite que le resultat de la recherche s'affiche dans la case blanche à coté en laissant apparaitre seulement le Nom, la commune et l'entreprise. (en qq sorte un apercu du contact)

- Ensuite une fois la bonne ligne selectrionnée, cliqué sur "Voir la fiche" qui renvoie vers la feuille "Fiche contact" pour voir l'ensemble des données du contact

Voici en PJ ma production

Merci par avance
 

Pièces jointes

Bonjour,

-Recherche intuitive multi-mots & multi-colonnes dans un ComboBox.
-Recherche intuitive multi-mots & multi-colonnes dans un TextBox/ListBox.
-Recherche + Modif +Ajout



JB
Ce lien n'existe plus
 

Pièces jointes

Dernière édition:
Bonjour,

- Je voudrais qu'en ouvrant la fenetre recherche le curseur soit dans la case "Par nom"
As-tu essayé de mettre 0 (zéro) dans le TabIndex du cadre "Par nom" (frame "txtnom") ?

Ou alors, dans ton UserForm "frm_recherche", mettre une ligne de code qui va donner le focus au champ que tu veux.
Par exemple :
VB:
Private Sub UserForm_Activate()
    txtnom.txtboxremplirnom.SetFocus
End Sub
 
Dernière édition:
Ah oui c'est pas mal.
sauf que cela ne marche que les noms. cela ne marche pas si je veux faire une recherche uniquement par commune
Pourrais tu faire en sorte que Lorsque je clique sur Voir la fiche cela reste sur la feuille excel et non pas sur Aprecu impression.
 
- 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
5
Affichages
684
Réponses
125
Affichages
13 K
Retour