Vba valeur maxi d'une plage de cellule

[philppe27]

Bonjour,
Je voudrais mettre dans une variable la valeur maxi d'une plage de cellules.
J'essaie le code suivant mais sans résultat :
x1=maxval.range("L6:R8")
mais ce n'est pas cela.
Merci pour votre aide.
Cordialement

 

[ROGER2327]

Re : Vba valeur maxi d'une plage de cellule

Bonjour philppe27

Essayez

[COLOR="DarkSlateGray"][B]x1 = WorksheetFunction.Range("L6:R8")[/B][/COLOR]

ROGER2327
#3156

Code incorrect. Voir le message #6.​

 

[sousou]

Re : Vba valeur maxi d'une plage de cellule

Bonjour philippe.
Je ne pense pas que cela existe en VB, mais la fonction Max est bien présente dans excel.
Une boucle calculant la valeur max peut te dépanner.
Du genre
max=0
set zone=range("L6:R8")
for each i in zone
if i> max then max=i
next
msgbox max

 

[philppe27]

Re : Vba valeur maxi d'une plage de cellule

Cela me met une erreur 438...

 

[philppe27]

Re : Vba valeur maxi d'une plage de cellule

Merci sousou je vais essaye comme cela

 

[ROGER2327]

Re : Vba valeur maxi d'une plage de cellule

Re...

Cela me met une erreur 438...

Au temps pour moi !

[COLOR="DarkSlateGray"][B]x1 = WorksheetFunction.Max(Range("L6:R8"))[/B][/COLOR]

ROGER2327
#3157

 

[sousou]

Re : Vba valeur maxi d'une plage de cellule

C'est plus facile effectivement,
mais n'oublie pas la fonction max

x1 = WorksheetFunction.Max(Sheets(1).Range("a1:a5"))