Extraire le maximum de valeur à partir d'un tableau
J'ai un tableau qui ressemble à ceci:
Dim values(1 To 3) As String
values(1) = Sheets("risk_cat_2").Cells(4, 6).Value
values(2) = Sheets("risk_cat_2").Cells(5, 6).Value
values(3) = Sheets("risk_cat_2").Cells(6, 6).Value
Ce que je voudrais faire maintenant est d'obtenir la valeur maximale de toutes les valeurs de la chaîne. Est-il un moyen facile en VBA pour récupérer la valeur max d'un tableau?
Pouvez-vous utiliser
Double
que le type d'élément de tableau?OriginalL'auteur Frits Verstraten | 2016-06-13
Vous devez vous connecter pour publier un commentaire.
Oui - si les valeurs sont numériques. Vous pouvez utiliser
WorksheetFunction.Max
en VBA.Pour cordes - cela ne fonctionnera pas.
WorksheetFunction.Max(Range("E4:E6").Value)
?Oui - qui fonctionne sur le même principe.
OriginalL'auteur Robin Mackenzie
La façon la plus simple pour récupérer le maximum (je pense) est une itération à travers le tableau et en comparant les valeurs. Les deux fonctions suivantes:
Noter, que chaque fois qu'une chaîne de caractères (texte), le tableau est transmis à la fonction. Pourtant, une seule fonction est de comparer des chaînes de caractères (texte), tandis que l'autre est celui de la comparaison des nombres. Le résultat est tout à fait différent!
La première fonction (en comparant le texte) sera de retour (avec l'exemple ci-dessus)
af
comme le maximum, tandis que la deuxième fonction uniquement en considération les numéros et, par conséquent, renvoie6
comme maximum.OriginalL'auteur Ralph
Boucle Simple ferait l'affaire
OriginalL'auteur RGA
Solution pour la Collecte.
OriginalL'auteur Ans