Formule: Max(Range(Cells(a,b),cells(c,d)) en VBA 2003

Résolu
tessel75 -  
 tessel75 -
Bonjour,
Au travail je n'ai que Excel2003; cet après midi j'ai essayé d'écrire quelques lignes de VBA pour compléter une macro où j'avais besoin d'écrire une inégalité du genre
if year(max(range(cells(a1,b),cells(a2,b)))) > year(min(range(cells(a1,b),cells(a2,b)))) then ....
ça me paraissait simple, mais il me réponds que les fonctions Min et Max sont inconnues de VBA (en version 2003)
Qui pourrait m'indiquer comment contourner l'obstacle? Avec tous mes remerciements.




A voir également:

3 réponses

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonsoir,

Essaie avec
If Year(Application.Max(Range(Cells(A1, B), Cells(A2, B)))) > Year(Application.Min(Range(Cells(A1, B), Cells(A2, B)))) Then


A+
0
tessel75
 
Je te remercie pour ta suggestion. Je vais tester, mais comme j'ai dit le blocage est sur ma machine de travail, aussi je ne pourrai te donner le résultat, positif ou négatif, que lundi soir. Merci et Bon week-end à toi.
0
tessel75
 
Bonsoir Gyrus,
Ta suggestion marche bien. Bravo!
Il y a encore qq difficultés mais sur d'autres lignes.
Avec mes remerciements.
Je passe la question comme résolue.
0