XL 2010 nom onglet = nom cellule

[eastwick]

Bonjour à toutes et tous,

Simplissime pour vous : dans une feuille (nom : paramètres) cellule c2, une année (ex : 2016).
Je voudrais que l'onglet de la feuille suivante se nomme automatiquement 2016, sans bouton à cliquer.

Un grand merci et bonne soirée.

 

[mapomme]

Bonjour eastwick,

Dans le module de code de la feuille où vous indiquez en C2 le nom de la feuille suivante, coller le code ci-dessous.

Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Range("c2"), Target) Is Nothing Then
      On Error Resume Next
      Sheets(Me.Index + 1).Name = Target
      On Error GoTo 0
   End If
End Sub

nb: si en C2 le nouveau nom est vide, comporte des caractères interdits, est trop long, est le nom d'une feuille déjà existante ou bien que sais-je encore, alors la feuille suivante n'est pas renommée.

 

[eastwick]

Merci, tout ça est parfaitement parfait !!!