trier des cellules

Bonjour,
Tu peux peut être essayer ça :

Sub TRI()
'
' TRI Macro
' Macro enregistrée le 16/06/2005 par Ity
'
'
'
Columns('A:IV').Select 'selection de toutes les colonnes
Selection.Sort Key1:=Range('A2'), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
'le champs 'nom' se trouve en colonne A et le tri croissant s'effectue à partir de la ligne 2
End Sub

Ensuite, tu peux affecter ta macro à un bouton.

Si tu peux joindre un exemple perso (-de 50ko, sans espace ni accent), ce serait mieux

Bon courage !

Message édité par: Ity, à: 16/06/2005 10:46

Salut sarah, Ity,

Voilà ce que je propose
Regarde le fichier joint click sur nom

Le code se trouve dans VBA Alt+F11
Feuil1

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End sub [file name=sarah.zip size=7441]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/sarah.zip[/file]

Bonjour Sarah

Un petit Bnonjour
en préambule ne coûte pas très cher et
améliore grandement les relations

Un petit essai avec une forme (rectangle translucide) placée sure l'en-tête de colonne et une macro de tri affectée à cette forme

En espérant t'avoir apporté un peu d'aide ..
@+ GD


[file name=Sarah.zip size=7343]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Sarah.zip[/file]

Re Sarah
Bonjour Ity et Riddick

Oups ! Non seulement à la bourre mais en plus avec une solution moins bonne que celle de Riddick(Bien joué) ....
je retourne me coucher

@+ GD