Renommer une feuille grace à une cellule V2

Bonjour à tous !

En fouillant le forum, j'ai presque trouvé mon bonheur icihttps://forum.excel-pratique.com/excel/renommer-une-feuille-grace-a-une-cellule-t29016.html

l'idée étant également de renommer "dynamiquement" un onglet d'après une cellule donnée.

Le code de Dan :

    Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Not Intersect(Target, Range("R2")) Is Nothing Then
    ActiveSheet.Name = Target
    End If
    End Sub

fonctionne bien, sauf que dans mon cas, la cellule "visée" est le "résultat" d'une formule (du type = =F1&" "&TEXTE(F5;"jj mmm") ".

Et c'est ce détail qui semble bien faire "échouer" la macro, en effet, quand je saisi "manuellement" des données dans la dite cellule (R2), cela fonctionne, mais pas quand il y a la formule..

Une idée des modifications à apporter ?

Merci par avance,

Cordialement,

Bonjour

Apparemment avec ce code; cela fonctionne.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Name = Range("F2").Value
End Sub

Salut,

Eventuellement en utilisant l'événement Calculate :

    Private Sub Worksheet_Calculate()
    ActiveSheet.Name = Range("R2")
    End Sub

Cordialement.

Edit : Salut Amadéus

Bonjour Amadéus, bonjour Yvouille,

Et merci beaucoup à tous les deux !

C'est parfait...

Cordialement,