Inverser un tableau de valeur en vba

desirada Messages postés 1 Date d'inscription vendredi 31 octobre 2008 Statut Membre Dernière intervention 4 novembre 2008 - 4 nov. 2008 à 21:39
jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 - 5 nov. 2008 à 13:19
salut je suis debutante et j'aimerai savoir, comment on inverse un tableau de valeur en vba?
exemple si mon tableau comporte comme taille 4 avec les valeurs 
  4  6  9  3 ,JE VEUX OBTENIR 3 9 6 4

1 réponse

jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
5 nov. 2008 à 13:19
Bonjour,

en faisant une boucle for i to ...du 1er jusqu'à l'entier du dernier/2  et (dans ta boucle)
- enregistrer la valeur en cours dans une variable temporaire
- donner à l'indice en cours la valeur du dernier  - i
donner à l'indice dernier - i la valeur temporaire

Exemple :

toto = Array(4, 6, 1, 3, 5)
  DoEvents
  For i = 0 To UBound(toto) \ 2
    temp = toto(i)
    toto(i) = toto(UBound(toto) - i)
    toto(UBound(toto) - i) = temp
  Next
  For i = 0 To UBound(toto)
    MsgBox toto(i)
  Next

où tu peux remplacer ton Array par un tablkeau dynamique (même principe)
Observe bien que ma réponse relève plus de la logique que de la connaissance de VB ...
0
Rejoignez-nous