Zoom sur selection dans listeBox

Zoom sur selection dans listeBox - VB/VBA/VBS - Programmation

Marsh Posté le 04-10-2005 à 17:31:56    

Bonjour,
 
je me permet de vous contacter car, apres mes recherches sur le net je n'ais pas trouve la solution (qui doit etre simple comme bonjour...8-))
 
Explication :
 
Je fais une selection dans une liste box par rapport a un champ de saisie se trouvant a cote... le probleme est qu il arrive a trouver la ligne correspondante dans la liste mais je ne sais pas comment me placer sur cette ligne ...
 
La liste est trop longue et si la ligne correspondante a ma recherche est en dessous (dans la liste), il faut scroller et la je peux voir qu elle a bien ete selectionnee ....
 
Voila merci de votre aide ;)
 
 :wahoo:

Reply

Marsh Posté le 04-10-2005 à 17:31:56   

Reply

Marsh Posté le 04-10-2005 à 17:42:37    

MaListBox.listIndex = NumeroLigneSelectionnee


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 05-10-2005 à 09:08:51    

mareek a écrit :

MaListBox.listIndex = NumeroLigneSelectionnee


 
Bonjour, tout d'abord merci pour ton aide !
 
Mais il me dit "Utilisation incorrecte de la propriete ListIndex" :( (erreur d'execution '7777')  
 
Voici ma fonction :
 
Function SelectionListe(zoneDeListe As ListBox, nbLignesTotal As Integer, texteRecherche As String)
    Dim i
    Dim valeurTmp
     
    For i = 0 To nbLignesTotal
        valeurTmp = zoneDeListe.Column(0, i)
        If valeurTmp = texteRecherche Then
            zoneDeListe.Selected(i) = True
             
            zoneDeListe.ListIndex = i
        End If
    Next
End Function
 
 :)
 
 
CA Y EST ! Merci il manquait juste le setFocus avant ;)
 :bounce:


Message édité par kiwi44 le 05-10-2005 à 09:28:47
Reply

Marsh Posté le 05-10-2005 à 10:20:00    

ah, les joies du VBA sous access ;)


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 05-10-2005 à 15:02:40    

mareek a écrit :

ah, les joies du VBA sous access ;)


 
C KLER !!! il est lunatique ce langage :p
 
 :pt1cable:


Message édité par kiwi44 le 05-10-2005 à 15:03:00
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed