Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 [VBA]Retourner la valeur min d'un ligne avec une plage coupée

Kyirra

XLDnaute Nouveau
Bonjour les exceldownloaders

Pour un de mes programmes vba, j'ai besoin de retourner la valeur minimum d'une ligne mais avec des colonne espacé entre elle ainsi que dans une boucle.

l'idée serait quelque chose comme ça :

do while iteration <5

valeurMin = Application.WorksheetFunction.Min(synth.Range("AA"&iteration);synth.Range("AD"&iteration);synth.Range("AG"&iteration);synth.Range("AM'&iteration))

iteration = iteration +1

Loop

ou iteration est la variable de boucle
et synth la donnée contenant la feuille de calcul

Je sais que synth.Range("AA"&iteration) fonctionne et me retourne AA1, AA2....

mais je ne suis pas sur pour la fonction min.

sachant que l'erreur que me renvoie excel est il faut un séparateur. j'ai essayé différent manière de l'écrire avec des , des ; des & rien n'y fait je ne peut pas effectuer une selection différente d'une plage exemple AA1:CC17.

Avez vous une idée s'il vous plaît
 

Dudu2

XLDnaute Barbatruc
Bonjour,
Le min de toutes les cellules c'est...
VB:
    With synth
        ValeurMin = Application.Min(Union(.Range("AA1").Resize(5), _
                                          .Range("AD1").Resize(5), _
                                          .Range("AG1").Resize(5), _
                                          .Range("AM1").Resize(5)))
    End With
 
Dernière édition:

Kyirra

XLDnaute Nouveau
Bonjour si je comprends bien ton code ca ne correspond absolument pas à ce que je cherche
ton code change la taille des cellules moi ce que je recherche à avoir c'est sur une ligne mettons j'ai :

6-5-8-7-1-6

valeur min prendra alors la valeur 1


par contre merci pour union je vais voir ca va peut-être m'aider à faire quelque chose avec !
 

Dudu2

XLDnaute Barbatruc
Bonjour,

si je comprends bien ton code ca ne correspond absolument pas à ce que je cherche
ton code change la taille des cellules
Donc d'après toi .Range("AA1").Resize(5) change la taille des cellules !
OK...C'est sûr ça correspond pas à ta demande.

Edit: pourtant j'ai fait cette proposition avec application, la preuve j'ai mis Application.Min
 
Dernière édition:

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…