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

Résolu/Fermé
tessel75 - 29 nov. 2013 à 23:32
 tessel75 - 2 déc. 2013 à 22:08
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 samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
30 nov. 2013 à 00:09
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
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
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