Discussion :

[Thierry'']

Bonjour,

Dans un etat j'ai des champs calculé par appelle de la fonction suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Function PoroLSM(K As String) As Integer
Dim MyDB As Database
Dim MyrcdSet As DAO.Recordset
Dim MySQL As String
 
Set MyDB = CurrentDb
 
MySQL = "SELECT Poro.LSM, Sum(Poro.[Above 0,5]) AS [MonResultat]FROM Poro GROUP BY Poro.LSM "
MySQL = MySQL + " HAVING (((Poro.LSM) Like ""LSM" & K & """));"
 
Set MyrcdSet = MyDB.OpenRecordset(MySQL)
 
PoroLSM = MyrcdSet![MonResultat]
 
 
End Function

Je souhaiterai savoir si c'est possible de trier ces champs par ordre decroissant.

Merci

[Didier71]

Bonsoir

Tu veux les trier directement sur ton Etat ou dans la requête ?

Si c'est dans la requete, rajoute une clause à ta chaine SQL "ORDER BY"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
MySQL = "SELECT Poro.LSM, Sum(Poro.[Above 0,5]) AS [MonResultat]FROM Poro GROUP BY Poro.LSM "
MySQL = MySQL + " HAVING (((Poro.LSM) Like ""LSM" & K & """)) ORDER BY Poro.LSM DESC;"

DESC c'est pour décroissant, ASC c'est pour croissant...


Bon courage

Didier71

[Thierry'']

Tu veux les trier directement sur ton Etat ou dans la requête ?

Directement dans l'etat, mais je pense que je vais devoir faire un sous etat basé sur la requête, car apparement on ne peut pas trier des champs independants.

Merci pour ta réponse.