SOS URGENT Quelqu'un maitrise t'il les msflexgridRésolu

Question

Pour mon projet j'ai un msflexgrid sur 3 colonnes, la 1&#232;re ligne est fix&#233;e:
 ________________
| Date | Num&#233;ro| Nom|
----------------------
|15/02|00001    | aaa  |

 et j'aimerais savoir si il &#233;tait possible d'effectuer une action en cliquant sur l'ent&#234;te d'une des colonnes par exemple le tri par ordre alphab&#233;tique des noms ou existe t'il un autre moyen d'y parvenir ... merci de me r&#233;pondre.
c'ets hyper urgent

Slyders · Accepted Answer

tu peu faire le meme genre sur:

Private Sub Msflexgrid_Click()
num_colonne_a_trier = msf.TextMatrix( 0, msf.ColSel)
'la sa te prendra l'entete
'ensuite tu fait uen bel requete SQL
 requete = "SELECT champ01, champ02 FROM table01, table02 WHERE condition01 AND condition02 ORDER BY " & num_colonne_a_trier & " ASC;"
'ASC pour Ascendant et DESC pour descendant
'bon et bien sur apres faut lire ton jeu d'enregistrement avec la requete et la r&#233;afficher ;)

End Sub

en esp&#233;rant t'aider , ++

Surfurax · Answer

Si tu interceptes le click et que regardes le libell&#233; de la colonne en
cours, tu pourras r&#233;cup&#233;rer l'ent&#234;te de ta colonne, &#231;a c'est facile,
par contre, r&#233;aliser le tri, c'est &#224; toi de le faire et de mettre &#224;
jour toutes tes lignes.



@+

[%22%20mailto:paulferrand@yahoo.fr%22%20 " mailto:paulferrand@yahoo.fr" ]Surfurax[/url

jpleroisse · Answer

Bonjour,

Voici la seule fa&#231;on que je connaisse pour trie un MSFlexGrid



Private Sub Combo1_Click()

' S&#233;lectionne une colonne en fonction de la m&#233;thode de tri.

Select Case Combo1.ListIndex

Case 0 To 2

MSFlexGrid1.Col = 1

Case 3 To 4

MSFlexGrid1.Col = 2

Case 4 To 8

MSFlexGrid1.Col = 1

End Select

' Trie en fonction de Combo1.ListIndex.

MSFlexGrid1.Sort = Combo1.ListIndex

End Sub

Private Sub Form_Load()

   ' Remplit la liste modifiable avec les choix de tri

With Combo1

.AddItem "flexSortNone" ' 0

.AddItem "flexSortGenericAscending" '1

.AddItem "flexSortGenericDescending" '2

.AddItem "flexSortNumericAscending" '3

.AddItem "flexSortNumericDescending" '4

.AddItem "flexSortStringNoCaseAsending" '5

.AddItem "flexSortNoCaseDescending" '6

.AddItem "flexSortStringAscending" '7

.AddItem "flexSortStringDescending" '8

.ListIndex = 0

End With

End Sub



jpleroisse

Sytchev3 · Answer

Je te remercie Franck ta solution marche nickel

Arnaud et Matthieu

SOS URGENT Quelqu'un maitrise t'il les msflexgrid

4 réponses

Discussions similaires