Discussion :

[delube]

Bonjour

Voici mon problème
J'ai des valeurs inscrites dans la plage suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range(Cells(i, 27),Cells(i+3,27))

Certaines de ces valeurs peuvent être égales à 0

Je voudrai récupérer la valeur minimum de cette plage qui ne soit pas égale à 0, le tout en VBA

Merci d'avance

Bonne soirée à tous

[Menhir]

La méthode brutale mais efficace consisterait à faire une boucle For To.
A chaque tour, tu vérifies avec un If si la valeur est supérieure à 0.
Si c'est le cas, tu compares la valeur courante à la valeur retenue. Si elle est inférieure, la valeur courante devient la valeur retenue.

Ne pas oublier d'initialiser la valeur retenue avant le début de la boucle.

J'espère que tu ne fais pas une macro spécialement pour ça.
Parce que si c'est le cas, il y a des solutions plus simple que de passer par du VBA.

[joe.levrai]

Bonjour,

la fonction PETITE.VALEUR (SMALL() en anglais) permet d'obtenir la k_ieme plus petite valeur d'une plage

en VBA, le minimum d'une plage de nombre positifs, en excluant 0, revient à obtenir l'avant dernier plus petit, c'est à dire la plus petite valeur de rang 2

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.WorksheetFunction.Small(Range(Cells(i, 27),Cells(i+3,27)), 2)

[delube]

Merci menhir pour ta réponse
En effet, je cherche exclusivement du VBA, je continue mes recherches

[delube]

Merci joe.levrai

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.WorksheetFunction.Small(Range(Cells(i, 27),Cells(i+3,27)), 2)

me renvoie ''Erreur de syntaxe''

[delube]

De même, si j'ai plus d'un 0 dans la plage, ça me renvoie 0 quand même !