Bonjour,
je souhaite faire une recherche.
J'ai un listbox, je souhaite qu'en sélectionnant un élément dans ce lsitbox,
il pointe sur la cellule du tableau.
Merci et bonne journée.
Alain
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Alain,
Je ne suis pas sûr d'avoir saisi ce que tu demandes... mais si ce que tu désires c'est de sélectionner la cellule de la feuille qui contient la valeur affichée par le textbox, essaie ceci :
'------------------------------- Private Sub ListBox1_Change()
With Me.ListBox1 With Range(.RowSource)(.ListIndex + 1, 1) Sheets(.Parent.Name).Select .Select End With End With
End Sub '-------------------------------
Salutations!
"Alain" a écrit dans le message de news: Bonjour, je souhaite faire une recherche. J'ai un listbox, je souhaite qu'en sélectionnant un élément dans ce lsitbox, il pointe sur la cellule du tableau. Merci et bonne journée. Alain
Bonjour Alain,
Je ne suis pas sûr d'avoir saisi ce que tu demandes... mais si ce que tu désires c'est de sélectionner la cellule de la
feuille qui contient la valeur affichée par le textbox, essaie ceci :
'-------------------------------
Private Sub ListBox1_Change()
With Me.ListBox1
With Range(.RowSource)(.ListIndex + 1, 1)
Sheets(.Parent.Name).Select
.Select
End With
End With
End Sub
'-------------------------------
Salutations!
"Alain" <a.gonthier@tiscali.fr> a écrit dans le message de news:eHtAC6VfEHA.708@TK2MSFTNGP09.phx.gbl...
Bonjour,
je souhaite faire une recherche.
J'ai un listbox, je souhaite qu'en sélectionnant un élément dans ce lsitbox,
il pointe sur la cellule du tableau.
Merci et bonne journée.
Alain
Je ne suis pas sûr d'avoir saisi ce que tu demandes... mais si ce que tu désires c'est de sélectionner la cellule de la feuille qui contient la valeur affichée par le textbox, essaie ceci :
'------------------------------- Private Sub ListBox1_Change()
With Me.ListBox1 With Range(.RowSource)(.ListIndex + 1, 1) Sheets(.Parent.Name).Select .Select End With End With
End Sub '-------------------------------
Salutations!
"Alain" a écrit dans le message de news: Bonjour, je souhaite faire une recherche. J'ai un listbox, je souhaite qu'en sélectionnant un élément dans ce lsitbox, il pointe sur la cellule du tableau. Merci et bonne journée. Alain
Alain
Merci beaucoup Denis cela fonctionne parfaitement. Je pensai qu'un Find était obligatoire ??? Alain.
"michdenis" a écrit dans le message de news:
Bonjour Alain,
Je ne suis pas sûr d'avoir saisi ce que tu demandes... mais si ce que tu désires c'est de sélectionner la cellule de la
feuille qui contient la valeur affichée par le textbox, essaie ceci :
'------------------------------- Private Sub ListBox1_Change()
With Me.ListBox1 With Range(.RowSource)(.ListIndex + 1, 1) Sheets(.Parent.Name).Select .Select End With End With
End Sub '-------------------------------
Salutations!
"Alain" a écrit dans le message de news:
Bonjour, je souhaite faire une recherche. J'ai un listbox, je souhaite qu'en sélectionnant un élément dans ce lsitbox,
il pointe sur la cellule du tableau. Merci et bonne journée. Alain
Merci beaucoup Denis cela fonctionne parfaitement.
Je pensai qu'un Find était obligatoire ???
Alain.
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:Omr6pHXfEHA.904@TK2MSFTNGP09.phx.gbl...
Bonjour Alain,
Je ne suis pas sûr d'avoir saisi ce que tu demandes... mais si ce que tu
désires c'est de sélectionner la cellule de la
feuille qui contient la valeur affichée par le textbox, essaie ceci :
'-------------------------------
Private Sub ListBox1_Change()
With Me.ListBox1
With Range(.RowSource)(.ListIndex + 1, 1)
Sheets(.Parent.Name).Select
.Select
End With
End With
End Sub
'-------------------------------
Salutations!
"Alain" <a.gonthier@tiscali.fr> a écrit dans le message de
news:eHtAC6VfEHA.708@TK2MSFTNGP09.phx.gbl...
Bonjour,
je souhaite faire une recherche.
J'ai un listbox, je souhaite qu'en sélectionnant un élément dans ce
lsitbox,
il pointe sur la cellule du tableau.
Merci et bonne journée.
Alain
