Recalcul Formule Excel

Question

Module :
Function demo(rg_modele As Range)
Application.Volatile
demo = Evaluate(rg_modele.Formula)
End Function

Feuil1!A1
=SUM(A2:A5)

Feuil2!A1:
=demo(Feuil1!A1)
'Utilise la formule de Feuil1!A1

Si je change la formule de Feuil1!A1, le nouveau total dans Feuil2!A1 ne se met pas bien à jour.
Je dois cliquer sur la formule de Feuil2!A1 puis valider pour que ça marche.

Y a-t-il un moyen de rafraichir automatiquement ?

Faites du bien à un âne, il vous fera des crottes.

cs_seblomb · Answer

Salut,

Pour rafraichir la feuille automatiquement, il faut mettre le code suivant dans ThisWorkbook:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

Application.Calculate

End Sub

De cette façon, le calcul se fait dès que la feuille est activée.

Bye.

P.S.: t'y es finalement arrivé... ;)

petitstagiaire · Answer

Ok pour calculate mais je viens de remarquer que ce code ne marche pas lorsqu'il y a plus de 2 feuilles.

Je continue à creuser.

Recalcul Formule Excel

2 réponses

Discussions similaires