Classe Sort - tri (Excel VBA)

La classe Sort représente le tri d'une plage de données. Pour utiliser une variable de classe Sort, elle doit d'abord être instanciée, par exemple

Dim srt as Sort
Set srt = ActiveSheet.Sort

Apply

Trie la plage sur base des états de tri en cours.

ActiveSheet.Sort.Apply

Header

Indique si la première ligne contient l'information d'en-tête. En lecture/écriture XlYesNoGuess. Les valeurs de retour possibles sont xlGuess - Excel détermine s'il existe un en-tête. S'il en existe un, il détermine sa position, xlNo - Valeur par défaut, xlYes - La plage entière ne doit pas être triée.

xlNo est la valeur par défaut. Vous pouvez spécifier xlGuess si vous souhaitez qu'Excel tente de déterminer l'en-tête.

ActiveSheet.Sort.Header = xlGuess

MatchCase

Affectez à cet argument la valeur true pour effectuer un tri qui respecte la casse ou la valeur false pour effectuer un tri qui ne respecte pas la casse. Lecture-écriture.

ActiveSheet.Sort.MatchCase = True

Orientation

Cette propriété indique l'orientation du tri. En lecture/écriture XlSortOrientation. Les valeurs de retour possibles sont xlSortColumns - Trie par colonne, xlSortRows.

ActiveSheet.Sort.Orientation = xlSortColumns

Rng

Renvoie la plage de valeurs sur laquelle le tri est effectué. En lecture seule.

Dim rngRng As Range
Set rngRng = ActiveSheet.Sort.Rng

SetRange

Définit la plage sur laquelle le tri a lieu.

SetRange (Rng)

Rng: Cette énumération spécifie la plage sur laquelle se produit le tri représenté par l’objet sort .

ActiveSheet.Sort.SetRange Rng:=

SortFields

Renvoie l’objet SortFields qui représente la collection de champs de tri associés à l’objet sort . En lecture seule.

Dim sfsSortFields As SortFields
Set sfsSortFields = ActiveSheet.Sort.SortFields

SortMethod

Cette propriété indique la méthode de tri utilisée pour les langues chinoises. En lecture/écriture XlSortMethod. Les valeurs de retour possibles sont xlPinYin - Ordre de tri phonétique chinois des caractères, xlStroke - Tri effectué en fonction de la quantité de traits dans chaque caractère.

ActiveSheet.Sort.SortMethod = xlPinYin