XL 2010 Textbox

nabilexcel2007

XLDnaute Occasionnel
Bonjour
j'aimerai mettre des texbox en m'affichant le contenu de cellule a la selection de ma Listbox
par ex:
quand je selectionne ma ligne sur listbox les textbox s'affiche
Merci
 

Pièces jointes

  • VBA.xlsm
    279.8 KB · Affichages: 33

patricktoulon

XLDnaute Barbatruc
Bonsoir ChTi160
puisque tu connais pas l'astuce qui est d'une simplicité
voici comment boucler
"for each elem in tableau"(1 seule boucle!!!!)
et non une double boucle imbriquée comme suit
for ligne =1 to ubound(tableau)
for colonne= 1 to ubound(tableau,2)
next
next
et pouvoir quand meme!!!!! determiner la ligne de l'element


tout simplement comme ca
exemple

VB:
Sub test2()
   Dim tableau, elem, x&, ligne&
   tableau = [A1:G20]
    For Each elem In tableau
        x = x + 1
        ligne = x Mod UBound(tableau): If ligne = 0 Then ligne = UBound(tableau)
        MsgBox "l'element " & elem & "est en ligne " & ligne
    Next
End Sub
mais oui mais c'est bien sur ;)
je vois d'ici job75 faire les gros yeux :D
 

nabilexcel2007

XLDnaute Occasionnel
OK POUR LES DOUBLONS
j'ai pris le fichier (2) du post #26. j'ai copier ma base de donnee j'ai tjs le meme probleme QUAND JE FAIT UNE RECHERCHE DANS LE TEXTBOX LE RESULTAT S'AFFICHE DANS LA LISTBOX ET QUAND JE SELECTIONNE LA LIGNE LE RESULTAT NE S4AFFICHE PAS DANS LES TEXTBOX
 

Pièces jointes

  • Sans titrecccc.png
    Sans titrecccc.png
    69.8 KB · Affichages: 2

Discussions similaires

Statistiques des forums

Discussions
312 358
Messages
2 087 584
Membres
103 600
dernier inscrit
Tora61