Une formule qui ne s'exécute pas automatiquement

[El Toto]

Bonjour à tous,

J'ai écrit une macro qui me permet de récupérer le nom des feuilles actives d'un classeur. (voir fichier joint)

Cette fonction est utilisée directement en tant que formule dans la feuille n°1. Cependant, lorsque je rajoutte une feuille, celle ci n'apparaît pas tout de suite. On dirait que la fonction n'est pas systématiquement appelée. Il faut que je clique sur la formule, comme si je voulais la modifier pour faire la maj.

Si quelqu'un voit une solution pour que la mise au jour se fasse automatiquement, je le remercie d'avance.

A bientôt.

 

[Minick]

Salut,

Peut etre l''option calcul automatique à cocher

Menu Outils/Options/Calcul ->Cocher Automatique

@+ Minick

 

[El Toto]

Eh bien non, cette option est bien cochée...

Et de plus, la touche F9 ne parmet pas la réactualisation des données.

Merci quand même pour la piste.

@+

 

[Ti]

je n'ai pas ouvert ton fichier, mais je suppose que tu n'as pas placé en début de ta macro la ligne :

Application.Volatile

Si c'est le cas, ne cherche pas plus loin

 

[El Toto]

En effet Ti, je n'avais pas rajoutée cette ligne de code.

Je viens donc de la rajouter.
Ma fonction devient donc:
Public Function NomFeuille(Index As Integer) As String
Application.Volatile
NomFeuille = Worksheets(Index).Name
End Function

Cependant, lors de l'ajout d'une feuille dans le classeur (Menu Insertion > Feuille) il n'y a pas de calcul dans la feuille qui contient l'appel de ma fonction.
Il n'y a donc pas de mise à jour.

Mais, cela fonctionne quand même mieux qu'avant. Il doit y avoir autre chose...

 

[Chris]

Bonjour
Cela ne mettra à jour la feuille où se trouve la fonction que si tu effectues une manip dans cette feuille.
C'est le principe du calcul : n'est calculée que la feuille active et seulement en cas de recalcul.
Exemple si tu mets l'heure courante dans une cellule : elle ne se met à jour que si tu fais quelque chose dans la feuille.
Si tu veux un affichage indépendant du calcul, il faut non pas une fonction mais une procédure événementielle.
Chris

 

[jmps]

Bonjour El Toto, Minick, Ti, Chris,

Je ne sais pas si ça peut t'aider mais : Application.Calculate force le recalcul d'une feuille.
Par contre je ne sais pas trop sur quel évènement le placer. Mais si ça peut t'aider.

Bon courage.

José

 

[El Toto]

En effet,
je viens d'ajouter Application.calculate dans la procédure évènementielle de la feuille 1 : Worksheet_Activate.
Et maintenant dès que je passe dans la feuille 1, la mise à jour est automatique.

Merci à Tous.