Utiliser le resultat d'une fonction, dans une macro pour des filtres "dynamiques"

[micks71]

Bonjour,

Je voudrais savoir comment on peut executer une fonction dans une macro, je m'explique :

    Dim last As String
    last = MAX(S:S)
    MsgBox "Last est : " & last

Pour pouvoir utiliser ce resultat dans un filtre avec un resultat dynamique, (la valeur max peut changer, je mais je veux toujours qu'avec max) et une deuxiem filtre que ca soit sans max donc de 1 a 18 dans ce cas la mais je veux que ce filtre puisse se changer automatiquement, la colonne S evolue correctement donc je peux toujours me servir de cette colonne comme reference absolue

le max est 19 donc &last devrais etre 19, mais avec l'enregistreur de macro ca me met tout ceux qui sont a cocher donc je pense a quelque chose dans ce genre la:

    Dim number
    Range("A1048576").End(xlUp).Offset(0, 0).Select
    number = ActiveCell.Row        
    ActiveSheet.Range("A1:S" & number).AutoFilter Field:=19, _
    Criteria1:=Array( 0, &last), Operator:=xlFilterValues

Ps: desole pour les accents mais clavier qwerty ^^, (et surement quelques fautes...)

 

[soenda]

Re : Utiliser le resultat d'une fonction, dans une macro pour des filtres "dynamiques

Bonjour micks71

comment executer une fonction dans une macro

Par exemple:

last = WorksheetFunction.Max(Range("A:A"))

A plus

 

[micks71]

Re : Utiliser le resultat d'une fonction, dans une macro pour des filtres "dynamiques

Merci beaucoup de ta reponse.
Effectivement c'est simple et ca marche :]
Que dire de plus a part merci beaucoup encore une fois.
Ca me laisse entrevoir beaucoup de possibilites

A plus