VBA - fonction ...

Bonjour,

J'ai une fonction :

Function calcul_avancement(ByVal date_av_max As Variant, ByVal duree_pos As Variant, ByVal test_pos As Variant, ByVal jj As Variant, ByVal mm As Variant, ByVal aa As Variant) As Variant

Dim an_res As Variant
Dim an_ent As Variant
Dim an_dec As Variant
Dim mois_res As Variant
Dim mois_ent As Variant
Dim mois_dec As Variant
Dim jour_res As Variant
Dim jour_ent As Variant
Dim jour_dec As Variant
Dim jour As Variant
Dim mois As Variant
Dim annee As Variant
Dim date_mem As Variant
Dim annee_mem As Variant
Dim jour_mem As Variant
Dim mois_mem As Variant


If duree_pos = "" Then
calcul_avancement = date_av_max
end if

...
End Function

Je l'appelle à partir d'une cellule A1. J'aimerais que : lorsque duree_pos n'est pas renseigné, la fonction renvoie date_av_max, mais rien ne s'affiche, pourquoi ??

Merci !!