combobox+resultat tableau + activation userform

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 !

Profane

XLDnaute Occasionnel
Bonjour le Forum,

voila j'avoue tourner en rond, et ne pas trouver la solution dans les archives
mon probleme et le suivant
via 1 combobox alimente et un userform j affiche les resultats d'un filtre
tout est parfait tant que la donnée filtree est unique , le probleme c'est lorsque qu elle ne l'est pas
j'aimerai en fait que suivant le filtre du combobox, s'il trouve plusieurs fois la données dans la colonne de reference, il affiche dans un tableau les lignes correspondantes, et que en cliquant sur une de ces lignes de reponses
a ce moment seulement on accede au userform

j'espere que mon explication etait clair 🙂
sinon ,je reprendrai la vieille maxime: un dessin vaut mieux parfois qu un long discours
et a ce propos je vous joint mon fichier de test,
sur lequel nombre d'entre vous ont deja participe 🙂

Cordialement
 

Pièces jointes

Re : combobox+resultat tableau + activation userform

merci bebere de t'interesser a mon soucis 🙂
par contre tu as complique la chose 🙂
en fait plus simplement le resultat d'un choix de combobob A b ou c
devrait d'afficher dans la feuille excell recherche, dans les champs correspondants,
et ensuite en selectionnant la ligne desirée
ouvrir le userform de modification

en tout cas je suis impréssionne deja du code et de ton resultat,
penses tu que ma demande est réalisable ou utopique,
j'utilise le vba que depuis pau, et defois je ne me rends pas trop
compte si je ne demande pas la lune 🙂

++
 
Re : combobox+resultat tableau + activation userform

Re bebere, merci de ta patience et de ton aide
alors mon souhait
dans les colonnes
a (la colonne a de la feuille entree sans doublons)
b (la colonne b de la feuille entree sans doublons)
c (la colonne c de la feuille entree sans doublons)
lorsque l on selectionne une combo (1,2 ou 3) on filtre le tableau de longlet entrée
alors devra apparaitre dans la feuille recherche
le tableau en dessous des combobox
le resutat de la recherche
si un seul resultat -> popup de la usf de modification
si plusieurs resultats -> affichage dans le tableau excell
avec possibilité en cliquant sur une ligne d'avoir le details de celle ci dans le usf de modification
en esperant t'avoir eclairer
++
 
Re : combobox+resultat tableau + activation userform

Bonjour le forum, Bonjour bebere 🙂
deja un grand merci pour ton aide bebere

alors j'ai essaye ton fichier et le resultat est celui que j esperai 😉
mais lors de ma retranscription j'ai des soucis je m'explique
tu utilises des boucles pour remplir les textbox (1-n), dans le userformmodification et dans la feuille "recherche"
personnelement j en ai 70 a completer , et pour m'y retrouver j'ai du les nommer 🙂
donc la ca coince la macro n 'est pas "adaptable", pourrais tu me donner le debut de la macro pour 2, 3 textbox et j adapterai ?

ah pour l explication des 3combobox, en fait
je genere un tableau de projet et les sous projets sont confies a des societes de soustraitances (3), chacun nomant son projet selon leur type de nomage propre
donc je vais avoir soit a,b, ou c de rempli c'est pour ca que j utilise 3 combobox 🙂
et 3 feuilles car entree = previsionnels ; sortie = budget reels , et effet = services faits
avec 70 champs par feuilles
en fait j ai des champs commun (en orange) et les champs jaune sont ceux specifiques a la societe , voila pour la petite histoire

je te remercie d'avance ,
a bientôt
 
Dernière édition:
Re : combobox+resultat tableau + activation userform

bonjour Profane
un exemple qui te servira peut être et un essai avec la propriété tag de textbox

Private Sub CommandButtonValiderModification_Click() 'bouton "Valider"
Dim Lettre As String
With Sheets("Recherche")
Li = ActiveCell.Row
For C = 1 To 7
Lettre = Chr(64 + C)
If Controls("TextBox" & Lettre).Value <> .Cells(Li, C).Value Then
.Cells(Li, C).Value = Controls("TextBox" & Lettre).Value
Controls("TextBox" & Lettre).Value = ""
End If
Next C

End With

'à adapter
Dim CTRL As Control

For Each CTRL In Me.Controls
If TypeOf CTRL Is MSForms.TextBox Then
CTRL = ""
ElseIf TypeOf CTRL Is MSForms.ListBox Or TypeOf CTRL Is MSForms.ComboBox Then
CTRL.Clear
End If
Next
à bientôt
 

Pièces jointes

Re : combobox+resultat tableau + activation userform

salut le forum, salut bebere
je suis en train de tester tes codes,
j avoue que sur certains, je n 'arrive pas a comprendre la finalite,
mais ca s'explique aisement par le fait que je ne suis qu'un débutant dans cette nebuleuse de possibilité que recel excel
donc je reviendrais vers toi ou vers le forum , une fois ceci teste 🙂
a bientôt et merci encore 🙂
 
- 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

L
Réponses
3
Affichages
1 K
Retour