Bonjour,

Je crais une fonction toto comme suit:

Function toto(Nbt as integer) as long
   Toto = Cells(1,1).value * Cells(2,1) * Nbt
End function

Dans une cellule je mets:  =toto(14)

Il m'affiche bien la valeur mais si je change les valeurs de cells(1,1) ou cells(2,1) , le resultat ne se raffraichit pas.

On est obligé de retourner sur la cellule pour revalider la fonction.

F9 ne fonctionne pas non plus.

Le but de l'opération est de réalisé un comptage spécifique dans une fonction avec diverses options.

Merci d'avance pour toutes les réponses et les recherches effectuées.

Bonne journée.

Bonjour FPatrick,

Pour que cela fonctionne, il faut ajouter

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.Calculate
End Sub

dans la page de code correspond à la feuille ou se situe la formule.

RB

Merci pour la réponse rapide

Cela marche une seule fois, juste après avoir modifié le module. Mais après plus rien.

Merci encore pour les recherches effectuées.

Merci, je vais analyser ma fonction pour prendre en compte ces paramètres.


Merci à toutes les personnes pour les recherches.