Trie liste
hydatidose
-
hydatidose -
hydatidose -
Bonjour, sous Access j’ai un formulaire avec une zone de liste (Liste32) j’y affiche selon la lettre écrite dans une zone texte (Texte42) des médicaments, je voudrais que la liste soit triée selon l’ordre alphabétique, Le code qui fonctionne est le suivant :
Dim SQL As String
Dim SQLWhere As String
SQL = "SELECT CodRemed, Specialite, Classe " & _
"FROM Remed " & _
"WHERE Remed!CodRemed <> 0"
SQL = SQL & "And Remed!Classe like '*" & Me.Texte42.Value & "*' "
SQLWhere = Trim(Right(SQL, Len(SQL) - InStr(SQL, "Where ") - Len("Where ") + 1))
SQL = SQL & ";"
Me.Liste32.RowSource = SQL
Me.Liste32.Requery
Lorsque j’ajoute : "ORDER BY Remed.Specialite;" après WHERE cela ne marche pas !
Que dois je faire, MERCI
Dim SQL As String
Dim SQLWhere As String
SQL = "SELECT CodRemed, Specialite, Classe " & _
"FROM Remed " & _
"WHERE Remed!CodRemed <> 0"
SQL = SQL & "And Remed!Classe like '*" & Me.Texte42.Value & "*' "
SQLWhere = Trim(Right(SQL, Len(SQL) - InStr(SQL, "Where ") - Len("Where ") + 1))
SQL = SQL & ";"
Me.Liste32.RowSource = SQL
Me.Liste32.Requery
Lorsque j’ajoute : "ORDER BY Remed.Specialite;" après WHERE cela ne marche pas !
Que dois je faire, MERCI
A voir également:
- Trie liste
- Liste déroulante excel - Guide
- Liste code ascii - Guide
- Liste déroulante en cascade - Guide
- Site dangereux liste - Guide
- Voir liste d'amis facebook - Guide
1 réponse
Bonsoir, problème résolu grâce à Miciv et à Spaiku
Voir le lien suivant :
https://www.developpez.net/forums/d637154/logiciels/microsoft-office/access/vba-access/trier-zone-liste/#post3750968
Merci à tous ceux qui aident les autres !
Voir le lien suivant :
https://www.developpez.net/forums/d637154/logiciels/microsoft-office/access/vba-access/trier-zone-liste/#post3750968
Merci à tous ceux qui aident les autres !