begin process at 2010 02 09 23:39:39
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Base de Donnees

 > TRI D'UNE MSHFLEXGRID PAR CLICK SUR L'ENTÊTE

TRI D'UNE MSHFLEXGRID PAR CLICK SUR L'ENTÊTE


 Information sur la source

Note :
10 / 10 - par 2 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Base de Donnees Classé sous :tri, mshflexgrid, clique, entête, datagridview Niveau :Débutant Date de création :28/06/2006 Date de mise à jour :28/06/2006 12:02:59 Vu :6 232
Auteur : adamo901

Ecrire un message privé
Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

 Description

Bonjour tout le monde:
J'avais beau cherché un code qui permet de réaliser un tri dans une MSHFlexGrid en cliquant sur l'entête de la table (Style DatagridView de VB2005) sans jamais trouver une réponse.

Voici la solution que j'ai utilisé et qui marche très bien et en plus le code est assez cours! ;-))

Source

  • Option Explicit
  • Dim Csst As Boolean 'Variable utilisée dans le code
  • Private Sub a_Click() ' a est le nom de la MSHFlexGrid
  • If (a.MouseRow = 0) Then ' Clique sur l'entête de la MSHFlexGrid
  • If Csst Then ' Tri Croissant
  • a.Col = a.MouseCol
  • a.Sort = 2
  • Csst = False
  • Else 'Tri Décroissant
  • a.Col = a.MouseCol
  • a.Sort = 1
  • Csst = True
  • End If
  • End If
  • End Sub
Option Explicit
Dim Csst As Boolean                'Variable utilisée dans le code

Private Sub a_Click()              ' a est le nom de la MSHFlexGrid
    If (a.MouseRow = 0) Then       ' Clique sur l'entête de la MSHFlexGrid
        If Csst Then               ' Tri Croissant
            a.Col = a.MouseCol
            a.Sort = 2
            Csst = False
        Else                       'Tri Décroissant
            a.Col = a.MouseCol
            a.Sort = 1
            Csst = True
        End If
    End If
End Sub

 Conclusion

Un premier clique = Tri Croissant
Un deuxième clique = Tri Décroissant
Bonne chance ;-)


 Historique

28 juin 2006 12:02:59 :
Ajout de commentaires au code ;-)

 Sources du même auteur

Source avec Zip Source avec une capture OUVRIR UNE APPLI EN .EXE DANS UNE FORM EN VB6
DÉSACTIVER LE TASK MANAGER
Toutes les sources de adamo901

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) DATA ACCESS COMPONENT par zaimfaycal
Source avec Zip GESTION ENSEIGNANTS par Elmarzougui
Source avec Zip GESTION D'UNE BIBLIOTHÈQUE par Elmarzougui
Source avec Zip VISUALISATION BASE ACCESS par claude440
Source avec Zip SUPER MONEY par MdelM
Toutes les sources de la catégorie Base de Donnees

 Sources en rapport avec celle ci

Source avec Zip Source .NET (Dotnet) REPORTING SIMPLIFIÉ par deuxmains
Source avec Zip Source avec une capture TRI DES ITEMS DE LISTVIEW (DATE, NUMÉRIQUE OU PERSO) par Renfield
Source avec Zip Source .NET (Dotnet) TRI PAR ORDRE ALPHABETIQUE par alpha5
Source avec Zip Source avec une capture Source .NET (Dotnet) TRI AVEC VISUALISATION par xave4552
Source avec Zip Source avec une capture TRI COMPLEXE SUCCESSIF MULTI OPTION AVEC UNE MSHFLEXGRID par ym_trainz

Commentaires et avis

Commentaire de comme le 04/07/2006 11:33:36

Très bonne idée,simple et pratique,ça peut être utile pour trier par date par exple dans une mshflexgrid, Bon courage.

Commentaire de adamo901 le 04/07/2006 11:57:58

Merci COMME :-)

Commentaire de almahi23 le 08/07/2006 13:55:47

Excelent travail, Chapeau 20/20.

Commentaire de adamo901 le 31/07/2006 18:31:52

Merci ALMAHI23

Commentaire de vbnawal le 14/11/2006 12:06:59

Adamo gros merci à toi !
mais tu sais que le tri par date ne fonctionne pas avec cette methode puisque sort trie les jours en premier!
mais tu sais encore c'est mieux que rien ;)
merci gentil!

Commentaire de ym_trainz le 16/09/2007 10:10:47

impecc !
Je l'implante illico dans mon source ym_base.
10/10

cordialement,
ym_trainz

P.S. on peut réduire le code :

If (a.MouseRow = 0) Then ' Clique sur l'entête de la MSHFlexGrid
   a.Col = a.MouseCol 'désélectionne la colonne
   If Csst Then ' Tri Croissant
      a.Sort = 2      
   Else 'Tri Décroissant
      a.Sort = 1      
   End If
   Csst = Not Csst
End If

Commentaire de Galactus13 le 03/12/2008 07:05:13

10/10 Moi qui aime les codes court !

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

MSHFlexgrid [ par thrakkazz2000 ] Bonjour,j'ai une commande (cmd1) qui possède une commande fille (cmd2) qui elle même possède une commande fille (cmd3)Avec ceci j'alimente un MSHflexg entête mshflexgrid [ par bouddhi ] Salut à tous,j'utilise un contrôle mshflexgrid lié à un recordset (donc sans contrôle Data).Je voudrais juste savoir comment affecter des entêtes (ou Tri dans une MSHFlexGrid [ par kephset ] Je voudrais savoir si on peut trier une MSHFlexGrid après sa création.Il faudrait que je puisse la trier lors du clic sur le header de la colonne. Il Tri ds Mshflexgrid par click sur entete colonne [ par pat64 ] PatrickBonjour vous tous, (je débute en VB),Voila, j'ai un Mshflexgrid, chargé avec des data venant d'Access, et j'aimerais lorsque l'on click sur l'e VB6 tri dans une mshflexgrid [ par tari ] Salut à tous !!J'aimerais savoir si c'est possible de trié une mshflexgrid ?et si oui comment ? et peut-on choisir la colonne sur laquelle s [vb 6.0] Problème lié au tri d'une listview [ par mik67 ] Bonjour à tous,Je liste des éléments contenus dans une bdd access dans une listview.Je trie ses colonnes grâce à la très Tri multiple dans un MSHFlexGrid [ par tulesais ] Bonjour, à partir d'un tableau mémoire, je renseigne un MSHFlexGrid (aucun problème jusque là) et je souhaiterais, pouvoir trier ses données sur plus Contenu d'une cellule MSHFlexgrid [ par GuyFALESSE ] Bonjour à tous,Je voudrais afficher le contenu d'une cellule autre que l'entête dans un textBox.Avec le code ci-dessous, ça fonction, s vitesse reactivite click sur MSHFlexgrid [ par monsieurlemouche ] salut, ce n'est pas bien grave mais quand même... la réactivité de l'évènement click est variable selon l'objet sur lequel on clique. Exemple: sur un Tri DataGridView [ par eldim ] Bonjour,Comment peux-t-on trier un dataGridView sur plusieurs colonnes en même temps, sachant qu'il n'est pas renseigné par une base de données (il es


Nos sponsors


Sondage...

Comparez les prix


Console Sony Playstation 3 80GB
Entre 398€ et 425€

Visiter le guide achat

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,749 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)