en VBA, il n'existe pas de fonction de tri de tableau. Sous Excel, on peut se servir de la fonction tri sur une feuille.
Il existe des solutions : le tri à bulle etc... et l'utilisation d'une fonction WordBasic de Word6 qui fonctionne encore en VBA Word et qui tri des tableaux à une ou deux dimensions.
WordBasic.SortArray NomTableau()[,Ordre][,De][,A][,TypeTri][,Clétri]
- Ordre : 0 ou omis = croissant, 1 = décroissant
- De : Numéro du premier élément à trier (0 par défaut)
- A :Numéro du dernier élément à trier
-TypeTri :uniquement sur tableau à deux dimensions O ou omis = Trie sur les lignes, 1 sur les colonnes
- CléTri : numéro de ligne ou de colonne qui sert de base pour le tri
Sous excel il suffit de mettre en référence Microsoft Word X.0 Objet Library pour faire fonctionner cette function.
Exemple Excel :
Sub Trier() ' mettre en référence microsoft word X.0 objet library
Dim liste(2) As String
liste(0) = "wse"
liste(1) = "ade"
liste(2) = "hyt"
WordBasic.SortArray liste()
MsgBox liste(0) & vbLf & liste(1) & vbLf & liste(2)
End Sub