Discussion :

[lio62]

Bonjour
j'ai une fonction sur une feuille de calcul ( modele)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Function nb_font(plage As Range, cellule As Range) As Long
    Application.Volatile
    Dim celle As Range, nb As Long
    n = 0
    For Each celle In plage
    If celle.Value = "" And celle.Interior.ColorIndex = cellule.Interior.ColorIndex Then n = n + 1
    Next
    nb_font = n
End Function

dans un module je cree une nouvelle feuille et je copie les données de la feuille modele contenant les fonctions.
je voudrai que cette fonction se lance qu'a la fin du module

[ouskel'n'or]

Comme d'ab'... Toujours aussi clair... Sinon, la réponse est dans la question : Lance ta fonction en fin de macro (!!!) (après un doevents)...
Mais je ne pense pas que ce soit la réponse que tu attends

[lio62]

salut ousk
félicitations pour tes étoiles elles sont bien méritées quant à moi c vrai je suis tjrs aussi clair mais j'pense pas que ca s'arrangera avec les années lol
je teste demain au boulot et je te tiens au courant
merci a+
lionel

[ouskel'n'or]

Salut Lio, réveille-toi ! Mes étoiles, elles ont près de trois ans !

La sobriété, c'est la santé !